(for COFF) default symbols to being local.

diff --git a/gas/ChangeLog b/gas/ChangeLog
index 93456eb4cf319ec3800c8e92c037e3cc20a36eee..5cf81750c2ee433c1c5f3c3c740cc17eb6c7d1c3 100644 (file)
--- a/gas/ChangeLog
+++ b/gas/ChangeLog
@@ -1,3 +1,7 @@
+2001-03-27  Nick Papadonis  <nick@coelacanth.com>
+
+       * read.c (equals): (for COFF) default symbols to being local.
+
 2001-03-27  Hans-Peter Nilsson  <hp@axis.com>
 
        * configure.in (cris-*-*): Change default emulation to criself.

diff --git a/gas/read.c b/gas/read.c
index 29ab1553a5f6e92969aa485f5eb1dbedbb205316..cb4c7e3f0e7864da69f76614a897ffb515a2d4bd 100644 (file)
--- a/gas/read.c
+++ b/gas/read.c
@@ -4863,6 +4863,12 @@ equals (sym_name, reassign)
          && S_IS_DEFINED (symbolP)
          && S_GET_SEGMENT (symbolP) != reg_section)
        as_bad (_("symbol `%s' already defined"), S_GET_NAME (symbolP));
+
+#ifdef OBJ_COFF
+      /* "set" symbols are local unless otherwise specified.  */
+      SF_SET_LOCAL (symbolP);
+#endif /* OBJ_COFF */
+
       pseudo_set (symbolP);
     }