home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / TOOL_INC.ZIP / ANYSTRIN.INC < prev    next >
Encoding:
Text File  |  1988-01-29  |  1.2 KB  |  45 lines
  1.  
  2. (*
  3.  * General string type declarations
  4.  *
  5.  * (C) 1987 Samuel H. Smith, 14-Dec-87 (rev. 27-Jan-88)
  6.  *
  7.  *)
  8.  
  9. (* ------------------------------------------------------------ *)
  10. type
  11.    anystring = string[128];
  12.    longstring = string[255];
  13.  
  14.    string2   = string[2];
  15.    string8   = string[8];
  16.    string12  = string[12];
  17.    string13  = string[13];
  18.    string20  = string[20];
  19.    string65  = string[65];
  20.    string160 = string[160];
  21.    string255 = string[255];
  22.  
  23.    char2  = array[1..2] of char;
  24.    char3  = array[1..3] of char;
  25.    char4  = array[1..4] of char;
  26.    char5  = array[1..5] of char;
  27.    char6  = array[1..6] of char;
  28.    char7  = array[1..7] of char;
  29.    char8  = array[1..8] of char;
  30.    char9  = array[1..9] of char;
  31.    char10 = array[1..10] of char;
  32.    char11 = array[1..11] of char;
  33.    char12 = array[1..12] of char;
  34.    char13 = array[1..13] of char;
  35.    char14 = array[1..14] of char;
  36.    char15 = array[1..15] of char;
  37.    char16 = array[1..16] of char;
  38.    char19 = array[1..19] of char;
  39.    char24 = array[1..24] of char;
  40.    char25 = array[1..25] of char;
  41.    char30 = array[1..30] of char;
  42.    char32 = array[1..32] of char;
  43.    char45 = array[1..45] of char;
  44.  
  45.