rs6000.md (cmptf_internal2): Correct comparison.

	* config/rs6000/rs6000.md (cmptf_internal2): Correct comparison.

From-SVN: r157732

gcc/ChangeLog

+2010-03-26  Alan Modra  <amodra@gmail.com>
+
+	* config/rs6000/rs6000.md (cmptf_internal2): Correct comparison.
+
 2010-03-25  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
 
 	* doc/tm.texi (Sections): Document TLS_COMMON_ASM_OP,

gcc/config/rs6000/rs6000.md

@@ -12814,7 +12814,7 @@
    (set (match_dup 10) (minus:DF (match_dup 5) (match_dup 7)))
    (set (match_dup 9) (minus:DF (match_dup 6) (match_dup 8)))
    (set (match_dup 9) (plus:DF (match_dup 10) (match_dup 9)))
-   (set (match_dup 0) (compare:CCFP (match_dup 7) (match_dup 4)))
+   (set (match_dup 0) (compare:CCFP (match_dup 9) (match_dup 4)))
    (match_dup 12)]
 {
   REAL_VALUE_TYPE rv;