package annexlib

  1. Overview
  2. Docs
type category = [
  1. | `LC_ALL
  2. | `LC_COLLATE
  3. | `LC_CTYPE
  4. | `LC_MESSAGES
  5. | `LC_MONETARY
  6. | `LC_NUMERIC
  7. | `LC_TIME
]
type numeric_lconv = {
  1. decimal_point : string;
  2. thousands_sep : string;
  3. grouping : string;
}
type sign_pos = [
  1. | `SignPrecedesBoth
  2. | `SignPrecedesCS
  3. | `SignSucceedsBoth
  4. | `SignSucceedsCS
  5. | `SurroundBoth
  6. | `UnknownOrder
]
type monetary_lconv = {
  1. int_curr_symbol : string;
  2. currency_symbol : string;
  3. decimal_point : string;
  4. thousands_sep : string;
  5. grouping : string;
  6. positive_sign : string;
  7. negative_sign : string;
  8. int_frac_digits : int;
  9. frac_digits : int;
  10. p_cs_precedes : bool;
  11. p_sep_by_space : bool;
  12. n_cs_precedes : bool;
  13. n_sep_by_space : bool;
  14. p_sign_posn : sign_pos;
  15. n_sign_posn : sign_pos;
}
val set : ?name:string -> category -> string option
val set_from_env : category -> string option
val get : category -> string
val numeric_info : unit -> numeric_lconv
val monetary_info : unit -> monetary_lconv