Diff for /gforth/engine/Attic/memcmpc.c between versions 1.5 and 1.6

version 1.5, 2002/12/24 23:40:30 version 1.6, 2003/01/26 20:56:38
Line 33  Cell memcasecmp(const Char *s1, const Ch Line 33  Cell memcasecmp(const Char *s1, const Ch
   for (i=0; i<n; i++) {    for (i=0; i<n; i++) {
     Char c1=toupper(s1[i]);      Char c1=toupper(s1[i]);
     Char c2=toupper(s2[i]);      Char c2=toupper(s2[i]);
     if (c1 != c2)      if (c1 != c2) {
       return c1-c2;        if (c1 < c2)
           return -1;
         else
           return 1;
       }
   }    }
   return 0;    return 0;
 }  }

Removed from v.1.5  
changed lines
  Added in v.1.6


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>