1external setlocale : string -> unit = "caml_setlocale" 2external get_enc : unit -> string = "get_enc" 3