fixed to generate only external commons

1988-11-10 13:01:15 +00:00
parent f210ef4f8e
commit d6dfd5d1ad
2 changed files with 18 additions and 0 deletions
--- a/mach/sun3/ce/relocation.c
+++ b/mach/sun3/ce/relocation.c
@@ -19,6 +19,15 @@ do_local_relocation()
 	for ( rp = reloc_info; rp < relo; rp++) {
 		register struct outname *np = &symbol_table[rp->or_nami];

+		if ((np->on_type & S_COM) && ! (np->on_type & S_EXT)) {
+			long sz = np->on_valu;
+
+			switchseg(SEGBSS);
+			align_word();
+			np->on_type &= (~S_COM);
+			np->on_valu = cur_value();
+			bss(sz);
+		}
 		if ( np->on_valu  != -1 && ! (np->on_type & S_COM)) {
 			register char *sect;