exception Key_already_in of string;;
exception Key_not_found of string;;
class map dbname =
let perm = 420 in (* permission 644 in decimal notation *)
exception Key_already_in of string;;
exception Key_not_found of string;;
class map dbname =
let perm = 420 in (* permission 644 in decimal notation *)