compiler/PEGFsaState.st
changeset 518 a6d8b93441b0
parent 516 3b81c9e53352
child 525 751532c8f3db
--- a/compiler/PEGFsaState.st	Mon Aug 17 13:39:38 2015 +0100
+++ b/compiler/PEGFsaState.st	Mon Aug 17 23:11:56 2015 +0100
@@ -558,12 +558,9 @@
 !
 
 isFailure
-    self error: 'Obsolete?'.
-    "
-    ^ self isFinal and: [ retval class == PEGFsaFailure ]
-    "
+    ^ self isFinal
 
-    "Modified: / 17-08-2015 / 12:01:54 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 17-08-2015 / 13:45:51 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 isFinal