1 files changed, 6 insertions, 1 deletions

@@ -16,7 +16,12 @@ local function fold (kons, knil, r)
         end
 end
 
-local env = {}
+local env = type.environment({}, {})
+
+env["interaction-environment"] = function (r)
+        assert_arity(r,0,0)
+        return env
+end
 
 ---[[ EQUIVALENCE ]]---