From: ceriel <none@none>
Date: Thu, 30 Mar 1989 14:36:07 +0000 (+0000)
Subject: fix: initialize relocation records properly: some fields that are
X-Git-Tag: release-5-5~2478
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=f1c6de0f1f2ddc2a89959afb463d8607deb40cad;p=ack.git

fix: initialize relocation records properly: some fields that are
not used on SunOs 3.5 are used on SunOs 4.0
---

diff --git a/mach/sun3/ce/output.c b/mach/sun3/ce/output.c
index 7835684b6..92231abd5 100644
--- a/mach/sun3/ce/output.c
+++ b/mach/sun3/ce/output.c
@@ -189,6 +189,7 @@ register struct relocation_info *u_relo;
 {
 	int retval = 1;
 
+	*(((int *) u_relo)+1) = 0;
 	u_relo->r_address = a_relo->or_addr;
 	u_relo->r_symbolnum = a_relo->or_nami;
 	u_relo->r_pcrel = (a_relo->or_type & RELPC) >> 3;
@@ -196,8 +197,6 @@ register struct relocation_info *u_relo;
 	if ( symbol_table[ a_relo->or_nami].on_valu == -1 ||
 	     (symbol_table[ a_relo->or_nami].on_type & S_COM)) 
 		u_relo->r_extern = 1;
-	else  
-		u_relo->r_extern = 0;
 	if ( u_relo->r_extern == 0) {
 		switch ( (symbol_table[ a_relo->or_nami].on_type & S_TYP) - S_MIN) {
 			case SEGTXT : u_relo->r_symbolnum = N_TEXT;