Mercurial > urweb
diff src/core_env.sig @ 315:e21d0dddda09
Unpoly non-recursive function
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Thu, 11 Sep 2008 09:36:47 -0400 |
parents | 8a70e2919e86 |
children | bd9ee9aeca2f |
line wrap: on
line diff
--- a/src/core_env.sig Tue Sep 09 12:36:13 2008 -0400 +++ b/src/core_env.sig Thu Sep 11 09:36:47 2008 -0400 @@ -30,6 +30,9 @@ val liftConInCon : int -> Core.con -> Core.con val subConInCon : (int * Core.con) -> Core.con -> Core.con + val liftConInExp : int -> Core.exp -> Core.exp + val subConInExp : (int * Core.con) -> Core.exp -> Core.exp + type env val empty : env