hg/stx-goodies-petitparser: compiler/tests/extras/PPCLRPComment.st@439c4057517f

author	Jan Vrany <jan.vrany@fit.cvut.cz>
	Mon, 24 Aug 2015 23:42:53 +0100
changeset 529	439c4057517f
parent 511	527038bc8edf
permissions	-rw-r--r--

PPCConfiguration refactoring [1/10]: renamed PPCArguments to PPCCompilationOptions Renamed PPCConfiguration>>#arguments/#arguments: to #options/#options:


"{ Package: 'stx:goodies/petitparser/compiler/tests/extras' }"

"{ NameSpace: Smalltalk }"

PPCLRPContainedElement subclass:#PPCLRPComment
	instanceVariableNames:'text'
	classVariableNames:''
	poolDictionaries:''
	category:'PetitCompiler-Extras-Tests-LRP'
!

!PPCLRPComment class methodsFor:'instance creation'!

text: aString
    ^ self new text: aString
! !

!PPCLRPComment methodsFor:'accessing'!

text
    ^ text
!

text: anObject
    text := anObject
! !

!PPCLRPComment methodsFor:'as yet unclassified'!

printOn: aStream
    aStream nextPutAll: 'PPCLRPComment : '.
    aStream nextPutAll: self text asString.
! !