diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 798055d13f24..0366ffb0e3ec 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2001-11-05  Geoffrey Keating  <geoffk@redhat.com>
+
+	* config/rs6000/rs6000.c (rs6000_select_section): Handle
+	CONSTRUCTORs _correctly_.
+
 2001-11-05  Neil Booth  <neil@cat.daikokuya.demon.co.uk>
 
 	* c-decl.c (delete_block): Remove.
diff --git a/gcc/config/rs6000/rs6000.c b/gcc/config/rs6000/rs6000.c
index 6be9db72a959..3c7b2c0a3701 100644
--- a/gcc/config/rs6000/rs6000.c
+++ b/gcc/config/rs6000/rs6000.c
@@ -8313,9 +8313,8 @@ rs6000_select_section (decl, reloc)
 		&& TREE_CONSTANT (DECL_INITIAL (decl)));
   else if (TREE_CODE (decl) == CONSTRUCTOR)
     readonly = (! (flag_pic && reloc)
-		&& TREE_READONLY (decl)
 		&& ! TREE_SIDE_EFFECTS (decl)
-		&& TREE_CONSTANT (DECL_INITIAL (decl)));
+		&& TREE_CONSTANT (decl));
   else
     readonly = 1;
   if (needs_sdata && rs6000_sdata != SDATA_EABI)