sig
type t
type open_flag = Dbm_rdonly | Dbm_wronly | Dbm_rdwr | Dbm_create
val opendbm :
string -> Kwdbm.DbmType.open_flag list -> int -> Kwdbm.DbmType.t
val close : Kwdbm.DbmType.t -> unit
val find : Kwdbm.DbmType.t -> string -> string
val firstkey : Kwdbm.DbmType.t -> string
val nextkey : Kwdbm.DbmType.t -> string
exception Dbm_error of string
val add : Kwdbm.DbmType.t -> string -> string -> unit
val replace : Kwdbm.DbmType.t -> string -> string -> unit
val remove : Kwdbm.DbmType.t -> string -> unit
val iter : (string -> string -> 'a) -> Kwdbm.DbmType.t -> unit
end