summaryrefslogtreecommitdiff
path: root/src/explify.sml
diff options
context:
space:
mode:
Diffstat (limited to 'src/explify.sml')
-rw-r--r--src/explify.sml1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/explify.sml b/src/explify.sml
index c5e7fbd4..8c6cc9f5 100644
--- a/src/explify.sml
+++ b/src/explify.sml
@@ -116,6 +116,7 @@ fun explifyDecl (d, loc : EM.span) =
| L.DStr (x, n, sgn, str) => SOME (L'.DStr (x, n, explifySgn sgn, explifyStr str), loc)
| L.DFfiStr (x, n, sgn) => SOME (L'.DFfiStr (x, n, explifySgn sgn), loc)
| L.DConstraint (c1, c2) => NONE
+ | L.DPage (c, e) => SOME (L'.DPage (explifyCon c, explifyExp e), loc)
and explifyStr (str, loc) =
case str of