The Trunk: Nebraska-nice.19.mcz

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

The Trunk: Nebraska-nice.19.mcz

commits-2
Nicolas Cellier uploaded a new version of Nebraska to project The Trunk:
http://source.squeak.org/trunk/Nebraska-nice.19.mcz

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

Name: Nebraska-nice.19
Author: nice
Time: 20 October 2009, 12:32:50 pm
UUID: 2dd8d476-2cdb-5f48-9dec-725734e5b773
Ancestors: Nebraska-ar.18

use #fasterKeys

=============== Diff against Nebraska-ar.18 ===============

Item was changed:
  ----- Method: StringSocket class>>showRatesSeen (in category 'as yet unclassified') -----
  showRatesSeen
  "
  StringSocket showRatesSeen
  "
  | answer |
 
  MaxRatesSeen ifNil: [^Beeper beep].
  answer := WriteStream on: String new.
+ MaxRatesSeen fasterKeys sort do: [ :key |
- MaxRatesSeen keys asSortedCollection do: [ :key |
  answer nextPutAll: key printString,'  ',((MaxRatesSeen at: key) // 10000) printString; cr
  ].
  StringHolder new contents: answer contents; openLabel: 'send rates at 10 second intervals'.!

Item was changed:
  ----- Method: CanvasEncoder class>>showStats (in category 'as yet unclassified') -----
  showStats
  "
  CanvasEncoder showStats
  "
  | answer bucket |
 
  SentTypesAndSizes ifNil: [^Beeper beep].
  answer := WriteStream on: String new.
+ SentTypesAndSizes fasterKeys sort do: [ :each |
- SentTypesAndSizes keys asSortedCollection do: [ :each |
  bucket := SentTypesAndSizes at: each.
  answer nextPutAll: each printString,' ',
  bucket first printString,'  ',
  bucket second asStringWithCommas,' ',
  (self nameForCode: each); cr.
  ].
  StringHolder new contents: answer contents; openLabel: 'send/receive stats'.
  !