Listing permissions

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

diff --git a/src/main.sig b/src/main.sig
index f36fb65..88e0a65 100644 (file)
--- a/src/main.sig
+++ b/src/main.sig
@@ -14,16 +14,30 @@
  * You should have received a copy of the GNU General Public License
  * along with this program; if not, write to the Free Software
  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
  * You should have received a copy of the GNU General Public License
  * along with this program; if not, write to the Free Software
  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.

-*)
+ *)

 
 (* Main interface *)
 
 signature MAIN = sig
 
 
 (* Main interface *)
 
 signature MAIN = sig
 

-    val tInit : Ast.typ
+    val init : unit -> unit

 
 

-    val check : string -> unit
-    val reduce : string -> unit
+    val check : string -> Env.env * Ast.exp option
+    val check' : Env.env -> string -> Env.env
+
+    val basis : unit -> Env.env
+
+    val reduce : string -> Ast.exp option

     val eval : string -> unit
 
     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
 end