"{ Package: 'cvut:fel/cface' }"

"{ NameSpace: Cface }"

CModifierNode subclass:#CUnsignedNode

	instanceVariableNames:''

	classVariableNames:''

	poolDictionaries:''

	category:'Cface-C AST'

!

!CUnsignedNode methodsFor:'* As yet uncategorized *'!

ffiPointerTypeSymbol

    ^type ffiPointerTypeSymbol

    "Created: / 18-07-2011 / 17:01:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"

! !

!CUnsignedNode methodsFor:'accessing'!

ffiTypeSymbol

    "Superclass Cface::CModifierNode says that I am responsible to implement this method"

    ^'u', type ffiTypeSymbol

    "Created: / 03-07-2008 / 22:59:26 / Jan Vrany <vranyj1@fel.cvut.cz>"

! !

!CUnsignedNode methodsFor:'printing'!

printOn: stream indent: indent

    stream 

        nextPutAll:'unsigned '; 

        cr;

        next: indent + 1 put: Character tab.

    type printOn: stream indent: indent + 1.

    "Created: / 04-03-2008 / 10:57:12 / janfrog"

! !

!CUnsignedNode methodsFor:'testing'!

isCUnsignedNode

    ^ true

    "Created: / 17-02-2008 / 21:52:38 / janfrog"

! !

!CUnsignedNode methodsFor:'visiting'!

acceptVisitor:aVisitor 

    "Double dispatch back to the visitor, passing my type encoded in

     the selector (visitor pattern)"

    "stub code automatically generated - please change if required"

    ^ aVisitor visitCUnsignedNode:self

    "Created: / 12-02-2008 / 22:14:55 / janfrog"

!

isCIntNode

    ^type isCIntNode

    "Created: / 09-07-2008 / 20:23:24 / Jan Vrany <vranyj1@fel.cvut.cz>"

! !

!CUnsignedNode class methodsFor:'documentation'!

version

!

version_SVN

    ^ '$Id$'

! !