parsers/java/PJCommentsNode.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Tue, 21 Apr 2015 17:06:24 +0100
changeset 436 e1c44b571db9
parent 435 3bc08fb90133
permissions -rw-r--r--
Fixes for Smalltalk/X * Do not use Character class>>#cr /#lf as semantics of this method differ in Smalltalk/X and Squeak. Use Character class>>#codePoint: instead * Do not use Squeakism Dictionary >> #keysSortedSafely - there is no need for this as all keys are strings.

"{ Package: 'stx:goodies/petitparser/parsers/java' }"

"{ NameSpace: Smalltalk }"

PJSyntaxNode subclass:#PJCommentsNode
	instanceVariableNames:'comment'
	classVariableNames:''
	poolDictionaries:''
	category:'PetitJava-AST'
!

!PJCommentsNode class methodsFor:'as yet unclassified'!

comment: aString
	^(self new) comment: aString; yourself.
! !

!PJCommentsNode methodsFor:'as yet unclassified'!

acceptVisitor: aVisitor
	^ aVisitor visitCommentsNode: self
!

comment
^ comment.
!

comment: aString 
	comment := aString.
!

printOn: aStream
	^	aStream 
		nextPutAll: 'comment value ==> ';
		nextPutAll: self comment.
  
! !