diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-06-03 23:58:04 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-06-03 23:58:04 +0000 |
commit | 3f939f220e50adb6f28f2dd14f06461c7cebfe14 (patch) | |
tree | 9d0a29dd1a27a086a9d668b3526d9dcaca6f84f3 /ext/File | |
parent | 425d70b4c4324ccafae8099527a1f9ab13640b5c (diff) | |
download | perl-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.c | 4 |
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; |