diff options
| author | Pierre-Marie Pédrot | 2018-10-16 19:13:46 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2018-10-16 19:13:46 +0200 |
| commit | 3b1bff3262c7f40c7f4726d773845bfb6552d364 (patch) | |
| tree | 1d4b1fe091c50e7a1acfb6460ec113fd363b5d91 /ide | |
| parent | c64602a8cf882fa2e4b9a85ea9f57b5b709f598f (diff) | |
| parent | 33c93006b7685092b5239ea001058578fac3552f (diff) | |
Merge PR #8738: [clib] Deprecate string functions available in OCaml 4.05
Diffstat (limited to 'ide')
| -rw-r--r-- | ide/coqide.ml | 2 | ||||
| -rw-r--r-- | ide/preferences.ml | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/ide/coqide.ml b/ide/coqide.ml index 00d43e6e64..4190f43680 100644 --- a/ide/coqide.ml +++ b/ide/coqide.ml @@ -769,7 +769,7 @@ let coqtop_arguments sn = let box = dialog#action_area in let ok = GButton.button ~stock:`OK ~packing:box#add () in let ok_cb () = - let nargs = CString.split ' ' entry#text in + let nargs = String.split_on_char ' ' entry#text in if nargs <> args then let failed = Coq.filter_coq_opts nargs in match failed with diff --git a/ide/preferences.ml b/ide/preferences.ml index 9f04ced1c3..6dc922c225 100644 --- a/ide/preferences.ml +++ b/ide/preferences.ml @@ -167,7 +167,7 @@ object method into l = try Some (CList.map (fun s -> - let split = CString.split sep s in + let split = String.split_on_char sep s in CList.nth split 0, CList.nth split 1) l) with Failure _ -> None end |