From d770c7d36f9938eb17b4cf7782c8674976697e71 Mon Sep 17 00:00:00 2001 From: "Guillermo J. Rozas" Date: Wed, 3 Oct 1990 16:49:07 +0000 Subject: [PATCH] Add COMPILER-ERROR-RESTART. --- v7/src/microcode/utabmd.scm | 7 ++++--- v8/src/microcode/utabmd.scm | 7 ++++--- 2 files changed, 8 insertions(+), 6 deletions(-) diff --git a/v7/src/microcode/utabmd.scm b/v7/src/microcode/utabmd.scm index 407a1d5fe..bdf9311a7 100644 --- a/v7/src/microcode/utabmd.scm +++ b/v7/src/microcode/utabmd.scm @@ -1,6 +1,6 @@ ;;; -*-Scheme-*- ;;; -;;; Copyright (c) 1987, 1989 Massachusetts Institute of Technology +;;; Copyright (c) 1987, 1989, 1990 Massachusetts Institute of Technology ;;; ;;; This material was developed by the Scheme project at the ;;; Massachusetts Institute of Technology, Department of @@ -37,7 +37,7 @@ ;;;; Machine Dependent Type Tables -;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/utabmd.scm,v 9.51 1990/01/29 21:14:15 jinx Exp $ +;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/utabmd.scm,v 9.52 1990/10/03 16:49:07 jinx Exp $ (declare (usual-integrations)) @@ -464,6 +464,7 @@ COMPILER-LINK-CACHES-RESTART ;5B HARDWARE-TRAP ;5C INTERNAL-APPLY-VAL ;5D + COMPILER-ERROR-RESTART ;5E )) ;;; [] Errors @@ -587,4 +588,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.51 1990/01/29 21:14:15 jinx Exp $" \ No newline at end of file +"$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/utabmd.scm,v 9.52 1990/10/03 16:49:07 jinx Exp $" \ No newline at end of file diff --git a/v8/src/microcode/utabmd.scm b/v8/src/microcode/utabmd.scm index df40b90fe..511d8884e 100644 --- a/v8/src/microcode/utabmd.scm +++ b/v8/src/microcode/utabmd.scm @@ -1,6 +1,6 @@ ;;; -*-Scheme-*- ;;; -;;; Copyright (c) 1987, 1989 Massachusetts Institute of Technology +;;; Copyright (c) 1987, 1989, 1990 Massachusetts Institute of Technology ;;; ;;; This material was developed by the Scheme project at the ;;; Massachusetts Institute of Technology, Department of @@ -37,7 +37,7 @@ ;;;; Machine Dependent Type Tables -;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/utabmd.scm,v 9.51 1990/01/29 21:14:15 jinx Exp $ +;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/utabmd.scm,v 9.52 1990/10/03 16:49:07 jinx Exp $ (declare (usual-integrations)) @@ -464,6 +464,7 @@ COMPILER-LINK-CACHES-RESTART ;5B HARDWARE-TRAP ;5C INTERNAL-APPLY-VAL ;5D + COMPILER-ERROR-RESTART ;5E )) ;;; [] Errors @@ -587,4 +588,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.51 1990/01/29 21:14:15 jinx Exp $" \ No newline at end of file +"$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/utabmd.scm,v 9.52 1990/10/03 16:49:07 jinx Exp $" \ No newline at end of file -- 2.25.1