# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1393964776 -3600
# Node ID 32638bbc85376282b42b3936a81ec3f1ead4f348
# Parent  185ab6ab79b3826e7e0804d3908b02799d64442e
moved

diff -r 185ab6ab79b3 -r 32638bbc8537 analyzer/tests/PPAnalyzerTest.st
--- 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 $'
 ! !