The Trunk: System-pre.956.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: System-pre.956.mcz

commits-2
Patrick Rein uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-pre.956.mcz

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

Name: System-pre.956
Author: pre
Time: 28 June 2017, 11:03:30.410481 am
UUID: 7afdd78a-da8d-9c43-a291-f04048ca49c6
Ancestors: System-eem.955

Improves on the description of the garbage collect utility call.

=============== Diff against System-eem.955 ===============

Item was changed:
  ----- Method: Utilities class>>garbageCollectAndReport (in category 'miscellaneous') -----
  garbageCollectAndReport
  "Do a garbage collection, and report results to the user."
 
  | reportString |
  reportString := String streamContents:
  [:aStream |
+ aStream
+ nextPutAll: 'The following amounts of memory are still available:' translated;
+ cr.
  aStream nextPutAll: Smalltalk bytesLeftString.
  Smalltalk at: #Command ifPresent:
  [:cmdClass | | cc |
  (cc := cmdClass instanceCount) > 0 ifTrue:
+ [aStream
+ cr;
+ nextPutAll: '(note: there are ';
+ print: cc;
+ nextPutAll: ' undo record(s) present in your';
+ cr;
+ nextPutAll: 'system; purging them may free up more space.)']]].
- [aStream cr; nextPutAll:
- ('(note: there are ', cc printString,
-                         ' undo record(s) present in your
- system; purging them may free up more space.)')]]].
 
  self inform: reportString
  !