summaryrefslogtreecommitdiff
path: root/src/core_env.sml
diff options
context:
space:
mode:
Diffstat (limited to 'src/core_env.sml')
-rw-r--r--src/core_env.sml2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/core_env.sml b/src/core_env.sml
index 5c59d9a2..c92690bf 100644
--- a/src/core_env.sml
+++ b/src/core_env.sml
@@ -123,7 +123,7 @@ fun declBinds env (d, _) =
case d of
DCon (x, n, k, c) => pushCNamed env x n k (SOME c)
| DVal (x, n, t, e, s) => pushENamed env x n t (SOME e) s
- | DValRec vis => foldl (fn ((x, n, t, e, s), env) => pushENamed env x n t (SOME e) s) env vis
+ | DValRec vis => foldl (fn ((x, n, t, e, s), env) => pushENamed env x n t NONE s) env vis
| DExport _ => env
end