Infinite reccursion in `PP2CompositeNodeTest >> fail:rule:to:end:checkResult:`

[uNouss]

fail: aString rule: aSymbol to: expectedResult end: expectedFailurePosition checkResult: aBoolean 
    | production |
    production := self parserInstanceFor: aSymbol.
  ^ self fail: aString rule: aSymbol to: expectedResult end: expectedFailurePosition checkResult: aBoolean

Can be related to this commit 3462860