<div id="__MailbirdStyleContent" style="font-size: 10pt;font-family: Arial;color: #000000">
                                        
                                        
                                            
                                        
                                        
                                        Hi all!<div><br></div><div>Can I push this to Trunk to have a better image report for 5.3? Especially that bytecode-set encoder stuff... :-)</div><div><br></div><div><img id="c6aaa233-769d-479f-9371-4661747eec5f" src="cid:64157608-397a-4b79-bff6-d40ad1bf9fb3" width="auto"></img><br></div><div><br></div><div>Best,</div><div>Marcel</div><div class="mb_sig"></div>
                                        
                                        <blockquote class="history_container" type="cite" style="border-left-style: solid;border-width: 1px;margin-top: 20px;margin-left: 0px;padding-left: 10px;min-width: 500px">
                        <p style="color: #AAAAAA; margin-top: 10px;">Am 10.12.2019 15:59:41 schrieb commits@source.squeak.org <commits@source.squeak.org>:</p><div style="font-family:Arial,Helvetica,sans-serif">A new version of SystemReporter was added to project The Inbox:<br>http://source.squeak.org/inbox/SystemReporter-mt.41.mcz<br><br>==================== Summary ====================<br><br>Name: SystemReporter-mt.41<br>Author: mt<br>Time: 10 December 2019, 3:59:34.438553 pm<br>UUID: 14618004-0dd4-2343-9469-2dd5aaddd38f<br>Ancestors: SystemReporter-eem.40<br><br>Updates image report.<br><br>=============== Diff against SystemReporter-eem.40 ===============<br><br>Item was added:<br>+ ----- Method: SystemReporter>>countUsesOfBytecodeSetEncoders (in category 'private') -----<br>+ countUsesOfBytecodeSetEncoders<br>+ <br>+   | bag |<br>+      bag := Bag new.<br>+      CompiledMethod allInstancesDo: [:method | <br>+           bag add: method encoderClass].<br>+       ^ BytecodeEncoder allSubclasses collect: [:cls |<br>+             cls -> (bag occurrencesOf: cls)]!<br><br>Item was changed:<br>  ----- Method: SystemReporter>>reportImage: (in category 'reporting') -----<br>  reportImage: aStream<br>+ <br>+    | padding |<br>+  padding := 25.<br>        self header: 'Image' on: aStream.<br>     aStream <br>+             nextPutAll: ('Image name:' padded: #right to: padding with: Character space); nextPutAll: Smalltalk image imageName; cr;<br>+             nextPutAll: ('Image version:'padded: #right to: padding with: Character space); nextPutAll: SystemVersion current version; cr;<br>+               nextPutAll: ('Latest update:' padded: #right to: padding with: Character space); print: SystemVersion current highestUpdate; cr;<br>+             nextPutAll: ('Current change set:' padded: #right to: padding with: Character space); nextPutAll: ChangeSet current name; cr.<br>-                nextPutAll: Smalltalk image imageName; cr;<br>-           nextPutAll: SystemVersion current version; cr;<br>-               nextPutAll: Smalltalk image lastUpdateString; cr;<br>-            nextPutAll: Smalltalk image currentChangeSetString; cr.<br>       [ | imageFormat bitsPerWord |<br>         imageFormat := Smalltalk image imageFormatVersion.<br>    bitsPerWord := Smalltalk image wordSize * 8.<br>+         aStream nextPutAll: ('Image format:' padded: #right to: padding with: Character space);<br>-      aStream nextPutAll: 'Image format ';<br>                          nextPutAll: imageFormat asString;<br>                     nextPutAll: ' (';<br>                     nextPutAll: bitsPerWord asString;<br>                     nextPutAll: ' bit)'; cr]<br>              on: Warning<br>           do: ["primitive not present in VM"].<br>+       aStream nextPutAll: ('Preferred bytecode set:' padded: #right to: padding with: Character space);<br>+                    print:  CompiledCode preferredBytecodeSetEncoderClass;<br>+                       cr.<br>+  self countUsesOfBytecodeSetEncoders do: [:encoderToCount |<br>+           aStream nextPutAll: ' Uses of ', (encoderToCount key name padded: #right to: padding with: Character space); space; print: encoderToCount value; cr].!<br>- !<br><br><br></div></blockquote></div>