From 65671a953c405d27dce12418d7fb9af23e3b6c0c Mon Sep 17 00:00:00 2001 From: Hal Abelson Date: Fri, 28 Dec 1990 01:34:25 +0000 Subject: [PATCH] Fix fencepost error in hardware traps. --- v7/src/runtime/conpar.scm | 4 ++-- v8/src/runtime/conpar.scm | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/v7/src/runtime/conpar.scm b/v7/src/runtime/conpar.scm index 4f5dd2eec..acee7b581 100644 --- a/v7/src/runtime/conpar.scm +++ b/v7/src/runtime/conpar.scm @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/runtime/conpar.scm,v 14.20 1990/10/03 21:53:21 jinx Rel $ +$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/runtime/conpar.scm,v 14.21 1990/12/28 01:34:25 hal Exp $ Copyright (c) 1988, 1989, 1990 Massachusetts Institute of Technology @@ -640,7 +640,7 @@ MIT in each case. |# ;;;; Hardware trap parsing -(define-integrable hardware-trap/frame-size 8) +(define-integrable hardware-trap/frame-size 9) (define-integrable hardware-trap/signal-index 1) (define-integrable hardware-trap/signal-name-index 2) diff --git a/v8/src/runtime/conpar.scm b/v8/src/runtime/conpar.scm index 222f0ffb0..36f360c13 100644 --- a/v8/src/runtime/conpar.scm +++ b/v8/src/runtime/conpar.scm @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/runtime/conpar.scm,v 14.20 1990/10/03 21:53:21 jinx Rel $ +$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/runtime/conpar.scm,v 14.21 1990/12/28 01:34:25 hal Exp $ Copyright (c) 1988, 1989, 1990 Massachusetts Institute of Technology @@ -640,7 +640,7 @@ MIT in each case. |# ;;;; Hardware trap parsing -(define-integrable hardware-trap/frame-size 8) +(define-integrable hardware-trap/frame-size 9) (define-integrable hardware-trap/signal-index 1) (define-integrable hardware-trap/signal-name-index 2) -- 2.25.1