Add Module.uncapitalize
Signed-off-by: Rudi Grinberg <rudi.grinberg@gmail.com>
This commit is contained in:
parent
093cefc58b
commit
4970448edf
|
@ -11,6 +11,8 @@ module Name = struct
|
|||
let of_string = String.capitalize
|
||||
let to_string x = x
|
||||
|
||||
let uncapitalize = String.uncapitalize
|
||||
|
||||
let pp = Format.pp_print_string
|
||||
let pp_quote fmt x = Format.fprintf fmt "%S" x
|
||||
|
||||
|
|
|
@ -10,6 +10,8 @@ module Name : sig
|
|||
val of_string : string -> t
|
||||
val to_string : t -> string
|
||||
|
||||
val uncapitalize : t -> string
|
||||
|
||||
val pp : Format.formatter -> t -> unit
|
||||
val pp_quote : Format.formatter -> t -> unit
|
||||
|
||||
|
|
Loading…
Reference in New Issue