fsharp: stepA: Self host through step3. Need conj to pass step4.

[jackhill/mal.git] / fsharp / env.fs

diff --git a/fsharp/env.fs b/fsharp/env.fs
index 1310d81..3560544 100644 (file)
--- a/fsharp/env.fs
+++ b/fsharp/env.fs
@@ -87,7 +87,11 @@ module Env
               wrap "get" Core.get
               wrap "contains?" Core.contains
               wrap "keys" Core.keys
-              wrap "vals" Core.vals ]
+              wrap "vals" Core.vals
+              wrap "atom" (Core.atom getNextValue)
+              wrap "deref" Core.deref
+              wrap "reset!" Core.reset
+              wrap "swap!" Core.swap ]
             |> ofList
         [ env ]