val readTosMinorAgree : unit -> string
type application = { name : string, rname : string, gname : string option, email : string,
- forward : bool, uses : string, other : string }
+ forward : bool, uses : string, other : string,
+ paypal : string option, checkout : string option }
- val apply : application -> bool
+ val apply : application -> string option
val validEmail : string -> bool
- val validUser : string -> bool
+ val validUsername : string -> bool
val userExists : string -> bool
- val confirm : int * string -> string option
+ val confirm : int * string -> bool
end