hg/stx-goodies-petitparser: comparison analyzer/tests/PPAnalyzerTest.st

equal deleted inserted replaced

-:185ab6ab79b3
+:32638bbc8537
 	self assert: list children second == one.
 	self assert: list children last == other
 !
 testRepetitionReplace
-	| one two otherone othertwo repetition |
+| one two otherone othertwo repetition |
-	one := $a asParser.
+one := $a asParser.
-	two := $b asParser.
+two := $b asParser.
-	otherone := $1 asParser.
+otherone := $1 asParser.
-	othertwo := $2 asParser.
+othertwo := $2 asParser.
-	repetition := one starLazy: two.
+repetition := one starLazy: two.
-	self assert: repetition children first == one.
+self assert: repetition children first == one.
-	self assert: repetition children second == two.
+self assert: repetition children second == two.
-	repetition replace: one with: otherone.
+repetition replace: one with: otherone.
-	self assert: repetition children first == otherone.
+self assert: repetition children first == otherone.
-	self assert: repetition children second == two.
+self assert: repetition children second == two.
-	repetition replace: two with: othertwo.
+repetition replace: two with: othertwo.
-	self assert: repetition children first == otherone.
+self assert: repetition children first == otherone.
-	self assert: repetition children second == othertwo
+self assert: repetition children second == othertwo
 !
 testTransformIdentityGrammarC
 	| orig tran |
 	orig := self grammarC.
 ! !
 !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 $'
 ! !

changeset 263	32638bbc8537
parent 259	0f1afe248885
child 325	cd6b25955d98