1 /* BEGIN INCLUDE FILE linus_char_argl.incl.pl1 -- jaw 2/11/77 */ 2 3 /* HISTORY: 4 5 82-02-05 Paul W. Benjamin: Changed arg_len to fixed bin (21). 6 7 */ 8 9 dcl 1 char_argl aligned based (ca_ptr), /* structure for general char. arg. list */ 10 2 nargs fixed bin, /* number of args */ 11 2 arg (nargs_init refer (char_argl.nargs)), 12 3 arg_ptr ptr, /* ptr to first char. of arg */ 13 3 arg_len fixed bin (21); /* no. of chars. in arg */ 14 15 dcl ca_ptr ptr; 16 dcl nargs_init fixed bin; 17 18 /* END INCLUDE FILE linus_char_argl.incl.pl1 */