7 		generator'

     7 		generator'

     8 	classVariableNames:''

     8 	classVariableNames:''

     9 	poolDictionaries:''

     9 	poolDictionaries:''

    10 	category:'PetitCompiler-Tests-FSA'

    10 	category:'PetitCompiler-Tests-FSA'

    11 !

    11 !

    12 

    13 

    13 !PEGFsaSequenceDeterminizationTest methodsFor:'as yet unclassified'!

    14 !PEGFsaSequenceDeterminizationTest methodsFor:'as yet unclassified'!

    14 

    15 

    15 assert: anFsa fail: input

    16 assert: anFsa fail: input

    16     | stream |

    17     | stream |

   507     self assert: (newState isFinal).	

   508     self assert: (newState isFinal).	

   508     self assert: (newState priority = 0).		

   509     self assert: (newState priority = 0).		

   509     self assert: (newState isFsaFailure).				

   510     self assert: (newState isFsaFailure).				

   510 ! !

   511 ! !

   511 

   512