1 /* BEGIN INCLUDE FILE ... tp_person_name_table.incl.pl1 */
 2 
 3 /* Written 16-May-79 by M. N. Davidoff */
 4 
 5 /* automatic */
 6 
 7      declare pnt_ptr                pointer;
 8 
 9 /* based */
10 
11      declare 1 pnt                  aligned based (pnt_ptr),
12                2 flags              unaligned,
13                  3 initialized      bit (1),                /* on if the pnt is initialized */
14                  3 pad              bit (35),
15                2 hash_table         (PNT_HASH_TABLE_SIZE) fixed binary (17),
16                                                             /* TP_user_id hash table */
17                2 user               (MAX_TP_USERS),         /* parallels master_table.user_wakeup table */
18                  3 tp_user_id       char (32) unaligned,    /* this TP user's TP_user_id */
19                  3 encrypted_password
20                                     char (8) unaligned,     /* this TP user's encrypted password */
21                  3 next_user        fixed binary (17);      /* next TP user in hash table chain */
22 
23 /* internal static */
24 
25      declare PERSON_NAME_TABLE_NAME char (21) internal static options (constant) initial ("tp_person_name_table_");
26      declare PNT_HASH_TABLE_SIZE    fixed binary internal static options (constant) initial (523);
27 
28 /* END INCLUDE FILE ... tp_person_name_table.incl.pl1 */