"{ Package: 'stx:libtool' }"

SyntaxElement subclass:#SyntaxElementVariable

	instanceVariableNames:'name assigned'

	classVariableNames:''

	poolDictionaries:''

	category:'Interface-CodeView-Syntax'

!

!SyntaxElementVariable class methodsFor:'documentation'!

documentation

"

 Replace 'SyntaxElement', 'NewClass1' and

 the empty string arguments by true values.

 Install (or change) the class by 'accepting',

 either via the menu or the keyboard (usually CMD-A).

 You can also change the category simply by editing

 the categoryString and accepting.

 To be nice to others (and yourself later), do not forget to

 add some documentation; preferably under the classes documentation

 protocol.

 (see the `create documentation stubs' item in the methodList menu;

  switch from instance to class to find this menu item.)

 Notice, that ST/X uses the convention to document the class using

 comment-only class methods (however, ST80 comments are supported and

 can be changed via the class-documentation menu).

"

! !

!SyntaxElementVariable methodsFor:'accessing'!

assigned

    ^ assigned

!

assigned:something

    assigned := something.

!

name

    ^ name

!

name:something

    name := something.

! !

!SyntaxElementVariable methodsFor:'queries'!

isClass

    ^ type == #class

!

isGlobal 

    ^ (type == #GlobalVariable) or:[ type == #class]

!

isInstanceVariable

    ^ (type == #InstanceVariable) 

!

isVariable

    ^ true

! !

!SyntaxElementVariable class methodsFor:'documentation'!

version

    ^ '$Header: /cvs/stx/stx/libtool/SyntaxElementVariable.st,v 1.4 2013-06-24 17:09:21 cg Exp $'

!

version_CVS

    ^ '$Header: /cvs/stx/stx/libtool/SyntaxElementVariable.st,v 1.4 2013-06-24 17:09:21 cg Exp $'

! !