"
 COPYRIGHT (c) 2006 by eXept Software AG
	      All Rights Reserved

 This software is furnished under a license and may be used
 only in accordance with the terms of that license and with the
 inclusion of the above copyright notice.   This software may not
 be provided or otherwise made available to, or used by, any
 other person.  No title to or ownership of the software is
 hereby transferred.
"
"{ Package: 'stx:libtool' }"

SyntaxElement subclass:#SyntaxElementVariable
	instanceVariableNames:'name assigned'
	classVariableNames:''
	poolDictionaries:''
	category:'Interface-CodeView-Syntax'
!

!SyntaxElementVariable class methodsFor:'documentation'!

copyright
"
 COPYRIGHT (c) 2006 by eXept Software AG
	      All Rights Reserved

 This software is furnished under a license and may be used
 only in accordance with the terms of that license and with the
 inclusion of the above copyright notice.   This software may not
 be provided or otherwise made available to, or used by, any
 other person.  No title to or ownership of the software is
 hereby transferred.
"
!

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 ? false
!

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.6 2014-02-05 18:57:25 cg Exp $'
!

version_CVS
    ^ '$Header: /cvs/stx/stx/libtool/SyntaxElementVariable.st,v 1.6 2014-02-05 18:57:25 cg Exp $'
! !