From: Chris Hanson <org/chris-hanson/cph>
Date: Sun, 20 May 2018 21:03:22 +0000 (-0700)
Subject: Implement interaction-environment for R7RS.
X-Git-Tag: mit-scheme-pucked-x11-0.3.1~7^2~21
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=b7a166d2e43388e29ba58d01624ea26bfb009b41;p=mit-scheme.git

Implement interaction-environment for R7RS.
---

diff --git a/src/runtime/runtime.pkg b/src/runtime/runtime.pkg
index 3514fc6a5..9d0b23e70 100644
--- a/src/runtime/runtime.pkg
+++ b/src/runtime/runtime.pkg
@@ -3848,6 +3848,7 @@ USA.
   (files "rep")
   (parent (runtime))
   (export ()
+	  (interaction-environment nearest-repl/environment) ;R7RS
 	  ->environment
 	  abort->nearest
 	  abort->previous