From e18863bcabc5d185b7fe1fc750bdf0bbdb5a4f78 Mon Sep 17 00:00:00 2001 From: Adam Chlipala Date: Sun, 8 Jun 2008 15:47:44 -0400 Subject: Some con reducing --- src/core_env.sig | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'src/core_env.sig') diff --git a/src/core_env.sig b/src/core_env.sig index 88cb253b..1766b3d1 100644 --- a/src/core_env.sig +++ b/src/core_env.sig @@ -27,6 +27,8 @@ signature CORE_ENV = sig + val liftConInCon : int -> Core.con -> Core.con + type env val empty : env @@ -44,8 +46,8 @@ signature CORE_ENV = sig val pushERel : env -> string -> Core.con -> env val lookupERel : env -> int -> string * Core.con - val pushENamed : env -> string -> int -> Core.con -> env - val lookupENamed : env -> int -> string * Core.con + val pushENamed : env -> string -> int -> Core.con -> Core.exp option -> env + val lookupENamed : env -> int -> string * Core.con * Core.exp option val declBinds : env -> Core.decl -> env -- cgit v1.2.3