The Trunk: Exceptions-nice.23.mcz

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

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

Name: Exceptions-nice.23
Author: nice
Time: 8 March 2010, 9:10:16.673 pm
UUID: 5ea95a42-7dcf-4044-ab4b-17c2ec6b50f0
Ancestors: Exceptions-nice.22

move SyntaxErrorNotification where it belongs, Compiler

=============== Diff against Exceptions-nice.22 ===============

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

Item was removed:
- ----- 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 removed:
- ----- Method: SyntaxErrorNotification>>doitFlag (in category 'accessing') -----
- doitFlag
- ^doitFlag!

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

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

Item was removed:
- ----- 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 removed:
- ----- Method: SyntaxErrorNotification>>location (in category 'accessing') -----
- location
- ^location!

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

Item was removed:
- ----- 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 removed:
- ----- Method: SyntaxErrorNotification>>errorMessage (in category 'accessing') -----
- errorMessage
- ^errorMessage!

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

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

Item was removed:
- ----- 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!