1 /* BEGIN INCLUDE FILE ..... macro.incl.pl1 ..... 03/03/77 J Falksen */ 2 3 dcl 1 argl (24), /* argument list */ 4 2 p ptr, /* pointer to string */ 5 2 l fixed bin; /* length of string */ 6 7 dcl macro_ entry (char (32) var, char (32) var, char (32) var, ptr, 8 fixed bin (24), ptr, fixed bin, char (1000) var, ptr, 9 fixed bin (35)); 10 dcl macro_$expand entry (char (32) var, char (32) var, char (32) var, ptr, 11 fixed bin (24), ptr, fixed bin, char (1000) var, ptr, 12 fixed bin (24), fixed bin (35)); 13 14 /* END INCLUDE FILE ..... macro.incl.pl1 ..... */