Mercurial > urweb

diff src/elab_env.sml @ 48:0a5c312de09a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Start of FFI
author Adam Chlipala <adamc@hcoop.net>
date Sun, 22 Jun 2008 09:27:29 -0400
parents b3fbbc6cb1e5
children d3cc191cb25f
line wrap: on
line diff
--- a/src/elab_env.sml	Thu Jun 19 18:13:33 2008 -0400
+++ b/src/elab_env.sml	Sun Jun 22 09:27:29 2008 -0400
@@ -290,6 +290,7 @@
       | DVal (x, n, t, _) => pushENamedAs env x n t
       | DSgn (x, n, sgn) => pushSgnNamedAs env x n sgn
       | DStr (x, n, sgn, _) => pushStrNamedAs env x n sgn
+      | DFfiStr (x, n, sgn) => pushStrNamedAs env x n sgn
 
 fun sgiBinds env (sgi, _) =
     case sgi of