From fada65f145ff3b6a8126c44a020f2bd40bace3cd Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Mon, 31 Mar 1997 19:27:09 +0000 Subject: [PATCH] Flush purification queue after loading an option. Otherwise, if the option creates a new environment, and that environment has state variables, the contents of those state variables will be purified at the time of the next GC. --- v7/src/runtime/option.scm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/v7/src/runtime/option.scm b/v7/src/runtime/option.scm index 8515119f4..cfe488af4 100644 --- a/v7/src/runtime/option.scm +++ b/v7/src/runtime/option.scm @@ -1,8 +1,8 @@ #| -*-Scheme-*- -$Id: option.scm,v 14.33 1995/04/29 14:09:09 adams Exp $ +$Id: option.scm,v 14.34 1997/03/31 19:27:09 cph Exp $ -Copyright (c) 1988-1994 Massachusetts Institute of Technology +Copyright (c) 1988-97 Massachusetts Institute of Technology This material was developed by the Scheme project at the Massachusetts Institute of Technology, Department of Electrical Engineering and @@ -137,6 +137,7 @@ MIT in each case. |# syntax-table/system-internal true)))))))) files) + (flush-purification-queue!) (eval init-expression environment)))) (define (library-directory-pathname name) -- 2.25.1