1 /*     BEGIN INCLUDE FILE ... dir_allocation_area.incl.pl1 ... last modified December 1973 */
 2 
 3 dcl  areap ptr;
 4 
 5 dcl 1 area based (areap) aligned,
 6     2 nsizes fixed bin (18),                                /* Number of types. */
 7     2 lu fixed bin (18),                                    /* Next available word in area. */
 8     2 lw fixed bin (18),                                    /* Last usable word. */
 9     2 array (100) aligned,                                  /* Array of types. */
10       3 fptr bit (18) unaligned,                            /* Free pointer for this size. */
11       3 size fixed bin (17) unaligned;                      /* Size. */
12 
13 /*     END INCLUDE FILE ... dir_allocation_area.incl.pl1 */