CP/M/CPM_CDROM.iso/lambda/soundpot/p/sclib1.lbr/ISUPPER.CZ/ISUPPER.C

Text File | 1993-10-25 | 128 b | 7 lines

/*
** return 'true' if c is upper-case alphabetic
*/
isupper(c) int c; {
  return (c<='Z' && c>='A');
  }