parsers/java/PJSeparatorNode.st
changeset 435 3bc08fb90133
child 436 e1c44b571db9
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/parsers/java/PJSeparatorNode.st	Tue Apr 21 14:57:16 2015 +0100
@@ -0,0 +1,35 @@
+"{ Package: 'stx:goodies/petitparser/parsers/java' }"
+
+"{ NameSpace: Smalltalk }"
+
+PJExpressionNode subclass:#PJSeparatorNode
+	instanceVariableNames:'separatorValue'
+	classVariableNames:''
+	poolDictionaries:''
+	category:'PetitJava-AST'
+!
+
+PJSeparatorNode comment:''
+!
+
+!PJSeparatorNode class methodsFor:'as yet unclassified'!
+
+separatorValue: aString
+
+ ^(self new) separatorValue: aString
+! !
+
+!PJSeparatorNode methodsFor:'as yet unclassified'!
+
+acceptVisitor: aVisitor
+	^ aVisitor visitSeparatorNode: self
+!
+
+separatorValue
+	^ separatorValue.
+!
+
+separatorValue: anObject
+	separatorValue := anObject
+! !
+