--- a/compiler/PPCTokenStarSeparatorNode.st Tue Apr 21 17:20:11 2015 +0100
+++ b/compiler/PPCTokenStarSeparatorNode.st Thu Apr 30 23:43:14 2015 +0200
@@ -9,23 +9,9 @@
category:'PetitCompiler-Nodes'
!
-!PPCTokenStarSeparatorNode methodsFor:'as yet unclassified'!
+!PPCTokenStarSeparatorNode methodsFor:'visiting'!
-asInlined
- ^ PPCInlineTokenStarSeparatorNode new
- message: message;
- name: name;
- child: child;
- yourself
-!
-
-compileWith: compiler effect: effect id: id
- compiler startMethod: id.
- compiler add: 'context skipSeparators.'.
- ^ compiler stopMethod.
-!
-
-rewrite: changeStatus
- "Nothing to do"
+accept: visitor
+ ^ visitor visitTokenStarSeparatorNode: self
! !