From b225596addee1a3cfd6c3189cff923e7f0e8f7c9 Mon Sep 17 00:00:00 2001
From: Adam Chlipala <adamc@hcoop.net>
Date: Sun, 13 Dec 2009 14:20:41 -0500
Subject: Initializers and setval

---
 src/expl_env.sml | 1 +
 1 file changed, 1 insertion(+)

(limited to 'src/expl_env.sml')

diff --git a/src/expl_env.sml b/src/expl_env.sml
index 836af42c..f16eeb8e 100644
--- a/src/expl_env.sml
+++ b/src/expl_env.sml
@@ -343,6 +343,7 @@ fun declBinds env (d, loc) =
         in
             pushENamed env x n t
         end
+      | DInitializer _ => env
 
 fun sgiBinds env (sgi, loc) =
     case sgi of
-- 
cgit v1.2.3