Fix various bugs in generation of type and range checks.

diff --git a/v7/src/compiler/machines/bobcat/make.scm-68020 b/v7/src/compiler/machines/bobcat/make.scm-68020
index 004c47b4ff79d33cd7c23adab13d530dc5d14bd3..4cbae645dacc7c88f72acd2bd06bbdfb920e90ee 100644 (file)
--- a/v7/src/compiler/machines/bobcat/make.scm-68020
+++ b/v7/src/compiler/machines/bobcat/make.scm-68020
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/bobcat/make.scm-68020,v 4.85 1991/05/28 19:12:36 jinx Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/bobcat/make.scm-68020,v 4.86 1991/06/12 20:54:38 cph Exp $
 
 Copyright (c) 1991 Massachusetts Institute of Technology
 
@@ -45,4 +45,4 @@ MIT in each case. |#
 ((package/reference (find-package '(COMPILER LAP-SYNTAXER))
                    'MC68K/toggle-closure-format)
  'MC68020)
-(add-system! (make-system "Liar (Motorola MC68020)" 4 85 '()))
+(add-system! (make-system "Liar (Motorola MC68020)" 4 86 '()))
\ No newline at end of file

diff --git a/v7/src/compiler/machines/bobcat/make.scm-68040 b/v7/src/compiler/machines/bobcat/make.scm-68040
index aa5ad80cd6cdfe2cd9a11defb499b2d002f8842a..8614fada3f6f65133ae0958bd02dd22856c4f6b6 100644 (file)
--- a/v7/src/compiler/machines/bobcat/make.scm-68040
+++ b/v7/src/compiler/machines/bobcat/make.scm-68040
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/bobcat/make.scm-68040,v 4.85 1991/05/28 19:14:42 jinx Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/bobcat/make.scm-68040,v 4.86 1991/06/12 20:54:31 cph Exp $
 
 Copyright (c) 1988-91 Massachusetts Institute of Technology
 
@@ -41,4 +41,4 @@ MIT in each case. |#
            ((package/reference (find-package name) 'INITIALIZE-PACKAGE!)))
          '((COMPILER MACROS)
            (COMPILER DECLARATIONS)))
-(add-system! (make-system "Liar (Motorola MC68040)" 4 85 '()))
\ No newline at end of file
+(add-system! (make-system "Liar (Motorola MC68040)" 4 86 '()))
\ No newline at end of file