Listing permissions
[hcoop/domtool2.git] / src / main.sig
index 7197f36..88e0a65 100644 (file)
@@ -20,8 +20,7 @@
 
 signature MAIN = sig
 
-    val tInit : unit -> Ast.typ
-    val registerDefault : string * Ast.typ * Ast.exp -> unit
+    val init : unit -> unit
 
     val check : string -> Env.env * Ast.exp option
     val check' : Env.env -> string -> Env.env
@@ -31,4 +30,14 @@ signature MAIN = sig
     val reduce : string -> Ast.exp option
     val eval : string -> unit
 
+    val request : string -> unit
+    val requestGrant : Acl.acl -> unit
+    val requestRevoke : Acl.acl -> unit
+    val requestListPerms : string -> (string * string list) list option
+
+    val service : unit -> unit
+    val slave : unit -> unit
+
+    val autodocBasis : string -> unit
+
 end