diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index a3a0f8b0ea9a..aa978e60cc43 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2009-09-04  Andreas Krebbel  <krebbel1@de.ibm.com>
+
+	* config/s390/s390.md ("*fmadd<mode>", "*fmsub<mode>"): Enable mem
+	RTXs in the predicate for operand 1.
+
 2009-09-03  Daniel Gutson  <dgutson@codesourcery.com>
 
 	* config/arm/arm.md (UNSPEC_RBIT): New constant.
diff --git a/gcc/config/s390/s390.md b/gcc/config/s390/s390.md
index 0a4361ff2675..a5bddfb1af24 100644
--- a/gcc/config/s390/s390.md
+++ b/gcc/config/s390/s390.md
@@ -5286,8 +5286,8 @@
 ; madbr, maebr, maxb, madb, maeb
 (define_insn "*fmadd<mode>"
   [(set (match_operand:DSF 0 "register_operand" "=f,f")
-	(plus:DSF (mult:DSF (match_operand:DSF 1 "register_operand" "%f,f")
-			    (match_operand:DSF 2 "nonimmediate_operand"  "f,R"))
+	(plus:DSF (mult:DSF (match_operand:DSF 1 "nonimmediate_operand" "%f,f")
+			    (match_operand:DSF 2 "nonimmediate_operand" "f,R"))
 		 (match_operand:DSF 3 "register_operand" "0,0")))]
   "TARGET_HARD_FLOAT && TARGET_FUSED_MADD"
   "@
@@ -5299,8 +5299,8 @@
 ; msxbr, msdbr, msebr, msxb, msdb, mseb
 (define_insn "*fmsub<mode>"
   [(set (match_operand:DSF 0 "register_operand" "=f,f")
-	(minus:DSF (mult:DSF (match_operand:DSF 1 "register_operand" "f,f")
-			     (match_operand:DSF 2 "nonimmediate_operand"  "f,R"))
+	(minus:DSF (mult:DSF (match_operand:DSF 1 "nonimmediate_operand" "f,f")
+			     (match_operand:DSF 2 "nonimmediate_operand" "f,R"))
 		 (match_operand:DSF 3 "register_operand" "0,0")))]
   "TARGET_HARD_FLOAT && TARGET_FUSED_MADD"
   "@