diff options
author | Hans Mulder <hansmu@xs4all.nl> | 1998-03-18 01:36:32 -0800 |
---|---|---|
committer | Malcolm Beattie <mbeattie@sable.ox.ac.uk> | 1998-04-02 14:26:52 +0000 |
commit | 640cc98602a3b588e5db3488f51ab69f380b72f1 (patch) | |
tree | f89f87e984c483b7a31135246573880b389cb926 /vms | |
parent | c6ed36e16dcdd4c25349e4f9d5c84061095ccffb (diff) | |
download | perl-640cc98602a3b588e5db3488f51ab69f380b72f1.tar.gz |
5.004_63 picky compiler fixes [PATCH]
Date: Wed, 18 Mar 1998 09:36:32 -0800
Subject: [PATCH 5.004_63] Fix function prototype with long doubles
Date: Wed, 18 Mar 1998 14:48:19 -0800
p4raw-id: //depot/perl@843
Diffstat (limited to 'vms')
-rw-r--r-- | vms/vms.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -2441,7 +2441,7 @@ trim_unixpath(char *fspec, char *wildspec, int opts) for (front = end ; front >= base; front--) if (*front == '/' && !dirs--) { front++; break; } } - for (cp1=template,cp2=lcres; *cp1 && cp2 <= lcend + sizeof lcend; + for (cp1=template,cp2=lcres; *cp1; cp1++,cp2++) *cp2 = _tolower(*cp1); /* Make lc copy for match */ if (cp1 != '\0') return 0; /* Path too long. */ lcend = cp2; |