Restore export of *PP-DEFAULT-AS-CODE?*. Problem was that source for

"pp.scm" was several versions old and did not match rest of runtime
system.

diff --git a/v7/src/runtime/runtime.pkg b/v7/src/runtime/runtime.pkg
index 84514f18fdf6a15e866cc4b2013c62a515a66903..98849eef7087f713435372de409b470598782c42 100644 (file)
--- a/v7/src/runtime/runtime.pkg
+++ b/v7/src/runtime/runtime.pkg
@@ -1,8 +1,8 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/runtime/runtime.pkg,v 14.155 1992/07/05 14:27:58 jinx Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/runtime/runtime.pkg,v 14.156 1992/07/10 22:10:33 cph Exp $
 
-Copyright (c) 1988-1992 Massachusetts Institute of Technology
+Copyright (c) 1988-92 Massachusetts Institute of Technology
 
 This material was developed by the Scheme project at the Massachusetts
 Institute of Technology, Department of Electrical Engineering and
@@ -1512,6 +1512,7 @@ MIT in each case. |#
   (parent ())
   (export ()
          *pp-avoid-circularity?*
+         *pp-default-as-code?*
          *pp-forced-x-size*
          *pp-lists-as-tables?*
          *pp-named-lambda->define?*

diff --git a/v8/src/runtime/runtime.pkg b/v8/src/runtime/runtime.pkg
index 4c4b351a19543e06762af899befa33d44ffaa6e8..d2e6e1844cde827000f02a9d49011b64af9df41a 100644 (file)
--- a/v8/src/runtime/runtime.pkg
+++ b/v8/src/runtime/runtime.pkg
@@ -1,8 +1,8 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/runtime/runtime.pkg,v 14.155 1992/07/05 14:27:58 jinx Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/runtime/runtime.pkg,v 14.156 1992/07/10 22:10:33 cph Exp $
 
-Copyright (c) 1988-1992 Massachusetts Institute of Technology
+Copyright (c) 1988-92 Massachusetts Institute of Technology
 
 This material was developed by the Scheme project at the Massachusetts
 Institute of Technology, Department of Electrical Engineering and
@@ -1512,6 +1512,7 @@ MIT in each case. |#
   (parent ())
   (export ()
          *pp-avoid-circularity?*
+         *pp-default-as-code?*
          *pp-forced-x-size*
          *pp-lists-as-tables?*
          *pp-named-lambda->define?*