parsers/java/PJIdentifierNode.st
changeset 435 3bc08fb90133
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/parsers/java/PJIdentifierNode.st	Tue Apr 21 14:57:16 2015 +0100
@@ -0,0 +1,35 @@
+"{ Package: 'stx:goodies/petitparser/parsers/java' }"
+
+"{ NameSpace: Smalltalk }"
+
+PJExpressionNode subclass:#PJIdentifierNode
+	instanceVariableNames:'name'
+	classVariableNames:''
+	poolDictionaries:''
+	category:'PetitJava-AST'
+!
+
+PJIdentifierNode comment:'An identifier node. Variable name is identifier'
+!
+
+!PJIdentifierNode class methodsFor:'instance-creation'!
+
+newWithName: aString
+	^ super new name: aString; yourself
+! !
+
+!PJIdentifierNode methodsFor:'accessing'!
+
+acceptVisitor: aVisitor
+
+	^ aVisitor visitIdentifierNode: self
+!
+
+name
+	^ name
+!
+
+name: aString
+	name := aString
+! !
+