1 /* --------------- BEGIN include file ge_macro_info.incl.pl1 --------------- */
 2 
 3 dcl 1 macro_info based,
 4     2 n_args fixed bin,
 5     2 x (n_macro_args refer (macro_info.n_args)),
 6       3 argument char (32) varying,
 7       3 replacement char (1020) varying;
 8 
 9 dcl  replacement_string_size fixed bin static initial (1020) options (constant);
10 
11 dcl 1 based_varying_string aligned based,
12     2 somelength fixed bin (35),
13     2 string char (0 refer (somelength)) aligned;
14 
15 dcl  n_macro_args fixed bin;
16 
17 dcl  macro_def char (200) varying;
18 
19 dcl  macro_info_p pointer;
20 
21 dcl  based_macro_bits bit (macro_bits_l) based (macro_bits_p),
22      macro_bits_p pointer,
23      macro_bits_l fixed bin;
24 
25 dcl  based_macro_arg char (32) based;
26 
27 /* ---------------- END include file ge_macro_info.incl.pl1 ---------------- */