Implement interaction-environment for R7RS.

diff --git a/src/runtime/runtime.pkg b/src/runtime/runtime.pkg
index 3514fc6a5e89b134a751d800e1bc60e0ab12fde9..9d0b23e7018f2aa5aabcc40c225094c779f03459 100644 (file)
--- 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