1 /* BEGIN INCLUDE FILE ... dbm.incl.pl1 ... Feb 1976 */ 2 3 dcl dbm_seg$ ext; 4 dcl dbmp ptr; 5 6 dcl 1 dbm based (dbmp) aligned, 7 2 lock_data, 8 3 lock bit (36), 9 3 event bit (36), 10 3 notify bit (1), 11 2 control, 12 3 init bit (1) unal, 13 3 pad1 bit (35) unal, 14 2 stats, 15 3 sets fixed bin unal, 16 3 resets fixed bin unal, 17 3 allocs fixed bin unal, 18 3 frees fixed bin unal, 19 2 pad2 (2) bit (36), 20 2 area area (255*1024 -8); 21 22 /* END INCLUDE FILE ... dbm.incl.pl1 */