Patrick Rein uploaded a new version of Kernel to project The Trunk: http://source.squeak.org/trunk/Kernel-pre.1494.mcz
==================== Summary ====================
Name: Kernel-pre.1494 Author: pre Time: 9 December 2022, 1:42:08.910273 pm UUID: d92399e5-4fb3-cf4e-be36-234ca24a3d01 Ancestors: Kernel-ct.1493
Categorizes previously uncategorized methods.
=============== Diff against Kernel-ct.1493 ===============
Item was changed: + ----- Method: AttemptToWriteReadOnlyGlobal>>description (in category 'printing') ----- - ----- Method: AttemptToWriteReadOnlyGlobal>>description (in category 'as yet unclassified') ----- description "Return a textual description of the exception."
| desc mt | desc := 'Error'. ^(mt := self messageText) == nil ifTrue: [desc] ifFalse: [desc, ': ', mt]!
Item was changed: + ----- Method: AttemptToWriteReadOnlyGlobal>>isResumable (in category 'priv handling') ----- - ----- Method: AttemptToWriteReadOnlyGlobal>>isResumable (in category 'as yet unclassified') ----- isResumable ^true!
Item was changed: + ----- Method: BrokenPromise>>defaultAction (in category 'priv handling') ----- - ----- Method: BrokenPromise>>defaultAction (in category 'as yet unclassified') ----- defaultAction self messageText: 'Promise was rejected'. ^super defaultAction!
Item was changed: + ----- Method: BrokenPromise>>isResumable (in category 'priv handling') ----- - ----- Method: BrokenPromise>>isResumable (in category 'as yet unclassified') ----- isResumable ^ true!
Item was changed: + ----- Method: BrokenPromise>>promise (in category 'accessing') ----- - ----- Method: BrokenPromise>>promise (in category 'as yet unclassified') ----- promise ^ promise!
Item was changed: + ----- Method: BrokenPromise>>promise: (in category 'accessing') ----- - ----- Method: BrokenPromise>>promise: (in category 'as yet unclassified') ----- promise: aPromise promise := aPromise!
Item was changed: + ----- Method: MessageCatcher>>doesNotUnderstand: (in category 'system primitives') ----- - ----- Method: MessageCatcher>>doesNotUnderstand: (in category 'as yet unclassified') ----- doesNotUnderstand: aMessage
accumulator ifNotNil: [accumulator add: aMessage]. ^ aMessage!
Item was changed: + ----- Method: MessageCatcher>>privAccumulator (in category 'private - accessing') ----- - ----- Method: MessageCatcher>>privAccumulator (in category 'as yet unclassified') ----- privAccumulator
^ accumulator!
Item was changed: + ----- Method: MessageCatcher>>privAccumulator: (in category 'private - accessing') ----- - ----- Method: MessageCatcher>>privAccumulator: (in category 'as yet unclassified') ----- privAccumulator: collection
accumulator := collection!