parsers/java/PJWhileStatementNode.st
changeset 435 3bc08fb90133
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/parsers/java/PJWhileStatementNode.st	Tue Apr 21 14:57:16 2015 +0100
@@ -0,0 +1,39 @@
+"{ Package: 'stx:goodies/petitparser/parsers/java' }"
+
+"{ NameSpace: Smalltalk }"
+
+PJStatementNode subclass:#PJWhileStatementNode
+	instanceVariableNames:'expression statement'
+	classVariableNames:''
+	poolDictionaries:''
+	category:'PetitJava-AST'
+!
+
+PJWhileStatementNode comment:'Node representing a while loop'
+!
+
+!PJWhileStatementNode methodsFor:'accessing'!
+
+expression
+	^ expression
+!
+
+expression: anObject
+	expression := anObject
+!
+
+statement
+	^ statement
+!
+
+statement: anObject
+	statement := anObject
+! !
+
+!PJWhileStatementNode methodsFor:'visiting'!
+
+acceptVisitor: aVisitor
+
+	^ aVisitor visitWhileStatementNode: self
+! !
+