From 0b4e3709e25cbd2fc792adb49fe2be31472cff02 Mon Sep 17 00:00:00 2001 From: "Guillermo J. Rozas" Date: Thu, 9 Dec 1993 03:23:53 +0000 Subject: [PATCH] Update to match latest changes to the linearizer. --- v7/src/compiler/machines/C/compiler.pkg | 9 +++++++-- v7/src/compiler/machines/alpha/compiler.pkg | 9 +++++++-- v7/src/compiler/machines/bobcat/compiler.pkg | 9 +++++++-- v7/src/compiler/machines/i386/compiler.pkg | 9 +++++++-- v7/src/compiler/machines/mips/compiler.pkg | 9 +++++++-- v7/src/compiler/machines/vax/compiler.pkg | 9 +++++++-- 6 files changed, 42 insertions(+), 12 deletions(-) diff --git a/v7/src/compiler/machines/C/compiler.pkg b/v7/src/compiler/machines/C/compiler.pkg index be17dd941..4a89f9afa 100644 --- a/v7/src/compiler/machines/C/compiler.pkg +++ b/v7/src/compiler/machines/C/compiler.pkg @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Id: compiler.pkg,v 1.6 1993/11/13 03:32:25 gjr Exp $ +$Id: compiler.pkg,v 1.7 1993/12/09 03:23:53 gjr Exp $ Copyright (c) 1992-1993 Massachusetts Institute of Technology @@ -638,9 +638,14 @@ MIT in each case. |# (parent (compiler lap-syntaxer)) (export (compiler lap-syntaxer) add-end-of-block-code! + add-extra-code! bblock-linearize-lap + extra-code-block/xtra + declare-extra-code-block! + find-extra-code-block linearize-lap - set-current-branches!) + set-current-branches! + set-extra-code-block/xtra!) (export (compiler top-level) *end-of-block-code* linearize-lap)) \ No newline at end of file diff --git a/v7/src/compiler/machines/alpha/compiler.pkg b/v7/src/compiler/machines/alpha/compiler.pkg index 8efe44dc4..e27d99b7e 100644 --- a/v7/src/compiler/machines/alpha/compiler.pkg +++ b/v7/src/compiler/machines/alpha/compiler.pkg @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Id: compiler.pkg,v 1.10 1993/11/12 20:49:05 jmiller Exp $ +$Id: compiler.pkg,v 1.11 1993/12/09 03:23:04 gjr Exp $ Copyright (c) 1992-1993 Digital Equipment Corporation (D.E.C.) @@ -623,9 +623,14 @@ case. (parent (compiler lap-syntaxer)) (export (compiler lap-syntaxer) add-end-of-block-code! + add-extra-code! bblock-linearize-lap + extra-code-block/xtra + declare-extra-code-block! + find-extra-code-block linearize-lap - set-current-branches!) + set-current-branches! + set-extra-code-block/xtra!) (export (compiler top-level) *end-of-block-code* linearize-lap)) diff --git a/v7/src/compiler/machines/bobcat/compiler.pkg b/v7/src/compiler/machines/bobcat/compiler.pkg index e22541ab6..e3f043b08 100644 --- a/v7/src/compiler/machines/bobcat/compiler.pkg +++ b/v7/src/compiler/machines/bobcat/compiler.pkg @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Id: compiler.pkg,v 1.47 1993/10/12 07:29:31 cph Exp $ +$Id: compiler.pkg,v 1.48 1993/12/09 03:22:28 gjr Exp $ Copyright (c) 1988-1993 Massachusetts Institute of Technology @@ -627,9 +627,14 @@ MIT in each case. |# (parent (compiler lap-syntaxer)) (export (compiler lap-syntaxer) add-end-of-block-code! + add-extra-code! bblock-linearize-lap + extra-code-block/xtra + declare-extra-code-block! + find-extra-code-block linearize-lap - set-current-branches!) + set-current-branches! + set-extra-code-block/xtra!) (export (compiler top-level) *end-of-block-code* linearize-lap)) diff --git a/v7/src/compiler/machines/i386/compiler.pkg b/v7/src/compiler/machines/i386/compiler.pkg index a701976ed..322e906e1 100644 --- a/v7/src/compiler/machines/i386/compiler.pkg +++ b/v7/src/compiler/machines/i386/compiler.pkg @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Id: compiler.pkg,v 1.19 1993/10/12 07:29:42 cph Exp $ +$Id: compiler.pkg,v 1.20 1993/12/09 03:22:08 gjr Exp $ Copyright (c) 1992-1993 Massachusetts Institute of Technology @@ -624,9 +624,14 @@ MIT in each case. |# (parent (compiler lap-syntaxer)) (export (compiler lap-syntaxer) add-end-of-block-code! + add-extra-code! bblock-linearize-lap + extra-code-block/xtra + declare-extra-code-block! + find-extra-code-block linearize-lap - set-current-branches!) + set-current-branches! + set-extra-code-block/xtra!) (export (compiler top-level) *end-of-block-code* linearize-lap)) diff --git a/v7/src/compiler/machines/mips/compiler.pkg b/v7/src/compiler/machines/mips/compiler.pkg index 252a7c619..c54c6dacc 100644 --- a/v7/src/compiler/machines/mips/compiler.pkg +++ b/v7/src/compiler/machines/mips/compiler.pkg @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Id: compiler.pkg,v 1.17 1993/10/12 07:29:53 cph Exp $ +$Id: compiler.pkg,v 1.18 1993/12/09 03:22:45 gjr Exp $ Copyright (c) 1988-1993 Massachusetts Institute of Technology @@ -628,9 +628,14 @@ MIT in each case. |# (parent (compiler lap-syntaxer)) (export (compiler lap-syntaxer) add-end-of-block-code! + add-extra-code! bblock-linearize-lap + extra-code-block/xtra + declare-extra-code-block! + find-extra-code-block linearize-lap - set-current-branches!) + set-current-branches! + set-extra-code-block/xtra!) (export (compiler top-level) *end-of-block-code* linearize-lap)) diff --git a/v7/src/compiler/machines/vax/compiler.pkg b/v7/src/compiler/machines/vax/compiler.pkg index fc77ff6e3..d26941a35 100644 --- a/v7/src/compiler/machines/vax/compiler.pkg +++ b/v7/src/compiler/machines/vax/compiler.pkg @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Id: compiler.pkg,v 1.19 1993/10/12 07:30:28 cph Exp $ +$Id: compiler.pkg,v 1.20 1993/12/09 03:23:25 gjr Exp $ Copyright (c) 1988-1993 Massachusetts Institute of Technology @@ -618,9 +618,14 @@ MIT in each case. |# (parent (compiler lap-syntaxer)) (export (compiler lap-syntaxer) add-end-of-block-code! + add-extra-code! bblock-linearize-lap + extra-code-block/xtra + declare-extra-code-block! + find-extra-code-block linearize-lap - set-current-branches!) + set-current-branches! + set-extra-code-block/xtra!) (export (compiler top-level) *end-of-block-code* linearize-lap)) -- 2.25.1