--- a/analyzer/tests/PPAnalyzerTest.st Tue Mar 04 21:25:41 2014 +0100
+++ b/analyzer/tests/PPAnalyzerTest.st Tue Mar 04 21:26:16 2014 +0100
@@ -417,23 +417,23 @@
!
testRepetitionReplace
- | one two otherone othertwo repetition |
- one := $a asParser.
- two := $b asParser.
- otherone := $1 asParser.
- othertwo := $2 asParser.
-
- repetition := one starLazy: two.
- self assert: repetition children first == one.
- self assert: repetition children second == two.
-
- repetition replace: one with: otherone.
- self assert: repetition children first == otherone.
- self assert: repetition children second == two.
-
- repetition replace: two with: othertwo.
- self assert: repetition children first == otherone.
- self assert: repetition children second == othertwo
+ | one two otherone othertwo repetition |
+ one := $a asParser.
+ two := $b asParser.
+ otherone := $1 asParser.
+ othertwo := $2 asParser.
+
+ repetition := one starLazy: two.
+ self assert: repetition children first == one.
+ self assert: repetition children second == two.
+
+ repetition replace: one with: otherone.
+ self assert: repetition children first == otherone.
+ self assert: repetition children second == two.
+
+ repetition replace: two with: othertwo.
+ self assert: repetition children first == otherone.
+ self assert: repetition children second == othertwo
!
testTransformIdentityGrammarC
@@ -532,10 +532,10 @@
!PPAnalyzerTest class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/goodies/petitparser/analyzer/tests/PPAnalyzerTest.st,v 1.2 2014-03-04 20:10:20 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/goodies/petitparser/analyzer/tests/PPAnalyzerTest.st,v 1.3 2014-03-04 20:26:16 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/goodies/petitparser/analyzer/tests/PPAnalyzerTest.st,v 1.2 2014-03-04 20:10:20 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/goodies/petitparser/analyzer/tests/PPAnalyzerTest.st,v 1.3 2014-03-04 20:26:16 cg Exp $'
! !