10 type app = { id : int, name : string, rname : string, email : string,
11 forward : bool, uses : string, other : string,
12 passwd : string, status : status, applied : Init.C.timestamp,
13 confirmed : Init.C.timestamp option, decided : Init.C.timestamp option,
16 val lookupApp : int -> app
17 val listApps : status -> app list
19 val votes : int -> (int * string) list
20 val vote : int * int -> unit
21 val unvote : int * int -> unit
23 val deny : int * string -> bool
24 val approve : int * string -> bool
26 val abortAdd : int -> unit