1           /* Include file insym.incl.pl1 */
 2 
 3 
 4 /****^  HISTORY COMMENTS:
 5   1) change(86-06-14,Elhard), approve(86-06-14,MCR7198),
 6      audit(86-06-30,Weaver), install(86-07-16,MR12.0-1094):
 7      Changed to eliminate the use of "p" as a pointer to base the structures
 8      on.
 9                                                    END HISTORY COMMENTS */
10 
11 
12 declare   1 insym aligned based,                  /* declaration of the INSYM structure */
13 
14           2 thread pointer,                       /* pointer to the next insym structure */
15           2 n_insyms fixed bin,                   /* number of insym entries */
16           (2 retained,                            /* def(s) have been retained for this component */
17           2 global_nolink) bit(1) unaligned,      /* don't prelink any reference to/from this object */
18           2 entry(1000) like is;
19 
20 declare   1 is aligned based,
21          (2 next_ext_ptr bit(18),                 /* thread to next def */
22           2 trap_ptr bit(18),                     /* trap pointer */
23           2 value bit(18),                        /* symbol's offset value */
24           2 class bit(18)) unaligned,             /* corresponding section of the object */
25           2 def_offset fixed bin(18),             /* offset of def in original def section */
26           2 symbol char(257) aligned,             /* the symbol in ACC string form */
27           2 lng fixed bin,                        /* length in chars of ACC string (incl. ACC count) */
28           2 nargs fixed bin,                      /* # of args expected by entry */
29           2 descr_ptr pointer,                    /* ptr to descriptor ptr array */
30          (2 null_entry,                           /* 1->type 3 (seg|expr) entry, no insym symbol */
31           2 snapped,                              /* 0->not referenced, 1->link snapped */
32           2 has_descr,                            /* 1->entry has valid descriptors */
33           2 entrypoint,                           /* 0->segdef, 1->entrypoint; meaningful only for standard */
34           2 retain_flag,                          /* 1->turn on retain flag; was on in original */
35           2 delete,                               /* 1->don't regenerate this def in any case */
36           2 ignore,                               /* 1->regenerate but ignore */
37           2 regenerated,                          /* this definition already regenerated */
38           2 retain,                               /* 0->don't regenerate, 1->retain definition */
39           2 no_link,                              /* don't prelink to this symbol */
40           2 duplicate) bit(1) unaligned,          /* this symbol name duplicated in another block */
41           2 defrel bit (18);                      /* offset in defs of regenerated definition */
42 
43 
44