From: Chris Hanson <org/chris-hanson/cph>
Date: Tue, 24 Aug 1993 06:07:52 +0000 (+0000)
Subject: Add fixed-objects slot to contain Edwin data structure describing
X-Git-Tag: 20090517-FFI~7997
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=13c4c0a302f94cd25b19d6471edf546d7d43eed9;p=mit-scheme.git

Add fixed-objects slot to contain Edwin data structure describing
files that might need to be saved.  Initialize this slot to '().
---

diff --git a/v7/src/microcode/boot.c b/v7/src/microcode/boot.c
index 26bf64b1f..2fbca582f 100644
--- a/v7/src/microcode/boot.c
+++ b/v7/src/microcode/boot.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Id: boot.c,v 9.83 1993/08/21 01:45:16 gjr Exp $
+$Id: boot.c,v 9.84 1993/08/24 06:07:52 cph Exp $
 
 Copyright (c) 1988-1993 Massachusetts Institute of Technology
 
@@ -220,6 +220,7 @@ DEFUN_VOID (make_fixed_objects_vector)
     (fixed_objects_vector, Dummy_History, (initialize_history ()));
   FAST_VECTOR_SET (fixed_objects_vector, State_Space_Tag, SHARP_T);
   FAST_VECTOR_SET (fixed_objects_vector, Bignum_One, (long_to_bignum (1)));
+  FAST_VECTOR_SET (fixed_objects_vector, FIXOBJ_EDWIN_AUTO_SAVE, EMPTY_LIST);
 
   (*Free++) = EMPTY_LIST;
   (*Free++) = EMPTY_LIST;