From 90f23f1ea6e436d681db81aa80edb7a763de2b12 Mon Sep 17 00:00:00 2001 From: Paul Smith Date: Sat, 5 Feb 2000 07:50:47 +0000 Subject: * Updates for VMS, Windows, and DOS ports. * Clean up some warnings. --- vmsfunctions.c | 22 ++-------------------- 1 file changed, 2 insertions(+), 20 deletions(-) (limited to 'vmsfunctions.c') diff --git a/vmsfunctions.c b/vmsfunctions.c index 69ba28c..f6708cc 100644 --- a/vmsfunctions.c +++ b/vmsfunctions.c @@ -73,13 +73,11 @@ readdir (dir) dnam->nam$l_rsa = dir->d_result; dnam->nam$b_rss = MAXNAMLEN; - if (debug_flag) - printf ("."); + DB (DB_VERBOSE, (".")); if (!((i = sys$search (dfab)) & 1)) { - if (debug_flag) - printf ("sys$search failed with %d\n", i); + DB (DB_VERBOSE, (_("sys$search failed with %d\n"), i)); return (NULL); } @@ -248,22 +246,6 @@ cvt_time (tval) return (str); } - -int -strcmpi (s1, s2) - const char *s1; - const char *s2; -{ - while (*s1 != '\0' && toupper(*s1) == toupper(*s2)) - { - s1++; - s2++; - } - - return toupper(*(unsigned char *) s1) - toupper(*(unsigned char *) s2); -} - - int strcmpi (s1, s2) const char *s1; -- cgit v1.2.3