* config/tc-ppc.c (ppc_csect): An unnamed csect is storage class

	XMC_PR.

diff --git a/gas/ChangeLog b/gas/ChangeLog
index f684fe96c1876d3be05cfd592c45eeff13fa8e73..07e8663faf5f3a308bffaf75c92d6a0e06bf4ac4 100644 (file)
--- a/gas/ChangeLog
+++ b/gas/ChangeLog
@@ -1,3 +1,8 @@
+Mon Jan 22 11:53:00 1996  Ian Lance Taylor  <ian@cygnus.com>
+
+       * config/tc-ppc.c (ppc_csect): An unnamed csect is storage class
+       XMC_PR.
+
 Mon Jan 22 10:59:48 1996  Michael Meissner  <meissner@tiktok.cygnus.com>
 
        * config/obj-elf.c (elf/ppc.h): Include elf/ppc.h if target

diff --git a/gas/config/tc-ppc.c b/gas/config/tc-ppc.c
index 6a0714a99ea89538bde18ef841dcf828224035b2..6158c3dc96c060751d40cb5a3a2c6d0a418101f4 100644 (file)
--- a/gas/config/tc-ppc.c
+++ b/gas/config/tc-ppc.c
@@ -2028,6 +2028,12 @@ ppc_csect (ignore)
 
   *input_line_pointer = endc;
 
+  if (S_GET_NAME (sym)[0] == '\0')
+    {
+      /* An unnamed csect is assumed to be [PR].  */
+      sym->sy_tc.class = XMC_PR;
+    }
+
   ppc_change_csect (sym);
 
   if (*input_line_pointer == ',')