home *** CD-ROM | disk | FTP | other *** search
/ Really Useful CD 1 / ReallyUsefulCD1.iso / extras / languages / smalltalk / _smalltalk / sources / h / cmds < prev    next >
Encoding:
Text File  |  1987-12-30  |  4.2 KB  |  137 lines

  1. extern char x_str[];
  2. /*
  3.      Little Smalltalk
  4.  
  5.      The following very common commands are given a concise description
  6.      in bytecodes.
  7.  
  8. */
  9.  
  10. static char *unspecial[] = {&x_str[2185], &x_str[1980], &x_str[2254], &x_str[2798], &x_str[914],
  11.           &x_str[3015], &x_str[1502], &x_str[2221], &x_str[2360], &x_str[2366],
  12.           &x_str[2848], &x_str[1122], &x_str[2250],
  13.  
  14.           /* after the first 16 - which should be the most common
  15.           messages, order doesn't make as much difference so we
  16.           might as well list things in alphabetical orde */
  17.  
  18.           &x_str[421],
  19.           &x_str[586], 
  20.           &x_str[625], 
  21.           &x_str[699], 
  22.           &x_str[708], 
  23.           &x_str[867],
  24.           &x_str[955], 
  25.           &x_str[968], 
  26.           &x_str[1100],
  27.           &x_str[1157],
  28.           &x_str[1395], 
  29.           &x_str[1464],
  30.           &x_str[1508],
  31.           &x_str[1594], 
  32.           &x_str[1929],
  33.           &x_str[1956],
  34.           &x_str[1998],
  35.           &x_str[2043],
  36.           &x_str[2048],
  37.           &x_str[2066], 
  38.           &x_str[2194],
  39.           &x_str[2250], 
  40.           &x_str[2288],
  41.           &x_str[2453],
  42.           &x_str[2518],
  43.           &x_str[2530],
  44.           &x_str[2573],
  45.           &x_str[2668],
  46.           &x_str[2704], 
  47.           &x_str[2757], 
  48.           &x_str[2824],
  49.           &x_str[2829], 
  50.           &x_str[2837],
  51.           &x_str[2865],
  52.           &x_str[2976], 
  53.           &x_str[3001],
  54.           &x_str[3208], 
  55.           &x_str[3225], 
  56.           0 };
  57.  
  58. # define VALUECMD 5
  59. # define PRNTCMD  8
  60.  
  61. static char *binspecial[] = {&x_str[2189], &x_str[740], &x_str[2943], &x_str[1283], &x_str[3021],
  62.                       &x_str[28], &x_str[3250], &x_str[2930], &x_str[3166], &x_str[3154],
  63.                       &x_str[1685], &x_str[1660], &x_str[1356], &x_str[425], 
  64.                 &x_str[16], &x_str[928],
  65.  
  66.                 &x_str[419], 
  67.                 &x_str[12], 
  68.                 &x_str[18],
  69.                 &x_str[474], 
  70.                 &x_str[495], 
  71.                 &x_str[507], 
  72.                 &x_str[517], 
  73.                 &x_str[807], 
  74.                 &x_str[901],
  75.                 &x_str[936],
  76.                 &x_str[1166], 
  77.                 &x_str[1600], 
  78.                 &x_str[1605],
  79.                 &x_str[1620],
  80.                 &x_str[1718], 
  81.                 &x_str[1709], 
  82.                 &x_str[2023], 
  83.                 &x_str[2069], 
  84.                 &x_str[2102], 
  85.                 &x_str[2205],
  86.                 &x_str[2269],
  87.                 &x_str[2403],
  88.                 &x_str[2469],
  89.                 &x_str[2482], 
  90.                 &x_str[2542], 
  91.                 &x_str[2656],
  92.                 &x_str[2675],
  93.                 &x_str[2695], 
  94.                 &x_str[2725],
  95.                 &x_str[2769], 
  96.                 &x_str[2818], 
  97.                 &x_str[2905],
  98.                 &x_str[2964],
  99.                 &x_str[3201],
  100.                 &x_str[3210], 
  101.                 &x_str[3227], 
  102.                 &x_str[1728],
  103.                 0};
  104.  
  105. static char *arithspecial[] = {&x_str[10], &x_str[14], &x_str[8], &x_str[412],
  106.                         &x_str[849], &x_str[817], &x_str[842],
  107.                         &x_str[21], &x_str[23], &x_str[26], &x_str[3247], &x_str[33], &x_str[31], 
  108.                &x_str[2477], &x_str[2383], &x_str[2120], &x_str[2085], 
  109.                0};
  110.  
  111. static char *keyspecial[] = {&x_str[757], &x_str[1693], &x_str[1669],
  112.                         &x_str[3028], &x_str[2947], &x_str[744],
  113.                &x_str[1750], &x_str[1881], 
  114.                &x_str[2490], &x_str[2553], 
  115.                &x_str[794], 
  116.                &x_str[1444], &x_str[1483],
  117.                &x_str[1332],
  118.                &x_str[1409],
  119.                &x_str[1184],
  120.                0};
  121.  
  122. /*   The classes included in the standard prelude
  123.      also have a very concise description in bytecode representation
  124. */
  125.  
  126. static char *classpecial[] = {&x_str[38], &x_str[44], 
  127.      &x_str[70], &x_str[74], &x_str[80], &x_str[88],
  128.      &x_str[98], &x_str[103], &x_str[109], &x_str[120],
  129.      &x_str[128], &x_str[139], &x_str[145], &x_str[150],
  130.      &x_str[156], &x_str[164], &x_str[176],
  131.      &x_str[185], &x_str[201], &x_str[223], &x_str[238],
  132.      &x_str[245], &x_str[252], &x_str[270],
  133.      &x_str[290], &x_str[297],
  134.      &x_str[324], &x_str[347], &x_str[361], &x_str[368],
  135.      &x_str[386], &x_str[391],
  136.      0 };
  137.