On 23-09-15 03:21, Peter Uhnák wrote:
         aMorph passenger do: [ :each |
             each isClass ifTrue: [
                 each methods do: [ :method |
                    self addMorph: (CodeCard class: method methodClass
selector: method selector)
                ]
             ].
             each isCompiledMethod ifTrue: [
                 self addMorph: (CodeCard class: each methodClass
selector: each selector)
             ]
         ]

Takes 14 seconds with Morph, and the result is not exactly usable.
For the method category, I suppose I can ask the TransferMorph for the
dragSource which I can ask for the currrent selection to find out which class is meant.

Stephan


Reply via email to