From f823f7e774ec6fbb24bb713d5f88a50ec2bf5404 Mon Sep 17 00:00:00 2001
From: Marius Vollmer <mvo@zagadka.de>
Date: Fri, 4 Oct 2002 13:09:30 +0000
Subject: [PATCH] (top-repl): Use "1" instead of "%deliver-signals" to limit
 the signal stack.

---
 ice-9/boot-9.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ice-9/boot-9.scm b/ice-9/boot-9.scm
index 81b3ee3bb..6e6f1e1fb 100644
--- a/ice-9/boot-9.scm
+++ b/ice-9/boot-9.scm
@@ -2872,7 +2872,7 @@
 				    ;; Make a backup copy of the stack
 				    (fluid-set! before-signal-stack
 						(fluid-ref the-last-stack))
-				    (save-stack %deliver-signals)
+				    (save-stack 1)
 				    (scm-error 'signal
 					       #f
 					       msg