From 179326764a4310bf2fac60ecda38e68dee93183f Mon Sep 17 00:00:00 2001 From: "Guillermo J. Rozas" Date: Tue, 31 Aug 1993 18:54:33 +0000 Subject: [PATCH] If the fixed objects vector is not valid, edwin_auto_save should not fail. --- v7/src/microcode/term.c | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/v7/src/microcode/term.c b/v7/src/microcode/term.c index 9ddb62507..7ff1636ca 100644 --- a/v7/src/microcode/term.c +++ b/v7/src/microcode/term.c @@ -1,6 +1,6 @@ /* -*-C-*- -$Id: term.c,v 1.8 1993/08/24 06:10:01 cph Exp $ +$Id: term.c,v 1.9 1993/08/31 18:54:33 gjr Exp $ Copyright (c) 1990-1993 Massachusetts Institute of Technology @@ -254,7 +254,12 @@ DEFUN_VOID (edwin_auto_save) end up back here, we continue saving, skipping the entries already saved as well as the entry that caused the error. */ if (edwin_auto_save_position == SHARP_T) - edwin_auto_save_position = (Get_Fixed_Obj_Slot (FIXOBJ_EDWIN_AUTO_SAVE)); + { + if (Valid_Fixed_Obj_Vector ()) + edwin_auto_save_position = (Get_Fixed_Obj_Slot (FIXOBJ_EDWIN_AUTO_SAVE)); + else + edwin_auto_save_position = SHARP_F; + } while (PAIR_P (edwin_auto_save_position)) { SCHEME_OBJECT entry = (PAIR_CAR (edwin_auto_save_position)); -- 2.25.1