[squeak-dev] The Trunk: System-cmm.1369.mcz
commits at source.squeak.org
commits at source.squeak.org
Thu Sep 8 05:10:21 UTC 2022
Chris Muller uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-cmm.1369.mcz
==================== Summary ====================
Name: System-cmm.1369
Author: cmm
Time: 8 September 2022, 12:10:18.750061 am
UUID: a8c13c20-b18b-4b8a-a5a1-e2ddcbd0a856
Ancestors: System-cmm.1368
Handle ProvideAnswerNotification's during headless operation the same as an Error (print and exit).
=============== Diff against System-cmm.1368 ===============
Item was changed:
----- Method: SmalltalkImage>>run: (in category 'command line') -----
run: aBlock
[ [ self patchSystem.
(aBlock numArgs = 1 and: [ self arguments size > 1 ])
ifTrue: [ "Allow a large, variable number of arguments to be passed as an Array to aBlock."
aBlock value: self arguments ]
ifFalse: [ aBlock valueWithEnoughArguments: self arguments ] ]
- on: ProgressInitiationException
- do:
- [ : pie | "Don't want to log this notification."
- pie defaultAction ] ]
- on: Notification , Warning
- do:
- [ : noti | FileStream stdout
- nextPutAll: DateAndTime now asString ;
- space ;
- nextPutAll: noti description ;
- cr.
- noti resume ]
on: SyntaxErrorNotification
do:
[ : err | FileStream stdout
nextPutAll: err errorCode ;
cr; flush.
self isHeadless
ifTrue: [ self snapshot: false andQuit: true ]
ifFalse: [ err pass ] ]
+ on: Error , ProvideAnswerNotification
- on: Error
do:
[ : err | err printVerboseOn: FileStream stderr.
FileStream stderr flush.
self isHeadless
ifTrue: [ self snapshot: false andQuit: true ]
+ ifFalse: [ err pass ] ]
+ on: ProgressInitiationException
+ do:
+ [ : pie | "Don't want to log this Notification."
+ pie defaultAction ] ]
+ on: Notification , Warning
+ do:
+ [ : noti | FileStream stdout
+ nextPutAll: DateAndTime now asString ;
+ space ;
+ nextPutAll: noti description ;
+ cr.
+ noti resume ]
+ !
- ifFalse: [ err pass ] ]!
More information about the Squeak-dev
mailing list
|