home *** CD-ROM | disk | FTP | other *** search
/ rtsi.com / 2014.01.www.rtsi.com.tar / www.rtsi.com / OS9 / OSK / ARCHIVERS / lha208src.lzh / LHA / SRC / strucmp.c < prev    next >
Text File  |  1994-02-14  |  337b  |  21 lines
  1. /*
  2.  * strucmp.c
  3.  * modified: Oct 29 1991 by Masaru Oki
  4.  */
  5.  
  6. static int toupper(n)
  7. register int n;
  8. {
  9.     if(n >= 'a' && n <= 'z') return n & (~('a'-'A'));
  10.     return n;
  11. }
  12.  
  13. int strucmp(s, t)
  14. register char *s, *t;
  15. {
  16.     while (toupper(*s++) == toupper(*t++))
  17.         if ( !*s || !*t ) break;
  18.     if ( !*s && !*t ) return 0;
  19.     return 1;
  20. }
  21.