1 /* BEGIN INCLUDE FILE linus_ready_table.incl.pl1 -- jccj 10/10/78 */
 2 
 3 dcl 1 ready_table aligned based (rt_ptr),
 4     2 ntabs fixed bin,
 5     2 tab (ntabs_init refer (ready_table.ntabs)),
 6       3 name char (32) unal,
 7       3 active bit (1) unal;
 8 
 9 dcl  rt_ptr ptr;
10 dcl  ntabs_init fixed bin;
11 
12 /* END INCLUDE FILE linus_ready_table.incl.pl1 */