1 /* Beginning of INCLUDE file dart_catalog_entry.incl.pl1 */ 2 3 declare 4 1 dart_catalog_entry aligned based(entry_ptr), 5 2 in_use bit(1) aligned, /* indicates entry is active */ 6 2 nsrch_for_here fixed bin aligned, /* number of searches for this entry */ 7 2 suffix char(8) aligned, /* .basic or .algol or .whatever (without the dot) */ 8 2 name char(8) aligned, /* file name */ 9 2 password char(8) aligned, /* file password */ 10 2 access aligned, /* two 18 bit access fields */ 11 3 without_password bit(18) unal, 12 3 with_password bit(18) unal, 13 2 preference fixed bin(35) aligned, /* 5 = saved files 3 = catalogs */ 14 2 dates bit(36) aligned, /* DTM and DTU for dartmouth get info from hcs_$status */ 15 2 word_count fixed bin(35) aligned; 16 17 18 /* End of INCLUDE file dart_catalog_entry.incl.pl1 */