From: Chris Hanson <org/chris-hanson/cph>
Date: Fri, 29 May 1987 17:06:51 +0000 (+0000)
Subject: Add new return codes for compiled code interface variable cache.
X-Git-Tag: 20090517-FFI~13461
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=372fd1a2e03ef448bddaf4c4dbe911dfd69f93f1;p=mit-scheme.git

Add new return codes for compiled code interface variable cache.
---

diff --git a/v7/src/microcode/utabmd.scm b/v7/src/microcode/utabmd.scm
index d02fef45b..b0fb66f52 100644
--- a/v7/src/microcode/utabmd.scm
+++ b/v7/src/microcode/utabmd.scm
@@ -37,7 +37,7 @@
 
 ;;;; Machine Dependent Type Tables
 
-;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/utabmd.scm,v 9.29 1987/05/21 18:06:30 cph Exp $
+;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/utabmd.scm,v 9.30 1987/05/29 17:06:51 cph Exp $
 
 (declare (usual-integrations))
 
@@ -314,6 +314,11 @@
 	       COMPILER-DEFINITION-RESTART		;4F
 	       COMPILER-LEXPR-INTERRUPT-RESTART		;50
 	       COMPILER-SAFE-REFERENCE-RESTART		;51
+	       COMPILER-CACHE-VARIABLE-RESTART		;52
+	       COMPILER-REFERENCE-TRAP-RESTART		;53
+	       COMPILER-ASSIGNMENT-TRAP-RESTART		;54
+	       COMPILER-UUO-LINK-RESTART		;55
+	       COMPILER-UUO-LINK-TRAP-RESTART		;56
 	       ))
 
 ;;; [] Primitives
@@ -855,4 +860,4 @@
 
 ;;; This identification string is saved by the system.
 
-"$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/utabmd.scm,v 9.29 1987/05/21 18:06:30 cph Exp $"
+"$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/utabmd.scm,v 9.30 1987/05/29 17:06:51 cph Exp $"
diff --git a/v8/src/microcode/utabmd.scm b/v8/src/microcode/utabmd.scm
index 08f718949..bdd62ddde 100644
--- a/v8/src/microcode/utabmd.scm
+++ b/v8/src/microcode/utabmd.scm
@@ -37,7 +37,7 @@
 
 ;;;; Machine Dependent Type Tables
 
-;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/utabmd.scm,v 9.29 1987/05/21 18:06:30 cph Exp $
+;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/utabmd.scm,v 9.30 1987/05/29 17:06:51 cph Exp $
 
 (declare (usual-integrations))
 
@@ -314,6 +314,11 @@
 	       COMPILER-DEFINITION-RESTART		;4F
 	       COMPILER-LEXPR-INTERRUPT-RESTART		;50
 	       COMPILER-SAFE-REFERENCE-RESTART		;51
+	       COMPILER-CACHE-VARIABLE-RESTART		;52
+	       COMPILER-REFERENCE-TRAP-RESTART		;53
+	       COMPILER-ASSIGNMENT-TRAP-RESTART		;54
+	       COMPILER-UUO-LINK-RESTART		;55
+	       COMPILER-UUO-LINK-TRAP-RESTART		;56
 	       ))
 
 ;;; [] Primitives
@@ -855,4 +860,4 @@
 
 ;;; This identification string is saved by the system.
 
-"$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/utabmd.scm,v 9.29 1987/05/21 18:06:30 cph Exp $"
+"$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/utabmd.scm,v 9.30 1987/05/29 17:06:51 cph Exp $"