--- a/compiler/PPCCodeGenerator.st Mon Jun 15 17:47:38 2015 +0100
+++ b/compiler/PPCCodeGenerator.st Mon Jun 15 18:00:44 2015 +0100
@@ -934,10 +934,12 @@
compiler codeClearError.
compiler add: '(', self retvalVar, ' := ', id, ' parseOn: context) isPetitFailure'.
compiler indent.
- compiler add: ' ifTrue: [self error: retval message at: ', self retvalVar, ' position ].'.
+ compiler add: ' ifTrue: [self error: ', self retvalVar, ' message at: ', self retvalVar, ' position ].'.
compiler dedent.
compiler add: 'error := ', self retvalVar, ' isPetitFailure.'.
compiler codeReturn.
+
+ "Modified: / 15-06-2015 / 17:59:23 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
!PPCCodeGenerator class methodsFor:'documentation'!