From 24cc12efd52329acf99c946a12dcac1d64c2b366 Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Tue, 2 Jun 1987 21:19:34 +0000 Subject: [PATCH] Change the frame-size for invocation:lookup to indicate the size of the frame at application time rather than when it executes the instruction. --- v7/src/compiler/rtlgen/rgcomb.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/v7/src/compiler/rtlgen/rgcomb.scm b/v7/src/compiler/rtlgen/rgcomb.scm index a1d7a31c8..e56bf85f3 100644 --- a/v7/src/compiler/rtlgen/rgcomb.scm +++ b/v7/src/compiler/rtlgen/rgcomb.scm @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/rtlgen/rgcomb.scm,v 1.22 1987/06/01 21:05:25 cph Exp $ +$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/rtlgen/rgcomb.scm,v 1.23 1987/06/02 21:19:34 cph Exp $ Copyright (c) 1987 Massachusetts Institute of Technology @@ -316,7 +316,7 @@ MIT in each case. |# (scfg-next-hooks n4))))) (let ((block (reference-block operator))) (rtl:make-invocation:lookup - frame-size + frame-size* (prefix combination frame-size) continuation (nearest-ic-block-expression block) -- 2.25.1