diff src/expl_env.sml @ 2010:403f0cc65b9c

New lessSafeFfi
author Adam Chlipala <adam@chlipala.net>
date Fri, 02 May 2014 19:19:09 -0400
parents b4480a56cab7
children
line wrap: on
line diff
--- a/src/expl_env.sml	Fri May 02 17:16:02 2014 -0400
+++ b/src/expl_env.sml	Fri May 02 19:19:09 2014 -0400
@@ -346,6 +346,7 @@
       | DTask _ => env
       | DPolicy _ => env
       | DOnError _ => env
+      | DFfi (x, n, _, t) => pushENamed env x n t
 
 fun sgiBinds env (sgi, loc) =
     case sgi of