September 2017 Update

Task/Tokenize-a-string/Logtalk/tokenize-a-string-1.logtalk

@@ -1,22 +0,0 @@
-:- object(spliting).
-
-    :- public(convert/2).
-    :- mode(convert(+atom, -atom), one).
-
-    convert(StringIn, StringOut) :-
-        atom_chars(StringIn, CharactersIn),
-        phrase(split(',', Tokens), CharactersIn),
-        phrase(split('.', Tokens), CharactersOut),
-        atom_chars(StringOut, CharactersOut).
-
-    split(Separator, [t([Character| Characters])| Tokens]) -->
-        [Character], {Character \== Separator}, split(Separator, [t(Characters)| Tokens]).
-    split(Separator, [t([])| Tokens]) -->
-        [Separator], split(Separator, Tokens).
-    split(_, [t([])]) -->
-        [].
-    % the look-ahead in the next rule prevents adding a spurious separator at the end
-    split(_, []), [Character] -->
-        [Character].
-
-:- end_object.

Task/Tokenize-a-string/Logtalk/tokenize-a-string-2.logtalk

@@ -1,3 +0,0 @@
-| ?- spliting::convert('Hello,How,Are,You,Today', Converted).
-Converted = 'Hello.How.Are.You.Today'
-yes