Mercurial > urweb
diff src/elab_env.sig @ 448:85819353a84f
First Unnest tests working
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Sat, 01 Nov 2008 15:58:55 -0400 |
parents | b77863cd0be2 |
children | 20fab0e96217 |
line wrap: on
line diff
--- a/src/elab_env.sig Sat Nov 01 11:17:29 2008 -0400 +++ b/src/elab_env.sig Sat Nov 01 15:58:55 2008 -0400 @@ -30,6 +30,10 @@ exception SynUnif val liftConInCon : int -> Elab.con -> Elab.con + val liftExpInExp : int -> Elab.exp -> Elab.exp + + val subExpInExp : (int * Elab.exp) -> Elab.exp -> Elab.exp + type env val empty : env