2022-08-03 18:02:13 +03:00
|
|
|
(* This file is part of the Catala compiler, a specification language for tax
|
|
|
|
and social benefits computation rules. Copyright (C) 2020 Inria, contributor:
|
|
|
|
Denis Merigoux <denis.merigoux@inria.fr>, Emile Rolley <emile.rolley@tuta.io>
|
|
|
|
|
|
|
|
Licensed under the Apache License, Version 2.0 (the "License"); you may not
|
|
|
|
use this file except in compliance with the License. You may obtain a copy of
|
|
|
|
the License at
|
|
|
|
|
|
|
|
http://www.apache.org/licenses/LICENSE-2.0
|
|
|
|
|
|
|
|
Unless required by applicable law or agreed to in writing, software
|
|
|
|
distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
|
|
|
|
WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. See the
|
|
|
|
License for the specific language governing permissions and limitations under
|
|
|
|
the License. *)
|
|
|
|
|
2022-11-21 13:17:42 +03:00
|
|
|
include module type of Stdlib.String
|
2022-11-22 22:57:59 +03:00
|
|
|
module Set : Set.S with type elt = string
|
|
|
|
module Map : Map.S with type key = string
|
2022-11-21 13:17:42 +03:00
|
|
|
|
2022-08-05 19:33:32 +03:00
|
|
|
(** Helper functions used for string manipulation. *)
|
2022-08-03 18:02:13 +03:00
|
|
|
|
|
|
|
val to_ascii : string -> string
|
|
|
|
(** Removes all non-ASCII diacritics from a string by converting them to their
|
|
|
|
base letter in the Latin alphabet. *)
|
|
|
|
|
2022-08-05 19:18:06 +03:00
|
|
|
val is_uppercase_ascii : char -> bool
|
|
|
|
(** [is_uppercase c] returns if [c] is in the set ['A'...'Z']. *)
|
2022-08-03 18:02:13 +03:00
|
|
|
|
|
|
|
val begins_with_uppercase : string -> bool
|
2022-08-05 19:18:06 +03:00
|
|
|
(** [begins_with_uppercase s] returns if the first letter of [s]
|
|
|
|
{!is_uppercase_ascii}. If [s] is empty returns false. *)
|
2022-08-03 18:02:13 +03:00
|
|
|
|
|
|
|
val to_snake_case : string -> string
|
|
|
|
(** Converts CamlCase into snake_case after removing Remove all diacritics on
|
|
|
|
Latin letters. *)
|
|
|
|
|
|
|
|
val to_camel_case : string -> string
|
|
|
|
(** Converts snake_case into CamlCase after removing Remove all diacritics on
|
|
|
|
Latin letters. *)
|
2022-11-22 22:57:59 +03:00
|
|
|
|
|
|
|
val format_t : Format.formatter -> string -> unit
|