skalibs

Mirror/fork of https://skarnet.org/software/skalibs/
git clone https://ccx.te2000.cz/git/skalibs
Log | Files | Refs | README | LICENSE

case_uppers.c (178B)

      1 /* ISC license. */
      2 
      3 #include <ctype.h>
      4 
      5 #include <skalibs/bytestr.h>
      6 
      7 void case_uppers (char *s)
      8 {
      9   while (*s)
     10   {
     11     int c = toupper(*s) ;
     12     *s++ = (unsigned char)c ;
     13   }
     14 }