--- a/STCCompilerInterface.st Thu Nov 25 20:12:18 2010 +0100
+++ b/STCCompilerInterface.st Thu Nov 25 20:14:39 2010 +0100
@@ -725,16 +725,15 @@
eMsg := 'Error during compilation:\\' withCRs ,
(errorMessages asStringCollection asString).
].
- "/ eMsg := eMsg withCRs
].
- originator activityNotification:'compilation failed'.
- lNr notNil ifTrue:[
- originator parseError:eMsg line:lNr
- ] ifFalse:[
- originator parseError:eMsg position:1.
- ].
+
originator activityNotification:''.
+ Parser::ParseError new
+ lineNumber:lNr;
+ errorMessage:eMsg;
+ raise.
+
"Created: / 07-11-2006 / 12:29:04 / cg"
!
@@ -800,11 +799,11 @@
!STCCompilerInterface class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libcomp/STCCompilerInterface.st,v 1.15 2010-04-16 17:36:24 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libcomp/STCCompilerInterface.st,v 1.16 2010-11-25 19:14:39 stefan Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libcomp/STCCompilerInterface.st,v 1.15 2010-04-16 17:36:24 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libcomp/STCCompilerInterface.st,v 1.16 2010-11-25 19:14:39 stefan Exp $'
! !
STCCompilerInterface initialize!