module GettextCategory:sig
..end
type
category =
| |
LC_CTYPE |
| |
LC_NUMERIC |
| |
LC_TIME |
| |
LC_COLLATE |
| |
LC_MONETARY |
| |
LC_MESSAGES |
| |
LC_ALL |
val string_of_category : category -> string
val category_of_string : string -> category
val categories : category list
val compare : category -> category -> int
module MapCategory:Map.Make
(
sig
typet =
GettextCategory.category
val compare :GettextCategory.category -> GettextCategory.category -> int
end
)