From 2388d9af3e7d43e93c690e2c9f344a2a51b1513c Mon Sep 17 00:00:00 2001
From: Kevin Ryde <user42@zip.com.au>
Date: Sun, 17 Aug 2003 00:40:59 +0000
Subject: [PATCH] *** empty log message ***

---
 ice-9/ChangeLog      | 5 +++++
 test-suite/ChangeLog | 5 +++++
 2 files changed, 10 insertions(+)

diff --git a/ice-9/ChangeLog b/ice-9/ChangeLog
index 5ce4226db..e5a51af18 100644
--- a/ice-9/ChangeLog
+++ b/ice-9/ChangeLog
@@ -1,3 +1,8 @@
+2003-08-17  Kevin Ryde  <user42@zip.com.au>
+
+	* boot-9.scm (while): Use a new key dynamically for each loop, so
+	break and continue associate to their loop even when recursing.
+
 2003-08-14  Kevin Ryde  <user42@zip.com.au>
 
 	* boot-9.scm (while): Rewrite, continue as proper escape, break
diff --git a/test-suite/ChangeLog b/test-suite/ChangeLog
index de576426f..b2fa5bc00 100644
--- a/test-suite/ChangeLog
+++ b/test-suite/ChangeLog
@@ -1,3 +1,8 @@
+2003-08-17  Kevin Ryde  <user42@zip.com.au>
+
+	* tests/syntax.test (while): Exercise break and continue from
+	recursive nested loops.
+
 2003-08-14  Kevin Ryde  <user42@zip.com.au>
 
 	* tests/syntax.test (while): New tests.