Thu Mar 20 12:48:45 1997 Philippe De Muyter <phdm@info.ucl.ac.be>

	* config/te-delta.h (COFF_COMMON_ADDEND): Define.
	* config/obj-coff.c (fixup_segment): Check COFF_COMMON_ADDEND when
	storing the value of a common symbol.

diff --git a/gas/ChangeLog b/gas/ChangeLog
index ade49eb0919d84673ed27c37b60f14cd6483ba00..49a58c7f668252ad3d4e1d2a3c25026ee743433a 100644 (file)
--- a/gas/ChangeLog
+++ b/gas/ChangeLog
@@ -1,3 +1,9 @@
+Thu Mar 20 12:48:45 1997  Philippe De Muyter  <phdm@info.ucl.ac.be>
+
+       * config/te-delta.h (COFF_COMMON_ADDEND): Define.
+       * config/obj-coff.c (fixup_segment): Check COFF_COMMON_ADDEND when
+       storing the value of a common symbol.
+
 Wed Mar 19 11:37:57 1997  Philippe De Muyter  <phdm@info.ucl.ac.be>
 
        * config/obj-coff.c (glue_symbols): Unused variable symbolP

diff --git a/gas/config/obj-coff.c b/gas/config/obj-coff.c
index 315597cb5d20799c661e817697047526d6fec340..d23f40ec3a631ff96592ecf3669a0f50f6f2193c 100644 (file)
--- a/gas/config/obj-coff.c
+++ b/gas/config/obj-coff.c
@@ -1504,8 +1504,6 @@ s_get_segment (x)
   return SEG_INFO_FROM_SECTION_NUMBER (x->sy_symbol.ost_entry.n_scnum).seg_t;
 }
 
-
-
 /* calculate the size of the frag chain and fill in the section header
    to contain all of it, also fill in the addr of the sections */
 static unsigned int
@@ -2856,9 +2854,8 @@ glue_symbols (head, tail)
      symbolS **tail;
 {
   unsigned int symbol_number = 0;
-  symbolS *symbolP;
 
-  for (symbolP = *head; *head != NULL;)
+  while (*head != NULL)
     {
       symbolS *tmp = *head;
 
@@ -2888,15 +2885,12 @@ static unsigned int
 tie_tags ()
 {
   unsigned int symbol_number = 0;
-
   symbolS *symbolP;
-  for (symbolP = symbol_rootP; symbolP; symbolP =
-       symbol_next (symbolP))
+
+  for (symbolP = symbol_rootP; symbolP; symbolP = symbol_next (symbolP))
     {
       symbolP->sy_number = symbol_number;
 
-
-
       if (SF_GET_TAGGED (symbolP))
        {
          SA_SET_SYM_TAGNDX
@@ -2906,8 +2900,8 @@ tie_tags ()
 
       symbol_number += 1 + S_GET_NUMBER_AUXILIARY (symbolP);
     }
-  return symbol_number;
 
+  return symbol_number;
 }
 
 static void
@@ -2932,12 +2926,12 @@ crawl_symbols (h, abfd)
    * undefined symbols at the end of the list.
    */
 
+  /* Is there a .file symbol ? If not insert one at the beginning. */
   if (symbol_rootP == NULL
       || S_GET_STORAGE_CLASS (symbol_rootP) != C_FILE)
     {
       c_dot_file_symbol ("fake");
     }
-  /* Is there a .file symbol ? If not insert one at the beginning. */
 
   /*
    * Build up static symbols for the sections, they are filled in later
@@ -3606,16 +3600,9 @@ c_dot_file_symbol (filename)
   /* Make sure that the symbol is first on the symbol chain */
   if (symbol_rootP != symbolP)
     {
-      if (symbolP == symbol_lastP)
-       {
-         symbol_lastP = symbol_lastP->sy_previous;
-       }                       /* if it was the last thing on the list */
-
       symbol_remove (symbolP, &symbol_rootP, &symbol_lastP);
       symbol_insert (symbolP, symbol_rootP, &symbol_rootP, &symbol_lastP);
-      symbol_rootP = symbolP;
-    }                          /* if not first on the list */
-
+    }
 }                              /* c_dot_file_symbol() */
 
 /*
@@ -4117,11 +4104,15 @@ fixup_segment (segP, this_segment_type)
                      continue;
                    }           /* COBR */
 #endif /* TC_I960 */
-#if (defined (TC_I386) || defined (TE_LYNX) || defined (TE_AUX)) && !defined(TE_PE)
+#if ((defined (TC_I386) || defined (TE_LYNX) || defined (TE_AUX)) && !defined(TE_PE)) || defined (COFF_COMMON_ADDEND)
                  /* 386 COFF uses a peculiar format in which the
                     value of a common symbol is stored in the .text
                     segment (I've checked this on SVR3.2 and SCO
                     3.2.2) Ian Taylor <ian@cygnus.com>.  */
+                 /* This is also true for 68k COFF on sysv machines
+                    (Checked on Motorola sysv68 R3V6 and R3V7.1, and also on
+                    UNIX System V/M68000, Release 1.0 from ATT/Bell Labs)
+                    Philippe De Muyter <phdm@info.ucl.ac.be>. */
                  if (S_IS_COMMON (add_symbolP))
                    add_number += S_GET_VALUE (add_symbolP);
 #endif

diff --git a/gas/config/te-delta.h b/gas/config/te-delta.h
index 363a004ea6713b807a052ca4c216fdbb6b522bbd..be6c62c6c1be4c7ffbdf29b0f7b1c4dd9ed614a8 100644 (file)
--- a/gas/config/te-delta.h
+++ b/gas/config/te-delta.h
@@ -3,6 +3,7 @@
 #include "obj-format.h"
 
 #define COFF_NOLOAD_PROBLEM    1
+#define COFF_COMMON_ADDEND     1
 
 /* Added these, because if we don't know what we're targetting we may
    need an assembler version of libgcc, and that will use local