diff options
| author | Emilio Jesus Gallego Arias | 2018-10-02 15:59:06 +0200 |
|---|---|---|
| committer | Emilio Jesus Gallego Arias | 2018-10-02 16:00:22 +0200 |
| commit | 87d5e79baea4f3679a1429d2a2e128b564eec5d5 (patch) | |
| tree | b8c6f4999bbb806bcceaec22fbe482a839246cfd /tools/coqdep_common.ml | |
| parent | e65d160d5fa4e0b8b5754b0925b0b5a880523bc5 (diff) | |
[ocaml] [lib] Remove some compatibility layers for OCaml < 4.03.0
Diffstat (limited to 'tools/coqdep_common.ml')
| -rw-r--r-- | tools/coqdep_common.ml | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/tools/coqdep_common.ml b/tools/coqdep_common.ml index 23b8bc112e..6a913ea894 100644 --- a/tools/coqdep_common.ml +++ b/tools/coqdep_common.ml @@ -41,10 +41,6 @@ let norec_dirs = ref StrSet.empty let suffixe = ref ".vo" -[@@@ocaml.warning "-3"] (* String.capitalize_ascii since 4.03.0 GPR#124 *) -let capitalize = String.capitalize -[@@@ocaml.warning "+3"] - type dir = string option (** [get_extension f l] checks whether [f] has one of the extensions @@ -473,7 +469,7 @@ let mL_dependencies () = printf "%s_MLPACK_DEPENDENCIES:=%s\n" efullname (String.concat " " dep); printf "%s.cmo:$(addsuffix .cmo,$(%s_MLPACK_DEPENDENCIES))\n" efullname efullname; printf "%s.cmx:$(addsuffix .cmx,$(%s_MLPACK_DEPENDENCIES))\n" efullname efullname; - let efullname_capital = capitalize (Filename.basename efullname) in + let efullname_capital = String.capitalize_ascii (Filename.basename efullname) in List.iter (fun dep -> printf "%s.cmx : FOR_PACK=-for-pack %s\n" dep efullname_capital) dep; |