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!