ocaml - 在 ocaml 中编组一个哈希表

Question

我在 ocaml 中有一个哈希表，我想将整个哈希表作为值字段存储在 Berkeley DB 中。所以我正在尝试使用 Marshal.to_string 对哈希表进行编组。这会返回一个字符串，但是当我尝试使用 Marshal.from_string 解组相同的字符串时，会引发异常。关于这里的问题有什么想法吗？

Answer 1

您必须注释要解组的值的类型。像这样（在顶层）：

type t = (string, string) Hashtbl.t;;

let key = "key" in
let t_original : t = Hashtbl.create 1 in
Hashtbl.add t_original key "value";
let t_marshalled = Marshal.to_string t_original [] in
let t_unmarshalled : t = Marshal.from_string t_marshalled 0 in
assert ((Hashtbl.find t_original key) = (Hashtbl.find t_unmarshalled key));;