From 531a49743f8bed44db1341dd6978e26822a4143b Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Tue, 10 Feb 1987 22:14:37 +0000 Subject: [PATCH] Fix incorrect subproblem receiver size. --- v7/src/compiler/machines/bobcat/machin.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/v7/src/compiler/machines/bobcat/machin.scm b/v7/src/compiler/machines/bobcat/machin.scm index ef3eb0268..35105a812 100644 --- a/v7/src/compiler/machines/bobcat/machin.scm +++ b/v7/src/compiler/machines/bobcat/machin.scm @@ -37,13 +37,13 @@ ;;;; Machine Model for 68020 -;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/bobcat/machin.scm,v 1.42 1987/01/09 19:41:14 cph Exp $ +;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/bobcat/machin.scm,v 1.43 1987/02/10 22:14:37 cph Exp $ (declare (usual-integrations)) (using-syntax (access compiler-syntax-table compiler-package) (define (rtl:message-receiver-size:closure) 1) (define (rtl:message-receiver-size:stack) 1) -(define (rtl:message-receiver-size:subproblem) 1) +(define (rtl:message-receiver-size:subproblem) 2) (define-integrable (stack->memory-offset offset) offset) -- 2.25.1