* config/obj-coff.c (obj_symbol_new_hook): Don't need to strip underscores,

since symbol_new will already have done it.
* config/obj-coffbfd.c (obj_symbol_new_hook): Ditto.

diff --git a/gas/ChangeLog b/gas/ChangeLog
index 810faf13af297270a8cfdaeaab41a627c8853602..6b85b68f14bab3cfa7692fedf5938cdfddd4c5bc 100644 (file)
--- a/gas/ChangeLog
+++ b/gas/ChangeLog
@@ -3,6 +3,10 @@ Fri Apr 22 15:17:06 1994  Ken Raeburn  (raeburn@cujo.cygnus.com)
        * listing.c (list_symbol_table): Don't print register symbols as
        undefined.
 
+       * config/obj-coff.c (obj_symbol_new_hook): Don't need to strip
+       underscores, since symbol_new will already have done it.
+       * config/obj-coffbfd.c (obj_symbol_new_hook): Ditto.
+
 Thu Apr 21 15:50:04 1994  Ian Lance Taylor  (ian@tweedledumb.cygnus.com)
 
        * config/tc-mips.c (append_insn): Permit branches to be switched

diff --git a/gas/config/obj-coff.c b/gas/config/obj-coff.c
index a6ba063bd9503834c3cd982d757a3d0b06121f35..f80fe66558c593ea4fe0a5846866565faa9a1982 100644 (file)
--- a/gas/config/obj-coff.c
+++ b/gas/config/obj-coff.c
@@ -301,16 +301,6 @@ obj_symbol_new_hook (symbolP)
   S_SET_STORAGE_CLASS (symbolP, 0);
   S_SET_NUMBER_AUXILIARY (symbolP, 0);
 
-#ifdef STRIP_UNDERSCORE
-  /* Remove leading underscore at the beginning of the symbol.
-     This is to be compatible with the standard librairies.  */
-  if (*S_GET_NAME (symbolP) == '_')
-    {
-      underscore = 1;
-      S_SET_NAME (symbolP, S_GET_NAME (symbolP) + 1);
-    }
-#endif /* STRIP_UNDERSCORE */
-
   if (S_IS_STRING (symbolP))
     SF_SET_STRING (symbolP);
   if (!underscore && S_IS_LOCAL (symbolP))

diff --git a/gas/config/obj-coffbfd.c b/gas/config/obj-coffbfd.c
index b09368ca1c39e10e043014acf4e86495b03a9429..46c2302fd1232f03f2c350b36797bb5a2609583a 100644 (file)
--- a/gas/config/obj-coffbfd.c
+++ b/gas/config/obj-coffbfd.c
@@ -697,17 +697,6 @@ obj_symbol_new_hook (symbolP)
   /* Auxiliary entries */
   memset ((char *) &symbolP->sy_symbol.ost_auxent[0], 0, AUXESZ);
 
-#ifdef STRIP_UNDERSCORE
-  /* Remove leading underscore at the beginning of the symbol.
-        * This is to be compatible with the standard librairies.
-        */
-  if (*S_GET_NAME (symbolP) == '_')
-    {
-      underscore = 1;
-      S_SET_NAME (symbolP, S_GET_NAME (symbolP) + 1);
-    }                          /* strip underscore */
-#endif /* STRIP_UNDERSCORE */
-
   if (S_IS_STRING (symbolP))
     SF_SET_STRING (symbolP);
   if (!underscore && S_IS_LOCAL (symbolP))