#TUNING by exept
authorClaus Gittinger <cg@exept.de>
Sun, 08 Sep 2019 16:47:12 +0200
changeset 24766 9e09c9c8cb95
parent 24765 e91461190d47
child 24767 beb2adab20bb
#TUNING by exept class: PositionableStream changed: #match:
PositionableStream.st
--- a/PositionableStream.st	Sun Sep 08 16:36:39 2019 +0200
+++ b/PositionableStream.st	Sun Sep 08 16:47:12 2019 +0200
@@ -323,7 +323,7 @@
     [pattern atEnd] whileFalse: [
         self atEnd ifTrue: [^ false].
         (self next) = (pattern next) 
-            ifTrue: [pattern position = 1 ifTrue: [startMatch := self position]]
+            ifTrue: [pattern position == 1 ifTrue: [startMatch := self position]]
             ifFalse: [
                 pattern position: 0.
                 startMatch ifNotNil: [