summaryrefslogtreecommitdiff
path: root/src/flat_env.sml
diff options
context:
space:
mode:
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