From: Henry M. Wu <edu/mit/csail/zurich/mhwu>
Date: Tue, 26 May 1992 20:23:38 +0000 (+0000)
Subject: Add package support for dumping bif/bsm instead of inf/binf files.
X-Git-Tag: 20090517-FFI~9355
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=21a72c5bcef4734bb0e746b2f7e254d51863ce03;p=mit-scheme.git

Add package support for dumping bif/bsm instead of inf/binf files.
---

diff --git a/v7/src/compiler/machines/bobcat/compiler.pkg b/v7/src/compiler/machines/bobcat/compiler.pkg
index ac9e38635..ae1244193 100644
--- a/v7/src/compiler/machines/bobcat/compiler.pkg
+++ b/v7/src/compiler/machines/bobcat/compiler.pkg
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/bobcat/compiler.pkg,v 1.35 1992/05/14 03:03:58 jinx Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/bobcat/compiler.pkg,v 1.36 1992/05/26 20:22:37 mhwu Exp $
 
 Copyright (c) 1988-1992 Massachusetts Institute of Technology
 
@@ -178,7 +178,8 @@ MIT in each case. |#
 	  *rtl-procedures*
 	  *rtl-graphs*)
   (import (runtime compiler-info)
-	  make-dbg-info-vector)
+	  make-dbg-info-vector
+	  inf-structure->bif/bsm)
   (import (runtime unparser)
 	  *unparse-uninterned-symbols-by-name?*))
 
diff --git a/v7/src/compiler/machines/i386/compiler.pkg b/v7/src/compiler/machines/i386/compiler.pkg
index 1dfc017aa..80da19137 100644
--- a/v7/src/compiler/machines/i386/compiler.pkg
+++ b/v7/src/compiler/machines/i386/compiler.pkg
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/i386/compiler.pkg,v 1.7 1992/05/14 03:04:40 jinx Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/i386/compiler.pkg,v 1.8 1992/05/26 20:21:10 mhwu Exp $
 $MC68020-Header: /scheme/compiler/bobcat/RCS/comp.pkg,v 1.32 1991/05/06 23:09:24 jinx Exp $
 
 Copyright (c) 1992 Massachusetts Institute of Technology
@@ -179,7 +179,8 @@ MIT in each case. |#
 	  *rtl-procedures*
 	  *rtl-graphs*)
   (import (runtime compiler-info)
-	  make-dbg-info-vector)
+	  make-dbg-info-vector
+	  inf-structure->bif/bsm)
   (import (runtime unparser)
 	  *unparse-uninterned-symbols-by-name?*))
 
diff --git a/v7/src/compiler/machines/mips/compiler.pkg b/v7/src/compiler/machines/mips/compiler.pkg
index dad372bc7..a081a0dd5 100644
--- a/v7/src/compiler/machines/mips/compiler.pkg
+++ b/v7/src/compiler/machines/mips/compiler.pkg
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/mips/compiler.pkg,v 1.5 1992/05/14 03:05:35 jinx Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/mips/compiler.pkg,v 1.6 1992/05/26 20:23:11 mhwu Exp $
 $MC68020-Header: /scheme/compiler/bobcat/RCS/comp.pkg,v 1.32 1991/05/06 23:09:24 jinx Exp $
 
 Copyright (c) 1988-1992 Massachusetts Institute of Technology
@@ -179,7 +179,8 @@ MIT in each case. |#
 	  *rtl-procedures*
 	  *rtl-graphs*)
   (import (runtime compiler-info)
-	  make-dbg-info-vector)
+	  make-dbg-info-vector
+	  inf-structure->bif/bsm)
   (import (runtime unparser)
 	  *unparse-uninterned-symbols-by-name?*))
 
diff --git a/v7/src/compiler/machines/vax/compiler.pkg b/v7/src/compiler/machines/vax/compiler.pkg
index c730cbea8..1bd45d3a7 100644
--- a/v7/src/compiler/machines/vax/compiler.pkg
+++ b/v7/src/compiler/machines/vax/compiler.pkg
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/vax/compiler.pkg,v 1.9 1992/05/14 03:05:09 jinx Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/vax/compiler.pkg,v 1.10 1992/05/26 20:23:38 mhwu Exp $
 $MC68020-Header: comp.pkg,v 1.30 90/05/03 15:16:59 GMT jinx Exp $
 
 Copyright (c) 1988-1992 Massachusetts Institute of Technology
@@ -179,7 +179,8 @@ MIT in each case. |#
 	  *rtl-procedures*
 	  *rtl-graphs*)
   (import (runtime compiler-info)
-	  make-dbg-info-vector)
+	  make-dbg-info-vector
+	  inf-structure->bif/bsm)
   (import (runtime unparser)
 	  *unparse-uninterned-symbols-by-name?*))