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/fixobj.h b/v7/src/microcode/fixobj.h
index 263f9ea1bf7657dc71fd6f4903c9ff52faae3363..8b8fc9fa6f669b381110ff472817b76cab2c8659 100644 (file)
--- a/v7/src/microcode/fixobj.h
+++ b/v7/src/microcode/fixobj.h
@@ -1,8 +1,8 @@
 /* -*-C-*-
 
-$Id: fixobj.h,v 9.32 1993/06/29 22:53:50 cph Exp $
+$Id: fixobj.h,v 9.33 1993/08/23 22:25:54 cph Exp $
 
-Copyright (c) 1987-91 Massachusetts Institute of Technology
+Copyright (c) 1987-93 Massachusetts Institute of Technology
 
 This material was developed by the Scheme project at the Massachusetts
 Institute of Technology, Department of Electrical Engineering and
@@ -52,7 +52,7 @@ MIT in each case. */
 #define FIXOBJ_SYSTEM_CALL_ERRORS      0x0A    /* System call error -> name */
 #define GC_Daemon              0x0B    /* Procedure to run after GC. */
 #define Trap_Handler           0x0C    /* Abort after disaster. */
-/* UNUSED slot                 0x0D */
+#define FIXOBJ_EDWIN_AUTO_SAVE 0x0D    /* Files to save if fatal error. */
 #define Stepper_State          0x0E    /* UNUSED in CScheme. */
 #define Fixed_Objects_Slots    0x0F    /* Names of these slots. */
 /* UNUSED slot                 0x10 used to be

diff --git a/v7/src/microcode/utabmd.scm b/v7/src/microcode/utabmd.scm
index cab92716393fb8067d2e88e99432c11b8821f0ee..90cac649e724f64b414b7867dce3e0a9b3309641 100644 (file)
--- a/v7/src/microcode/utabmd.scm
+++ b/v7/src/microcode/utabmd.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;; $Id: utabmd.scm,v 9.67 1993/06/29 21:37:05 cph Exp $
+;;; $Id: utabmd.scm,v 9.68 1993/08/23 22:30:08 cph Exp $
 ;;;
 ;;;    Copyright (c) 1987-1993 Massachusetts Institute of Technology
 ;;;
@@ -70,7 +70,7 @@
               SYSTEM-CALL-ERRORS                       ;0A
               GC-DAEMON                                ;0B
               TRAP-HANDLER                             ;0C
-              #F                                       ;0D
+              EDWIN-AUTO-SAVE                          ;0D
               STEPPER-STATE                            ;0E
               MICROCODE-FIXED-OBJECTS-SLOTS            ;0F
               #F                                       ;10
@@ -702,4 +702,4 @@
 
 ;;; This identification string is saved by the system.
 
-"$Id: utabmd.scm,v 9.67 1993/06/29 21:37:05 cph Exp $"
\ No newline at end of file
+"$Id: utabmd.scm,v 9.68 1993/08/23 22:30:08 cph Exp $"
\ No newline at end of file

diff --git a/v8/src/microcode/fixobj.h b/v8/src/microcode/fixobj.h
index 263f9ea1bf7657dc71fd6f4903c9ff52faae3363..8b8fc9fa6f669b381110ff472817b76cab2c8659 100644 (file)
--- a/v8/src/microcode/fixobj.h
+++ b/v8/src/microcode/fixobj.h
@@ -1,8 +1,8 @@
 /* -*-C-*-
 
-$Id: fixobj.h,v 9.32 1993/06/29 22:53:50 cph Exp $
+$Id: fixobj.h,v 9.33 1993/08/23 22:25:54 cph Exp $
 
-Copyright (c) 1987-91 Massachusetts Institute of Technology
+Copyright (c) 1987-93 Massachusetts Institute of Technology
 
 This material was developed by the Scheme project at the Massachusetts
 Institute of Technology, Department of Electrical Engineering and
@@ -52,7 +52,7 @@ MIT in each case. */
 #define FIXOBJ_SYSTEM_CALL_ERRORS      0x0A    /* System call error -> name */
 #define GC_Daemon              0x0B    /* Procedure to run after GC. */
 #define Trap_Handler           0x0C    /* Abort after disaster. */
-/* UNUSED slot                 0x0D */
+#define FIXOBJ_EDWIN_AUTO_SAVE 0x0D    /* Files to save if fatal error. */
 #define Stepper_State          0x0E    /* UNUSED in CScheme. */
 #define Fixed_Objects_Slots    0x0F    /* Names of these slots. */
 /* UNUSED slot                 0x10 used to be

diff --git a/v8/src/microcode/utabmd.scm b/v8/src/microcode/utabmd.scm
index cab92716393fb8067d2e88e99432c11b8821f0ee..90cac649e724f64b414b7867dce3e0a9b3309641 100644 (file)
--- a/v8/src/microcode/utabmd.scm
+++ b/v8/src/microcode/utabmd.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;; $Id: utabmd.scm,v 9.67 1993/06/29 21:37:05 cph Exp $
+;;; $Id: utabmd.scm,v 9.68 1993/08/23 22:30:08 cph Exp $
 ;;;
 ;;;    Copyright (c) 1987-1993 Massachusetts Institute of Technology
 ;;;
@@ -70,7 +70,7 @@
               SYSTEM-CALL-ERRORS                       ;0A
               GC-DAEMON                                ;0B
               TRAP-HANDLER                             ;0C
-              #F                                       ;0D
+              EDWIN-AUTO-SAVE                          ;0D
               STEPPER-STATE                            ;0E
               MICROCODE-FIXED-OBJECTS-SLOTS            ;0F
               #F                                       ;10
@@ -702,4 +702,4 @@
 
 ;;; This identification string is saved by the system.
 
-"$Id: utabmd.scm,v 9.67 1993/06/29 21:37:05 cph Exp $"
\ No newline at end of file
+"$Id: utabmd.scm,v 9.68 1993/08/23 22:30:08 cph Exp $"
\ No newline at end of file