From a5be27cd2433f359a5defc4366c70780f8b2be32 Mon Sep 17 00:00:00 2001 From: Mikael Djurfeldt Date: Mon, 25 Aug 1997 15:07:18 +0000 Subject: [PATCH] * session.scm (apropos-internal): Musn't initialize symbol accumulator with a constant pair. That led to mutation of the source! --- ice-9/ChangeLog | 6 ++++++ ice-9/session.scm | 2 +- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/ice-9/ChangeLog b/ice-9/ChangeLog index 24dbd3f8c..d271db27d 100644 --- a/ice-9/ChangeLog +++ b/ice-9/ChangeLog @@ -1,3 +1,9 @@ +Mon Aug 25 16:15:55 1997 Mikael Djurfeldt + + * session.scm (apropos-internal): Musn't initialize symbol + accumulator with a constant pair. That led to mutation of the + source! + Sun Aug 24 01:03:10 1997 Mikael Djurfeldt * session.scm (vector-for-each): Removed. diff --git a/ice-9/session.scm b/ice-9/session.scm index 262eb82a3..f37b1f548 100644 --- a/ice-9/session.scm +++ b/ice-9/session.scm @@ -88,7 +88,7 @@ (modules (cons (current-module) (module-uses (current-module)))) (recorded (make-vector 61 '())) - (vars '(#f))) + (vars (cons '() '()))) (let ((last vars)) (for-each (lambda (module)