diff src/core_env.sml @ 1073:b2311dfb3158

Initializers and setval
author Adam Chlipala <adamc@hcoop.net>
date Sun, 13 Dec 2009 14:20:41 -0500
parents 61a1f5c5ae2c
children 0657e5adc938
line wrap: on
line diff
--- a/src/core_env.sml	Sun Dec 13 13:00:55 2009 -0500
+++ b/src/core_env.sml	Sun Dec 13 14:20:41 2009 -0500
@@ -348,6 +348,7 @@
         in
             pushENamed env x n t NONE s
         end
+      | DInitializer _ => env
 
 fun patBinds env (p, loc) =
     case p of