class: EvalScriptingErrorHandler
changed: #showErrorOrWarning:as:position:to:from:
--- a/EvalScriptingErrorHandler.st Mon May 18 16:48:37 2015 +0200
+++ b/EvalScriptingErrorHandler.st Fri May 22 20:33:21 2015 +0200
@@ -62,6 +62,12 @@
lineNr := myStream isNil ifTrue:[1] ifFalse:[myStream lineNumber ? '?'].
pos := position ? '?'.
+errorOrWarning printCR.
+errorOrWarning lineNr.
+errorOrWarning pos.
+errorOrWarning aMessage.
+('[%1 %2/%3] %4' bindWith:errorOrWarning with:lineNr with:pos with:aMessage) printCR.
+
Stderr nextPutLine:('[%1 %2/%3] %4' bindWith:errorOrWarning with:lineNr with:pos with:aMessage).
currentSource notNil ifTrue:[
Stderr
@@ -91,10 +97,10 @@
!EvalScriptingErrorHandler class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libcomp/EvalScriptingErrorHandler.st,v 1.6 2015-03-20 23:34:30 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libcomp/EvalScriptingErrorHandler.st,v 1.7 2015-05-22 18:33:21 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libcomp/EvalScriptingErrorHandler.st,v 1.6 2015-03-20 23:34:30 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libcomp/EvalScriptingErrorHandler.st,v 1.7 2015-05-22 18:33:21 cg Exp $'
! !