1 /* Begin include file . . . lsm_node_types.incl.pl1 */
 2 
 3 /* Integer types corresponding to different lsm_ node times */
 4 
 5 dcl (indirect_type init (1),                                /* internal to lsm_; used for forwarding references */
 6                                                             /* to a node whose storage space has increased */
 7      fixed_type init (2),                                   /* array of fixed bin (35) aligned values */
 8      float_type init (3),                                   /* array of float bin (27) aligned values */
 9      bit_type init (4),                                     /* bit string */
10      char_type init (5),                                    /* character string */
11      symtab_type init (6),                                  /* symbol table */
12      symbol_type init (7),                                  /* symbol (name node + value node) */
13      list_type init (8),                                    /* non-terminal list type */
14      array_type init (9),                                   /* terminal array (like list) */
15      type_max init (9))                                     /* maximum legal node type code */
16      fixed bin (4) internal static;
17 
18 /* End include file . . . lsm_node_types.incl.pl1 */