X-Git-Url: https://git.hcoop.net/hcoop/domtool2.git/blobdiff_plain/12adf55a902b1d9bde677e4636530e5753857e05..c2ce01bde477e5b32bd287ca34beecc8d490e7e7:/src/env.sig

diff --git a/src/env.sig b/src/env.sig
index e5f19e6..31e6691 100644
--- a/src/env.sig
+++ b/src/env.sig
@@ -49,11 +49,15 @@ signature ENV = sig
 
     val int : int arg
     val string : string arg
+    val bool : bool arg
     val list : 'a arg -> 'a list arg
 
     val none : string -> (unit -> unit) -> action
     val one : string -> string * 'a arg -> ('a -> unit) -> action
     val two : string -> string * 'a arg * string * 'b arg -> ('a * 'b -> unit) -> action
+    val three : string
+		-> string * 'a arg * string * 'b arg * string * 'c arg
+		-> ('a * 'b * 'c -> unit) -> action
 
     val oneV : string -> string * 'a arg -> (env_vars * 'a -> unit) -> action
     val twoV : string -> string * 'a arg * string * 'b arg -> (env_vars * 'a * 'b -> unit) -> action
@@ -65,6 +69,9 @@ signature ENV = sig
     val action_none : string -> (unit -> unit) -> unit
     val action_one : string -> string * 'a arg -> ('a -> unit) -> unit
     val action_two : string -> string * 'a arg * string * 'b arg -> ('a * 'b -> unit) -> unit
+    val action_three : string
+		       -> string * 'a arg * string * 'b arg * string * 'c arg
+		       -> ('a * 'b * 'c -> unit) -> unit
 
     val actionV_none : string -> (env_vars -> unit) -> unit
     val actionV_one : string -> string * 'a arg -> (env_vars * 'a -> unit) -> unit