Tx igor. :) I'm looking for examples to teach people how to benchmark. Stef On Feb 8, 2009, at 5:42 PM, Igor Stasenko wrote:
for automated benchmarking i can imagine something like following:
benchButton | browser button canvas time | browser := OBPackageBrowser openOnClass: Object selector: #yourself. browser position: 0@0. button := browser allMorphs detect: [:m | (m isKindOf:PluggableButtonMorph ) and: [ m label = 'browse' ]].
canvas := World assuredCanvas. time := [1000 timesRepeat: [ button fullDrawOn: canvas ]] timeToRun. browser delete. ^ time
-- Best regards, Igor Stasenko AKA sig.
_______________________________________________ Pharo-project mailing list Pharo-project@lists.gforge.inria.fr http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project