home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / perlkt40.zip / OS2.pat < prev    next >
Text File  |  1997-11-16  |  778b  |  25 lines
  1. *** HANDY.H.orig    Thu Jun 13 17:20:22 1996
  2. --- HANDY.H    Sun Mar 30 13:32:00 1997
  3. ***************
  4. *** 42,51 ****
  5.   #define strnNE(s1,s2,l) (strncmp(s1,s2,l))
  6.   #define strnEQ(s1,s2,l) (!strncmp(s1,s2,l))
  7.   
  8. ! #ifdef MSDOS
  9.   #define UC(c)        ((unsigned char)(c))
  10.   #define BD(l, h, c)    (((l) <= (c))&&((c) <= (h)))
  11.   #define iskanji(c)    ((BD(0x81, 0x9F, UC(c)) || BD(0xE0, 0xFC, UC(c))) ? 1:0)
  12.   #define I80286
  13.   #endif
  14. - 
  15. --- 42,50 ----
  16.   #define strnNE(s1,s2,l) (strncmp(s1,s2,l))
  17.   #define strnEQ(s1,s2,l) (!strncmp(s1,s2,l))
  18.   
  19. ! #if defined(OS2) || defined(MSDOS)
  20.   #define UC(c)        ((unsigned char)(c))
  21.   #define BD(l, h, c)    (((l) <= (c))&&((c) <= (h)))
  22.   #define iskanji(c)    ((BD(0x81, 0x9F, UC(c)) || BD(0xE0, 0xFC, UC(c))) ? 1:0)
  23.   #define I80286
  24.   #endif
  25.