equal
deleted
inserted
replaced
556 hasZeroPriorityOnly |
556 hasZeroPriorityOnly |
557 ^ self stateInfos allSatisfy: [ :si | si hasPriority not or: [ si priority == 0 ] ]. |
557 ^ self stateInfos allSatisfy: [ :si | si hasPriority not or: [ si priority == 0 ] ]. |
558 ! |
558 ! |
559 |
559 |
560 isFailure |
560 isFailure |
561 self error: 'Obsolete?'. |
561 ^ self isFinal |
562 " |
562 |
563 ^ self isFinal and: [ retval class == PEGFsaFailure ] |
563 "Modified: / 17-08-2015 / 13:45:51 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
564 " |
|
565 |
|
566 "Modified: / 17-08-2015 / 12:01:54 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
567 ! |
564 ! |
568 |
565 |
569 isFinal |
566 isFinal |
570 ^ self stateInfos anySatisfy: [ :info | info isFinal ]. |
567 ^ self stateInfos anySatisfy: [ :info | info isFinal ]. |
571 ! |
568 ! |