"{ Package: 'stx:goodies/petitparser/compiler' }"

Object subclass:#PPCOptimizationResult

	instanceVariableNames:'change'

	classVariableNames:''

	poolDictionaries:''

	category:'PetitCompiler-Nodes'

!

new

    "return an initialized instance"

    ^ self basicNew initialize.

nothing

	^ PPCOptimizationResult new

		change: false;

		yourself

! !

!PPCOptimizationResult methodsFor:'accessing'!

change

	change := true.

!

isChange

	^ change

! !

!PPCOptimizationResult methodsFor:'initialization'!

initialize

	change := false

! !