"{ 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
    ^ '$Id$'
!

version_SVN
    ^ '$Id$'
! !