sig
type lang_abbrev = string
type lang_data = {
days : string array;
months : string array;
string_of_date : Stog_types.date -> string;
}
val tm_of_date : Stog_types.date -> Unix.tm
val french : Stog_intl.lang_data
val english : Stog_intl.lang_data
val register_lang : Stog_intl.lang_abbrev -> Stog_intl.lang_data -> unit
val set_default_lang : Stog_intl.lang_abbrev -> unit
val data_of_lang : Stog_intl.lang_abbrev option -> Stog_intl.lang_data
val get_month : Stog_intl.lang_abbrev option -> int -> string
val string_of_date :
Stog_intl.lang_abbrev option -> Stog_types.date -> string
val string_of_date_opt :
Stog_intl.lang_abbrev option -> Stog_types.date option -> string
val short_string_of_date : Stog_types.date -> string
end