From 33c93006b7685092b5239ea001058578fac3552f Mon Sep 17 00:00:00 2001
From: Emilio Jesus Gallego Arias
Date: Tue, 16 Oct 2018 01:28:36 +0200
Subject: [clib] Deprecate string functions available in OCaml 4.05

- `CString.strip -> String.trim`
- `CString.split -> String.split_on_char`

As noted by @ppedrot there are some small differences on semantics:

> OCaml's `trim` also takes line feeds (LF) into account. Similarly,
> OCaml's `split` never returns an empty list whereas Coq's `split`
> does on the empty string.
---
 ide/coqide.ml      | 2 +-
 ide/preferences.ml | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

(limited to 'ide')

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
-- 
cgit v1.2.3