X-Git-Url: https://git.hcoop.net/hcoop/domtool2.git/blobdiff_plain/35659203a708078cdec25ff74adbe1e9168934d6..b25161c70648676e61db4eead37a84f460182576:/src/dbms.sml diff --git a/src/dbms.sml b/src/dbms.sml index cc00d04..0b40b26 100644 --- a/src/dbms.sml +++ b/src/dbms.sml @@ -28,7 +28,8 @@ type handler = {getpass : (unit -> Client.passwd_result) option, adduser : {user : string, passwd : string option} -> string option, passwd : {user : string, passwd : string} -> string option, createdb : {user : string, dbname : string} -> string option, - dropdb : {user : string, dbname : string} -> string option} + dropdb : {user : string, dbname : string} -> string option, + grant : {user : string, dbname : string} -> string option} val dbmses : handler StringMap.map ref = ref StringMap.empty