Change `(Registers[REGBLOCK_STACK_GUARD])' to be a cache for the C

variable `Stack_Guard'.  Change COMPILER_SETUP_INTERRUPT so that
compiled code doesn't signal GC or stack-overflow interrupts when the
corresponding interrupt enable bit is not set.  Change compiled-code
interface to assume this, and eliminate back-out code; this eliminates
the _SKIPPED_CHECK_OFFSET constants built into the microcode, allowing
the compiled code more coding flexibility.

diff --git a/v7/src/microcode/cmpint.c b/v7/src/microcode/cmpint.c
index 2febecfef0746758f1bab67ee83f54d4c0aa496c..8e3a8119508fe0e7aa9c3edb879ee040539e187c 100644 (file)
--- a/v7/src/microcode/cmpint.c
+++ b/v7/src/microcode/cmpint.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Id: cmpint.c,v 1.50 1992/09/26 02:54:55 cph Exp $
+$Id: cmpint.c,v 1.51 1992/09/26 03:12:30 cph Exp $
 
 Copyright (c) 1989-92 Massachusetts Institute of Technology
 
@@ -2753,15 +2753,6 @@ DEFUN (compiler_initialize, (fasl_p), long fasl_p)
    All entries error out or kill the microcode.
  */
 
-#include "ansidecl.h"  /* Macros to support ANSI declarations */
-#include "config.h"    /* Machine configurations */
-#include "object.h"    /* Making pointers */
-#include "sdata.h"     /* Needed by const.h */
-#include "types.h"     /* Needed by const.h */
-#include "errors.h"    /* Error codes and Termination codes */
-#include "const.h"     /* REGBLOCK_MINIMUM_LENGTH */
-#include "returns.h"   /* RC_POP_FROM_COMPILED_CODE */
-
 extern void EXFUN (Microcode_Termination, (int code));
 extern void EXFUN (compiler_reset_error, (void));
 

diff --git a/v8/src/microcode/cmpint.c b/v8/src/microcode/cmpint.c
index 2febecfef0746758f1bab67ee83f54d4c0aa496c..8e3a8119508fe0e7aa9c3edb879ee040539e187c 100644 (file)
--- a/v8/src/microcode/cmpint.c
+++ b/v8/src/microcode/cmpint.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Id: cmpint.c,v 1.50 1992/09/26 02:54:55 cph Exp $
+$Id: cmpint.c,v 1.51 1992/09/26 03:12:30 cph Exp $
 
 Copyright (c) 1989-92 Massachusetts Institute of Technology
 
@@ -2753,15 +2753,6 @@ DEFUN (compiler_initialize, (fasl_p), long fasl_p)
    All entries error out or kill the microcode.
  */
 
-#include "ansidecl.h"  /* Macros to support ANSI declarations */
-#include "config.h"    /* Machine configurations */
-#include "object.h"    /* Making pointers */
-#include "sdata.h"     /* Needed by const.h */
-#include "types.h"     /* Needed by const.h */
-#include "errors.h"    /* Error codes and Termination codes */
-#include "const.h"     /* REGBLOCK_MINIMUM_LENGTH */
-#include "returns.h"   /* RC_POP_FROM_COMPILED_CODE */
-
 extern void EXFUN (Microcode_Termination, (int code));
 extern void EXFUN (compiler_reset_error, (void));