1 /**** START OF: bindext.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): 7 Added declarations for bx_$caller and bx_$temp_bsegp. 8 END HISTORY COMMENTS */ 9 10 /* DECLARATION OF BINDER'S MAIN DATABASE */ 11 12 /* include file bindext.incl.pl1 */ 13 14 /* Modified Sept 1978 by David Spector for using "get_temp_segment_" in temp_mgr_ */ 15 /* Modified Dec 1978 by David Spector for making repatch table automatically extensible */ 16 /* Modified 01/15/81 W. Olin Sibert for new options */ 17 18 declare bx_$vers_name char (168) aligned external; /* ASCII version name, in ACC form */ 19 declare bx_$vers_number fixed bin external; /* integer part of version number */ 20 declare bx_$size fixed bin external; /* size of main data base, for resetting */ 21 declare bx_$snt_limit fixed bin external; /* preset limit for segname table */ 22 declare bx_$oddname_limit fixed bin external; /* preset limit for oddname table */ 23 declare bx_$stringmap_limit fixed bin external; /* preset limit for stringmap table */ 24 declare bx_$addname_limit fixed bin external; /* preset limit for addname table */ 25 declare bx_$area_begin fixed bin (18) external; /* beginning of main data base */ 26 declare bx_$ctp pointer external; /* pointer to component table */ 27 declare bx_$freep pointer external; /* pointer to beginning of free area */ 28 declare bx_$isp pointer external; /* pointer to first insym table */ 29 declare bx_$inpp pointer external; /* pointer to binder's input structure */ 30 declare bx_$bsegp pointer external; /* pointer to base of new object segment */ 31 declare bx_$temp pointer external; /* pointer to threaded list of temp segments */ 32 declare bx_$optp pointer external; /* pointer to options table */ 33 declare bx_$odnp pointer external; /* pointer to oddname table */ 34 declare bx_$first_rptp pointer external; /* pointer to first chunk of repatch table */ 35 declare bx_$last_rptp pointer external; /* pointer to current chunk of threaded repatch table */ 36 declare bx_$adnp pointer external; /* pointer to addname table */ 37 declare bx_$bindmap_def pointer external; /* pointer to new object's "bind_map" definition */ 38 declare bx_$bdefp pointer external; /* pointer to new object's definition section */ 39 declare bx_$bstatp pointer external; /* pointer to new object's static section */ 40 declare bx_$blnkp pointer external; /* pointer to new object's linkage section */ 41 declare bx_$bsymp pointer external; /* pointer to new object's symbol section */ 42 declare bx_$sntp pointer external; /* pointer to segname table */ 43 declare bx_$tdefp pointer external; /* pointer to temporary new definition section */ 44 declare bx_$tintp pointer external; /* pointer to temporary new internal static */ 45 declare bx_$tlinkp pointer external; /* pointer to temporary new linkage section */ 46 declare bx_$strmp pointer external; /* pointer to stringmap table */ 47 declare bx_$n_firstrefs fixed bin external; /* count of components with firstref traps */ 48 declare bx_$bound_segname char (32) aligned external; /* name of new bound object */ 49 declare bx_$fatal_error fixed bin external; /* 1 -> fatal error was detected */ 50 declare bx_$bseg_acinfop pointer external; /* new object's acinfop for "tssi_" */ 51 declare bx_$bseg_bitcount fixed bin (24) external; /* new object's bitcount */ 52 declare bx_$o_lng fixed bin (19) external; /* length of new bound object */ 53 declare bx_$t_lng fixed bin (18) external; /* length of new text section */ 54 declare bx_$d_lng fixed bin (18) external; /* length of new definition section */ 55 declare bx_$i_lng fixed bin external; /* length of new static section */ 56 declare bx_$l_lng fixed bin external; /* length of new linkage section */ 57 declare bx_$s_lng fixed bin (18) external; /* length of new symbol section */ 58 declare bx_$addname fixed bin external; /* 1 -> addname option specified */ 59 declare bx_$debug fixed bin external; /* 1 -> debug option was specified */ 60 declare bx_$brief fixed bin external; /* 1 -> brief option was specified */ 61 declare bx_$force_order fixed bin external; /* 1 -> -force_order specified on command line */ 62 declare bx_$has_sep_stat fixed bin external; /* 1 -> a comp has nonzero sep static */ 63 declare bx_$has_comb_stat fixed bin external; /* 1 -> a comp has nonzero combined static */ 64 declare bx_$bound_sep_stat fixed bin external; /* 1 -> bound segment has separate static */ 65 declare bx_$perprocess_static fixed bin external; /* 1 -> bound segment has perprocess static switch on */ 66 declare bx_$standard fixed bin external; /* 1 -> bound seg is in standard format */ 67 declare bx_$bproc fixed bin external; /* 1 -> at least one component is a procedure */ 68 declare bx_$textlng fixed bin (18) external; /* length of new pure text portion */ 69 declare bx_$curdeflng fixed bin (18) external; /* current length of new definition section */ 70 declare bx_$tintlng fixed bin external; /* current length of new internal static */ 71 declare bx_$maxlinklng fixed bin external; /* maximum size linkage section may attain */ 72 declare bx_$maxdeflng fixed bin (18) external; /* maximum size definition section may attain */ 73 declare bx_$tlinklng fixed bin external; /* current size of linkage section */ 74 declare bx_$ncomp fixed bin external; /* number of component objects to be bound */ 75 declare bx_$v_lng fixed bin external; /* length of version name string */ 76 declare bx_$n_lng fixed bin external; /* length of bound segment name string */ 77 declare bx_$nsymdefs fixed bin external; /* count of non-null symbol definitions */ 78 declare bx_$nsegdefs fixed bin external; /* count of non-null segment name definitions */ 79 declare bx_$temp_bsegp ptr external; /* pointer to the temporary bound seg in the process dir */ 80 declare bx_$caller char (32) aligned external; /* name of the caller of bind_ for error messages */ 81 82 /**** END OF: bindext.incl.pl1 * * * * * */