home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 8 / FreshFishVol8-CD1.bin / gnu / src / amiga / libnix-0.7-src.lha / libnix-0.7 / sources / nix / extra / strupper.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-12-12  |  224 b   |  19 lines
  1. #include <ctype.h>
  2. #include <stabs.h>
  3.  
  4. char *strupper(char *s)
  5. {
  6.   unsigned char *s1;
  7.  
  8.   s1=(unsigned char *)s;
  9.   while(*s1)
  10.   {
  11.     if (islower(*s1))
  12.       *s1-='a'-'A';
  13.     s1++;
  14.   }
  15.   return s;
  16. }
  17.  
  18. ALIAS(strupr,strupper);
  19.