diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index aa586a254bd..d326aebcf14 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,5 +1,7 @@
 2002-06-18  Alan Modra  <amodra@bigpond.net.au>
 
+	* config/ia64/ia64.md (doloop_end_internal): Correct rtl.
+
 	* doloop.c (doloop_optimize): Extract pattern from insn.
 
 2002-06-17  Matt Kraai  <kraai@alumni.cmu.edu>
diff --git a/gcc/config/ia64/ia64.md b/gcc/config/ia64/ia64.md
index 0dd4487967b..ecb80329cc2 100644
--- a/gcc/config/ia64/ia64.md
+++ b/gcc/config/ia64/ia64.md
@@ -4284,8 +4284,8 @@
 		(label_ref (match_operand 1 "" ""))
 		(pc)))
    (set (match_dup 0) (if_then_else:DI (ne (match_dup 0) (const_int 0))
-			 (match_dup 0)
-			 (plus:DI (match_dup 0) (const_int -1))))]
+			 (plus:DI (match_dup 0) (const_int -1))
+			 (match_dup 0)))]
   ""
   "br.cloop.sptk.few %l1"
   [(set_attr "itanium_class" "br")