1 /* BEGIN INCLUDE FILE linus_ready_data.incl.pl1 -- jccj 9/29/78 */
 2 
 3 dcl 1 ready_data aligned based (rd_ptr),
 4     2 mode fixed bin,
 5     2 nfiles fixed bin,
 6     2 file (rd_nfiles_init refer (ready_data.nfiles)),
 7       3 name char (32) unal,
 8       3 active bit (1) unal;
 9 
10 dcl  rd_ptr ptr;
11 dcl  rd_nfiles_init fixed bin;
12 
13 /* END INCLUDE FILE linus_ready_data.incl.pl1 */