home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1993 #1 / MONSTER.ISO / prog / gen / regex011.taz / regex011 / regex-0.11 / test / upcase.c < prev    next >
Encoding:
Text File  |  1992-06-28  |  1.7 KB  |  40 lines

  1. /* Indexed by a character, gives the upper case equivalent of the
  2.    character.  */
  3.  
  4. char upcase[0400] = 
  5.   { 000, 001, 002, 003, 004, 005, 006, 007,
  6.     010, 011, 012, 013, 014, 015, 016, 017,
  7.     020, 021, 022, 023, 024, 025, 026, 027,
  8.     030, 031, 032, 033, 034, 035, 036, 037,
  9.     040, 041, 042, 043, 044, 045, 046, 047,
  10.     050, 051, 052, 053, 054, 055, 056, 057,
  11.     060, 061, 062, 063, 064, 065, 066, 067,
  12.     070, 071, 072, 073, 074, 075, 076, 077,
  13.     0100, 0101, 0102, 0103, 0104, 0105, 0106, 0107,
  14.     0110, 0111, 0112, 0113, 0114, 0115, 0116, 0117,
  15.     0120, 0121, 0122, 0123, 0124, 0125, 0126, 0127,
  16.     0130, 0131, 0132, 0133, 0134, 0135, 0136, 0137,
  17.     0140, 0101, 0102, 0103, 0104, 0105, 0106, 0107,
  18.     0110, 0111, 0112, 0113, 0114, 0115, 0116, 0117,
  19.     0120, 0121, 0122, 0123, 0124, 0125, 0126, 0127,
  20.     0130, 0131, 0132, 0173, 0174, 0175, 0176, 0177,
  21.     0200, 0201, 0202, 0203, 0204, 0205, 0206, 0207,
  22.     0210, 0211, 0212, 0213, 0214, 0215, 0216, 0217,
  23.     0220, 0221, 0222, 0223, 0224, 0225, 0226, 0227,
  24.     0230, 0231, 0232, 0233, 0234, 0235, 0236, 0237,
  25.     0240, 0241, 0242, 0243, 0244, 0245, 0246, 0247,
  26.     0250, 0251, 0252, 0253, 0254, 0255, 0256, 0257,
  27.     0260, 0261, 0262, 0263, 0264, 0265, 0266, 0267,
  28.     0270, 0271, 0272, 0273, 0274, 0275, 0276, 0277,
  29.     0300, 0301, 0302, 0303, 0304, 0305, 0306, 0307,
  30.     0310, 0311, 0312, 0313, 0314, 0315, 0316, 0317,
  31.     0320, 0321, 0322, 0323, 0324, 0325, 0326, 0327,
  32.     0330, 0331, 0332, 0333, 0334, 0335, 0336, 0337,
  33.     0340, 0341, 0342, 0343, 0344, 0345, 0346, 0347,
  34.     0350, 0351, 0352, 0353, 0354, 0355, 0356, 0357,
  35.     0360, 0361, 0362, 0363, 0364, 0365, 0366, 0367,
  36.     0370, 0371, 0372, 0373, 0374, 0375, 0376, 0377
  37.   };
  38.  
  39.  
  40.