summaryrefslogtreecommitdiff
path: root/src/flat_env.sml
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2008-07-10 11:13:49 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2008-07-10 11:13:49 -0400
commit5f2f492e122a26017496ed57d76ae39c6b1b254a (patch)
treecd664060237ca5cd0fe162aa9d62c841e7c71328 /src/flat_env.sml
parent768dfadfe4717b0c3f7b207a4980c78288b44a93 (diff)
First executable generated
Diffstat (limited to 'src/flat_env.sml')
-rw-r--r--src/flat_env.sml1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/flat_env.sml b/src/flat_env.sml
index 9c88a233..d86b6c97 100644
--- a/src/flat_env.sml
+++ b/src/flat_env.sml
@@ -111,5 +111,6 @@ fun declBinds env (d, _) =
case d of
DVal (x, n, t, _) => pushENamed env x n t
| DFun (n, x, dom, ran, _) => pushF env n x dom ran
+ | DPage _ => env
end