compiler/tests/extras/PPCLRPVariable.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Wed, 26 Aug 2015 23:34:48 +0100
changeset 533 666372dbe307
parent 511 527038bc8edf
permissions -rw-r--r--
PPCConfiguration refactoring: [5/10]: Commented options in PPCCompilationOptions. So it's more clear for what the option is and how to use it. This is a base for user-documentation as options are meant to be set by the end user.

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

"{ NameSpace: Smalltalk }"

PPCLRPContainedElement subclass:#PPCLRPVariable
	instanceVariableNames:'name value'
	classVariableNames:''
	poolDictionaries:''
	category:'PetitCompiler-Extras-Tests-LRP'
!


!PPCLRPVariable class methodsFor:'installation'!

name: aString value: aValue
    |retval|
    retval := self new.
    retval name: aString.
    retval value: aValue.
    ^retval
! !

!PPCLRPVariable methodsFor:'accessing'!

name
    ^ name
!

name: anObject
    name := anObject
!

value
    ^ value
!

value: anObject
    value := anObject
! !

!PPCLRPVariable methodsFor:'printing'!

printOn: aStream
    aStream nextPutAll: 'PPCLRPVariable '.
    aStream nextPutAll: self name.
    aStream nextPutAll: ' : '.
    aStream nextPutAll: self value asString.
    
! !

!PPCLRPVariable methodsFor:'visiting'!

acceptVisitor: aPPCLRPNodeVisitor
    aPPCLRPNodeVisitor visitVariableNode: self
! !

!PPCLRPVariable class methodsFor:'documentation'!

version_HG

    ^ '$Changeset: <not expanded> $'
! !