GDBMIParser.st
changeset 95 f417138e9c48
parent 91 472a4841a8b6
child 99 56b66436a713
--- a/GDBMIParser.st	Mon Jan 08 19:43:49 2018 +0000
+++ b/GDBMIParser.st	Thu Jan 11 23:53:06 2018 +0000
@@ -239,12 +239,17 @@
     | c |
 
     c := self peek.
-    (c == Character return or:[ c == Character cr ]) ifTrue:[
-	self next
+    c == Character return"CR" ifTrue:[ 
+        self next.
+        c := self peek.
+    ].
+    c == Character lf"LF" ifTrue:[
+        self next
     ].
 
     "Created: / 30-05-2014 / 09:52:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 31-05-2014 / 00:38:17 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 12-01-2018 / 08:56:40 / jv"
 !
 
 parseNonBlankSequence