diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index abad0ac46c5..35b2b645be3 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2002-05-21  NIIBE Yutaka  <gniibe@m17n.org>
+
+	* reload1.c (do_output_reload): Run delete_output_reload
+	only if optimizing.
+
 2002-05-21  Roger Sayle  <roger@eyesopen.com>
 
 	PR middle-end/6600
diff --git a/gcc/reload1.c b/gcc/reload1.c
index dca052e7497..b52c5a325d7 100644
--- a/gcc/reload1.c
+++ b/gcc/reload1.c
@@ -6909,6 +6909,7 @@ do_output_reload (chain, rl, j)
   rtx pseudo = rl->out_reg;
 
   if (pseudo
+      && optimize
       && GET_CODE (pseudo) == REG
       && ! rtx_equal_p (rl->in_reg, pseudo)
       && REGNO (pseudo) >= FIRST_PSEUDO_REGISTER