|
@@ -4,7 +4,7 @@
|
|
|
|
|
|
/* Written to run on SUN, and generate code for SUN */
|
|
|
|
|
|
-extern long _base_address[];
|
|
|
+extern long B_base_address[];
|
|
|
|
|
|
do_local_relocation()
|
|
|
{
|
|
@@ -12,9 +12,9 @@ do_local_relocation()
|
|
|
|
|
|
/* print( "n relocation records %d\n", relo - reloc_info); */
|
|
|
|
|
|
- _base_address[SEGTXT] = 0;
|
|
|
- _base_address[SEGCON] = text - text_area;
|
|
|
- _base_address[SEGBSS] = _base_address[SEGCON] + data - data_area;
|
|
|
+ B_base_address[SEGTXT] = 0;
|
|
|
+ B_base_address[SEGCON] = text - text_area;
|
|
|
+ B_base_address[SEGBSS] = B_base_address[SEGCON] + data - data_area;
|
|
|
for ( rp = reloc_info; rp < relo; rp++) {
|
|
|
register struct outname *np = &symbol_table[rp->or_nami];
|
|
|
|
|
@@ -37,7 +37,7 @@ do_local_relocation()
|
|
|
if ( rp->or_type & RELO4)
|
|
|
*((long *)(sect+rp->or_addr)) +=
|
|
|
np->on_valu +
|
|
|
- _base_address[(np->on_type&S_TYP)-S_MIN];
|
|
|
+ B_base_address[(np->on_type&S_TYP)-S_MIN];
|
|
|
else
|
|
|
fprint( STDERR,
|
|
|
"do_relo() : bad relocation size\n");
|