* config/tc-mips.c (s_change_sec): If not GPOPT, don't permit

	switching to the readonly data section.

diff --git a/gas/ChangeLog b/gas/ChangeLog
index 6c1c6dbc4e763b1e7f045ace04d02e659f5de88b..f66826866bc8825ccb50c3734d5ac1578f4537af 100644 (file)
--- a/gas/ChangeLog
+++ b/gas/ChangeLog
@@ -1,5 +1,8 @@
 Tue Nov  1 16:10:59 1994  Ian Lance Taylor  <ian@sanguine.cygnus.com>
 
+       * config/tc-mips.c (s_change_sec): If not GPOPT, don't permit
+       switching to the readonly data section.
+
        * ecoff.c (ecoff_directive_type): Fix warning message.
 
 Sun Oct 30 00:57:35 1994  Jeff Law  (law@snake.cs.utah.edu)

diff --git a/gas/config/tc-mips.c b/gas/config/tc-mips.c
index a6f3488ac0dc0ae3f7875d7b53adc618a8f7bb6d..c3a75657ea769fd7aec30d94c03b45318fb39783 100644 (file)
--- a/gas/config/tc-mips.c
+++ b/gas/config/tc-mips.c
@@ -5684,6 +5684,7 @@ s_change_sec (sec)
       break;
 
     case 'r':
+#ifdef GPOPT
       seg = subseg_new (RDATA_SECTION_NAME,
                        (subsegT) get_absolute_expression ());
 #ifdef OBJ_ELF
@@ -5696,6 +5697,11 @@ s_change_sec (sec)
       bfd_set_section_alignment (stdoutput, seg, 4);
 #endif
       demand_empty_rest_of_line ();
+#else /* ! defined (GPOPT) */
+      as_bad ("No read only data section in this object file format");
+      demand_empty_rest_of_line ();
+      return;
+#endif /* ! defined (GPOPT) */
       break;
 
     case 's':