val declare_table : string -> (string, string) Stdlib.Hashtbl.t -> unitval declare_translations : string -> (string * string) list -> unitval add_translations : string -> (string * string) list -> unitval same : string -> string * string
type storage = [ | `LocalStorage | 
| `Cookie | 
| `Temp | 
 ]
val set : ?set:storage -> string -> unitval get : unit -> string optionval s_ : string -> stringval pcdata_s : string -> [> `PCDATA ] Ocp_js.eltval txt_s : string -> [> `PCDATA ] Ocp_js.elt
type string_id
val ss_ : string -> string_idval t_ : string_id -> stringval pcdata_t : string_id -> [> `PCDATA ] Ocp_js.eltval txt_t : string_id -> [> `PCDATA ] Ocp_js.eltval id_ : string_id -> string