The Trunk: Compiler-nice.134.mcz

Nicolas Cellier uploaded a new version of Compiler to project The Trunk:
http://source.squeak.org/trunk/Compiler-nice.134.mcz

==================== Summary ====================

Name: Compiler-nice.134
Author: nice
Time: 8 March 2010, 9:07:25.575 pm
UUID: 4c30f651-0c40-a744-ac9c-8528032a661e
Ancestors: Compiler-ar.133

move SyntaxErrorNotification where it belongs, Compiler
This creates a dependency on ToolSet, but Compiler did already depend on System.

=============== Diff against Compiler-ar.133 ===============

Item was added:
+ ----- Method: SyntaxErrorNotification class>>inClass:category:withCode:doitFlag: (in category 'exceptionInstantiator') -----
+ inClass: aClass category: aCategory withCode: codeString doitFlag: doitFlag
+ ^ (self new
+ setClass: aClass
+ category: aCategory
+ code: codeString
+ doitFlag: doitFlag) signal!

Item was added:
+ ----- Method: SyntaxErrorNotification>>doitFlag (in category 'accessing') -----
+ doitFlag
+ ^doitFlag!

Item was added:
+ ----- Method: SyntaxErrorNotification class>>inClass:category:withCode:doitFlag:errorMessage:location: (in category 'exceptionInstantiator') -----
+ inClass: aClass category: aCategory withCode: codeString doitFlag: doitFlag errorMessage: errorString location: location
+ ^ (self new
+ setClass: aClass
+ category: aCategory
+ code: codeString
+ doitFlag: doitFlag
+ errorMessage: errorString
+ location: location) signal!

Item was added:
+ ----- Method: SyntaxErrorNotification>>errorMessage (in category 'accessing') -----
+ errorMessage
+ ^errorMessage!

Item was added:
+ ----- Method: SyntaxErrorNotification>>setClass:category:code:doitFlag:errorMessage:location: (in category 'accessing') -----
+ setClass: aClass category: aCategory code: codeString doitFlag: aBoolean errorMessage: errorString location: anInteger
+ inClass := aClass.
+ category := aCategory.
+ code := codeString.
+ doitFlag := aBoolean.
+ errorMessage := errorString.
+ location := anInteger!

Item was added:
+ ----- Method: SyntaxErrorNotification>>errorCode (in category 'accessing') -----
+ errorCode
+ ^code!

Item was added:
+ ----- Method: SyntaxErrorNotification>>defaultAction (in category 'exceptionDescription') -----
+ defaultAction
+ ^ToolSet debugSyntaxError: self!

Item was added:
+ ----- Method: SyntaxErrorNotification>>category (in category 'accessing') -----
+ category
+ ^category!

Item was added:
+ ----- Method: SyntaxErrorNotification>>errorClass (in category 'accessing') -----
+ errorClass
+ ^inClass!

Item was added:
+ ----- Method: SyntaxErrorNotification>>messageText (in category 'accessing') -----
+ messageText
+ ^ super messageText
+ ifNil: [messageText := code]!

Item was added:
+ ----- Method: SyntaxErrorNotification>>setClass:category:code:doitFlag: (in category 'accessing') -----
+ setClass: aClass category: aCategory code: codeString doitFlag: aBoolean
+ inClass := aClass.
+ category := aCategory.
+ code := codeString.
+ doitFlag := aBoolean !

Item was added:
+ ----- Method: SyntaxErrorNotification>>location (in category 'accessing') -----
+ location
+ ^location!

Item was added:
+ Error subclass: #SyntaxErrorNotification
+ instanceVariableNames: 'inClass code category doitFlag errorMessage location'
+ classVariableNames: ''
+ poolDictionaries: ''
+ category: 'Compiler-Exceptions'!