"{ Package: 'stx:goodies/smaCC' }"

"{ NameSpace: SmaCC }"

SmaCCSymbol subclass:#SmaCCNonTerminalSymbol

	instanceVariableNames:'productions'

	classVariableNames:''

	poolDictionaries:''

	category:'SmaCC-Parser Generator'

!

SmaCCNonTerminalSymbol comment:'SmaCCNonTerminalSymbol represents a non-terminal symbol in our grammar.

Instance Variables:

	productions	<SequenceableCollection of: SmaCCRHS>	our rhs'' for the symbol'

!

!SmaCCNonTerminalSymbol methodsFor:'accessing'!

addProduction: aRHS

	productions add: aRHS

!

calculateFirstTerminals

	| initialSize |

	initialSize := firstItems size.

	productions isEmpty 

		ifTrue: [firstItems add: self class empty]

		ifFalse: [productions do: [:each | firstItems addAll: each firstTerminals]].

	^initialSize ~= firstItems size

!

positionOf: aRHS 

	^productions indexOf: aRHS

!

productionsDo: aBlock 

	productions do: aBlock

!

size

	^productions size

! !

!SmaCCNonTerminalSymbol methodsFor:'initialize-release'!

name: aString 

	super name: aString.

	productions := OrderedCollection new

! !

!SmaCCNonTerminalSymbol methodsFor:'public'!

isEmpty

	^productions isEmpty

!

isTerminal

	^false

! !

!SmaCCNonTerminalSymbol class methodsFor:'documentation'!

version

!

version_SVN

    ^ '$Id$'

! !