1 /* BEGIN INCLUDE FILE apl_symbol_table.incl.pl1
 2 
 3    initially written 20 June 1973 by Dan Bricklin */
 4 
 5 declare
 6           initial_size fixed bin int static init(17),       /* initial size of hash table */
 7 
 8           1 symbol_table aligned based(ws_info.symbol_table_ptr),
 9              2 table_size fixed bin,                        /* how many buckets */
10              2 hash_bucket_ptr(initial_size refer(table_size)) ptr unaligned; /* the buckets */
11 
12 /* END INCLUDE FILE apl_symbol_table.incl.pl1 */