7 function psi\dbm_open(string $file, int $open_flags, int $file_mode) : object {
8 let file = pathval($file);
9 let open_flags = intval($open_flags);
10 let file_mode = intval($file_mode);
11 return dbm_open(file, open_flags, file_mode) as to_object(dbm_open);
14 function psi\dbm_store(object $db, string $key, string $data, int $mode) : int {
16 let key = arrval($key,
20 let content = arrval($data,
24 let store_mode = intval($mode);
25 return dbm_store(db, key, content, store_mode) as to_int(dbm_store);
28 function psi\dbm_fetch(object $db, array $key) : array {
30 let key = arrval($key,
32 dsize = intval($dsize)
34 return dbm_fetch(db, key) as to_array(dbm_fetch,
36 to_string(dptr, dsize)
40 function psi\dbm_close(object $db) : void {
42 return dbm_close(db) as void(dbm_close);