let hstring_symbol_table = HString.HStringHashtbl.create 50