1 
 2 
 3 /* STATIC DATA */
 4 
 5 dcl 1 fixdef static aligned,
 6      2 wd1 fixed bin(35) aligned,
 7      2 wd2 fixed bin(35) aligned;
 8 
 9 
10 
11 /* EXTERNAL ENTRY NAMES */
12 
13                     dcl ioa_$rsnnl entry options(variable);
14                     dcl signal_ entry(char(*),ptr,ptr);
15                     dcl cobol_reset_r$in_line entry;
16 
17 /* BUILTIN FUNCTIONS */
18 
19                     dcl (null,addrel,substr,addr,fixed,unspec,max) builtin;
20 
21 %include cobol_fixup_value;
22 %include cobol_fixup_tables;
23 %include cobol_error_info;
24 %include cobol_;
25 %include cobol_ext_;
26