Type-checking goodies in place

[hcoop/domtool2.git] / src / tycheck.sig

diff --git a/src/tycheck.sig b/src/tycheck.sig
index 4562e3c..a86ae37 100644 (file)
--- a/src/tycheck.sig
+++ b/src/tycheck.sig
@@ -20,12 +20,17 @@
 
 signature TYCHECK = sig
 
-    type env = Ast.typ Ast.StringMap.map
+    type env
     val empty : env
 
-    val checkExp : env -> Ast.exp -> Ast.typ
+    val checkTyp : env -> Ast.typ -> Ast.typ
 
+    val checkExp : env -> Ast.exp -> Ast.typ
     val checkUnit : env -> Ast.exp -> Ast.typ
     (* [checkUnit] checks that all unification variables have been resolved. *)
 
+    val checkDecl : env -> Ast.decl -> env
+
+    val checkFile : env -> Ast.typ -> Ast.file -> env
+
 end