diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index f48bb653ac1..f9159a5107f 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,7 @@
+2001-04-22  Mark Mitchell  <mark@codesourcery.com>
+
+	* loop.c (loop_delete_insns): Add prototype.
+
 2001-04-23  Phil Edwards  <pme@sources.redhat.com>
 
 	* configure.in:  Remove ENABLE_STD_NAMESPACE.
diff --git a/gcc/loop.c b/gcc/loop.c
index 965f6efa3eb..84c070b3af9 100644
--- a/gcc/loop.c
+++ b/gcc/loop.c
@@ -258,6 +258,7 @@ static rtx loop_call_insn_hoist PARAMS((const struct loop *, rtx));
 static rtx loop_insn_sink_or_swim PARAMS((const struct loop *, rtx));
 
 static void loop_dump_aux PARAMS ((const struct loop *, FILE *, int));
+static void loop_delete_insns PARAMS ((rtx, rtx));
 void debug_ivs PARAMS ((const struct loop *));
 void debug_iv_class PARAMS ((const struct iv_class *));
 void debug_biv PARAMS ((const struct induction *));