1 /* Begin include file alm_prototypes.incl.pl1. */
 2 /* Edited from several separate files, 4 November 1970, R H Campbell. */
 3 /* Added prototypes for new call/save/return sequence and new object segment format, 27 March 1972, R F Mabee. */
 4 /* Last modified on 06/13/72 at 07:43:47 by R F Mabee. */
 5 
 6  declare  1 eb_data_$mxpro external,                        /* Impure. */
 7             2 nmxpro fixed bin (26),
 8             2 mxpro (2) fixed bin (26);
 9 
10  declare  1 eb_data_$slcall external,                       /* Impure. */
11             2 nslcal fixed bin (26),
12             2 slcall (5) fixed bin (26);
13 
14  declare  1 eb_data_$new_slcall external,                   /* Impure. */
15             2 new_nslcal fixed bin (26),
16             2 new_slcall (5) fixed bin (26);
17 
18  declare  1 eb_data_$mxcall external,                       /* Impure. */
19             2 nmxcal fixed bin (26),
20             2 mxcall (11) fixed bin (26);
21 
22  declare  1 eb_data_$mxclbk external,                       /* Impure. */
23             2 nmxclb fixed bin (26),
24             2 mxclbk (7) fixed bin (26);
25 
26  declare  1 eb_data_$mxsave external,                       /* Pure. */
27             2 nmsav fixed bin (26),
28             2 mxsave (2) fixed bin (26);
29 
30  declare  1 eb_data_$slsave external,                       /* Impure. */
31             2 nslsav fixed bin (26),
32            2 slsave (6) fixed bin (26);
33 
34  declare  1 eb_data_$new_slsave external,                   /* Impure. */
35             2 new_nslsav fixed bin (26),
36             2 new_slsave (6) fixed bin (26);
37 
38  declare  1 eb_data_$retlst external,                       /* Pure. */
39             2 nretls fixed bin (26),
40             2 retlst (3) fixed bin (26);
41 
42  declare  1 eb_data_$new_retlst external,                   /* Pure. */
43             2 new_nretls fixed bin (26),
44             2 new_retlst (3) fixed bin (26);
45 
46  declare  1 eb_data_$short_retlst external,                 /* Pure. */
47             2 short_nretls fixed bin (26),
48             2 short_retlst (3) fixed bin (26);
49 
50  declare  1 eb_data_$new_entlst external,                   /* Impure. */
51             2 new_nentls  fixed bin (26),
52             2 new_entlst (5) fixed bin (26);
53 
54  declare  1 eb_data_$ertlst external,                       /* Impure. */
55             2 nertls fixed bin (26),
56             2 ertlst (11) fixed bin (26);
57 
58  declare  1 eb_data_$short_slcall external,                 /* Impure. */
59             2 short_nslcal fixed bin (26),
60             2 short_slcall (6) fixed bin (26);
61 
62  declare  1 eb_data_$new_getlp external,                    /* Pure. */
63             2 new_ngetlp fixed bin (26),
64             2 new_getlp (5) fixed bin (26);
65 
66 
67  declare  1 eb_data_$relocn external,                       /* Impure. */
68             2 mxpbit (2) fixed bin (26),
69             2 nslbit (5) fixed bin (26),
70             2 mxcbit (11) fixed bin (26),
71             2 mxlbit (7) fixed bin (26),
72             2 mxsbit (2) fixed bin (26),
73             2 mslbit (6) fixed bin (26),
74             2 mrtbit (3)  fixed bin (26),
75             2 merbit (11) fixed bin (26),
76             2 new_mrtbit (3) fixed bin (26),
77             2 new_mslbit (6) fixed bin (26),
78             2 new_nslbit (10) fixed bin (26),
79            2 short_mrtbit (3)  fixed bin (26),
80             2 new_entbit (5) fixed bin (26),
81             2 short_nslbit (6) fixed bin (26),
82             2 new_getbit (5) fixed bin (26);
83 
84 /* End of include file alm_prototypes.incl.pl1. */