1 /* BEGIN INCLUDE FILE comp_htab.incl.pl1 */ 2 3 dcl 1 htab aligned based (shared.htab_ptr), /* horizontal tab pattern tables */ 4 2 count fixed bin, /* number of defined patterns */ 5 2 chars char (32) varying, /* active htab characters */ 6 2 pats (32) fixed (8) unaligned, /* pattern index for each char above */ 7 2 pattern (0:20), /* up to 20 patterns + one-shot */ 8 3 name char (32), /* pattern name */ 9 3 count fixed bin, /* number of tab stops */ 10 3 stop (20) fixed bin (31),/* tab stop values */ 11 3 fill (20) char (32) varying; /* fill string */ 12 13 /* END INCLUDE FILE comp_htab.cinl.pl1 */