Sophie Kaleba uploaded a new version of CogTools to project VM Maker:
http://source.squeak.org/VMMaker/CogTools-sk.83.mcz==================== Summary ====================
Name: CogTools-sk.83
Author: sk
Time: 12 July 2017, 10:47:03.322609 am
UUID: 4ec51dec-0dfd-4d08-8ea5-571bb84547b0
Ancestors: CogTools-sk.82
remove duplicated code and unused method
=============== Diff against CogTools-sk.82 ===============
Item was added:
+ ----- Method: PharoVMProfiler class>>spyOn: (in category 'as yet unclassified') -----
+ spyOn: aBlock
+
+ self shouldBeImplemented!
Item was changed:
----- Method: PharoVMProfiler>>initialize (in category 'initialization') -----
initialize
self initializeMost.
- self withDetails: false.
CompatibilityClass := PharoVMMethodConverter new.
- expressionTextMorph := PluggableTextMorph new.
self initializeSymbols.!
Item was changed:
----- Method: SqueakVMProfiler>>initialize (in category 'initialization') -----
initialize
self initializeMost.
- self withDetails: false.
CompatibilityClass := SqueakVMMethodConverter new.
- expressionTextMorph := PluggableTextMorph new.
super initializeSymbols.
self toggleShowing: #module.!
Item was changed:
----- Method: VMProfiler class>>spyOn: (in category 'spying') -----
spyOn: aBlock
+ VMProfiler new
+ class spyOn: aBlock.
- (VMProfiler new) version default
- spyOn: aBlock.
!
Item was removed:
- ----- Method: VMProfiler>>initializeInstance (in category 'initialization') -----
- initializeInstance
- self initializeSamples.
- self clearHistory.
- symbolsMode := #byAddress.
- symbolTypes := IdentitySet new.
- selections := ByteArray new.
- highAddress := lowAddress := minSelectionIndex := maxSelectionIndex := 0.
- aboutToProfile := false.
- total := rangeTotal := startTime := elapsedTime := 0.
- gcPriorToProfile := clearPriorToProfile := true.
- forkProfile := false!
Item was changed:
----- Method: VMProfiler>>initializeMost (in category 'initialization') -----
initializeMost
self initializeSamples.
self clearHistory.
symbolsMode := #byAddress.
symbolTypes := IdentitySet new.
selections := ByteArray new.
+ withDetails := false.
+ expressionTextMorph := PluggableTextMorph new.
highAddress := lowAddress := minSelectionIndex := maxSelectionIndex := 0.
aboutToProfile := false.
total := rangeTotal := startTime := elapsedTime := 0.
gcPriorToProfile := clearPriorToProfile := true.
forkProfile := false!
Item was removed:
- ----- Method: VMProfiler>>version (in category 'accessing') -----
- version
- ^ version !