diff src/expl_env.sml @ 100:f0f59e918cac

page declaration, up through monoize
author Adam Chlipala <adamc@hcoop.net>
date Thu, 10 Jul 2008 10:11:35 -0400
parents d609820c5834
children 813e5a52063d
line wrap: on
line diff
--- a/src/expl_env.sml	Thu Jul 10 09:24:43 2008 -0400
+++ b/src/expl_env.sml	Thu Jul 10 10:11:35 2008 -0400
@@ -243,6 +243,7 @@
       | DSgn (x, n, sgn) => pushSgnNamed env x n sgn
       | DStr (x, n, sgn, _) => pushStrNamed env x n sgn
       | DFfiStr (x, n, sgn) => pushStrNamed env x n sgn
+      | DPage _ => env
 
 fun sgiBinds env (sgi, _) =
     case sgi of