summaryrefslogtreecommitdiff
path: root/ext/File
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-06-03 23:58:04 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-06-03 23:58:04 +0000
commit3f939f220e50adb6f28f2dd14f06461c7cebfe14 (patch)
tree9d0a29dd1a27a086a9d668b3526d9dcaca6f84f3 /ext/File
parent425d70b4c4324ccafae8099527a1f9ab13640b5c (diff)
downloadperl-3f939f220e50adb6f28f2dd14f06461c7cebfe14.tar.gz
-Wall "subscript has type `char'" cleanup.
p4raw-id: //depot/perl@10418
Diffstat (limited to 'ext/File')
-rw-r--r--ext/File/Glob/bsd_glob.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/ext/File/Glob/bsd_glob.c b/ext/File/Glob/bsd_glob.c
index 3c3ae40048..a71418cf44 100644
--- a/ext/File/Glob/bsd_glob.c
+++ b/ext/File/Glob/bsd_glob.c
@@ -596,12 +596,12 @@ ci_compare(const void *p, const void *q)
const char *qq = *(const char **)q;
int ci;
while (*pp && *qq) {
- if (tolower(*pp) != tolower(*qq))
+ if (toLOWER(*pp) != toLOWER(*qq))
break;
++pp;
++qq;
}
- ci = tolower(*pp) - tolower(*qq);
+ ci = toLOWER(*pp) - toLOWER(*qq);
if (ci == 0)
return compare(p, q);
return ci;