2016 Update

2016-12-05 22:15:40 +01:00 · 2016-12-05 22:15:40 +01:00 · dcf5d15da3
commit dcf5d15da3
parent 948b86eafa
7965 changed files with 139854 additions and 31002 deletions
--- a/Task/Tokenize-a-string/OCaml/tokenize-a-string-1.ocaml
+++ b/Task/Tokenize-a-string/OCaml/tokenize-a-string-1.ocaml
@ -1,7 +1,2 @@
-let rec split_char sep str =
-  try
-    let i = String.index str sep in
-    String.sub str 0 i ::
-      split_char sep (String.sub str (i+1) (String.length str - i - 1))
-  with Not_found ->
-    [str]
+let words = String.split_on_char ',' "Hello,How,Are,You,Today" in
+String.concat "." words