1 /* BEGIN INCLUDE FILE ... entry_sequence_info.incl.pl1 */
 2 
 3 
 4 
 5 /****^  HISTORY COMMENTS:
 6   1) change(86-04-16,GWMay), approve(86-04-16,MCR7373),
 7      audit(86-04-29,LJAdams), install(86-05-01,MR12.0-1051):
 8      reformatted.
 9                                                    END HISTORY COMMENTS */
10 
11 
12 /* coded 5/75 by M. Weaver */
13 /* changed 5/79 by G. Dixon to include entry_desc_info */
14 
15        dcl  1 parm_desc_ptrs            aligned based,
16               2 n_args                  fixed bin(18) unsigned unaligned,
17               2 descriptor_relp (num_descs refer(parm_desc_ptrs.n_args))
18                                         bit(18) unaligned;
19 
20        dcl  num_descs                   fixed bin(18);
21 
22        dcl  1 entry_sequence            aligned based,
23             2 word1,
24               3 descr_relp_offset       bit(18) unaligned,  /* offset of parm_desc_ptrs structure */
25               3 reserved                bit(18) unaligned,
26             2 word2,
27               3 def_relp                bit(18) unaligned,  /* offset of entry's definition       */
28               3 flags                   unaligned like entry_desc_info.flags,
29             2 code_sequence             bit(36) aligned;
30 
31 %include entry_desc_info;
32 
33 /* END INCLUDE FILE ... entry_sequence_info.incl.pl1 */