X-Git-Url: https://git.hcoop.net/hcoop/domtool2.git/blobdiff_plain/00a077ab9685604472c9727eaf2b2be258f0268a..fe789bea628b15229156c8a4272c2b6063c9b1a0:/src/main.sig

diff --git a/src/main.sig b/src/main.sig
index 55ad560..231fafc 100644
--- a/src/main.sig
+++ b/src/main.sig
@@ -23,14 +23,14 @@ signature MAIN = sig
     val init : unit -> unit
     val setupUser : unit -> string
 
-    val check : string -> Env.env * Ast.exp option
+    val check : Env.env -> string -> Env.env * Ast.exp option
     val check' : Env.env -> string -> Env.env
     val checkDir : string -> unit
 
     val basis : unit -> Env.env
 
-    val reduce : string -> Ast.exp option
-    val eval : string -> unit
+    val reduce : Env.env -> string -> Env.env * Ast.exp option
+    val eval : Env.env -> Env.env_vars -> string -> Env.env * Env.env_vars
 
     val request : string -> unit
     val requestDir : string -> unit
@@ -45,6 +45,7 @@ signature MAIN = sig
     val requestRegen : unit -> unit
     val requestRegenTc : unit -> unit
     val requestRmuser : string -> unit
+    val requestDescribe : string -> unit
 
     val requestSlavePing : unit -> OS.Process.status
     val requestSlaveShutdown : unit -> unit
@@ -57,7 +58,7 @@ signature MAIN = sig
 
     val requestDbUser : {dbtype : string, passwd : string option} -> unit
     val requestDbPasswd : {dbtype : string, passwd : string} -> unit
-    val requestDbTable : {dbtype : string, dbname : string} -> unit
+    val requestDbTable : {dbtype : string, dbname : string, encoding : string option} -> unit
     val requestDbDrop : {dbtype : string, dbname : string} -> unit
     val requestDbGrant : {dbtype : string, dbname : string} -> unit