home *** CD-ROM | disk | FTP | other *** search
/ World of A1200 / World_Of_A1200.iso / programs / disk / backup_utils / fill / pmodules / upperchar.e < prev   
Text File  |  1995-02-27  |  87b  |  3 lines
  1. PROC upperChar (char) RETURN IF (char > 96) AND (char < 123) THEN (char-32) ELSE char
  2.  
  3.