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));;