Windows XP 1011857707 bytecodes/sec; 132044070 sends/sec Debian 1172295363 bytecodes/sec; 144744207 sends/sec
But I think taking the compile: method apart tells a better story ~~~~~~~~~~~~~~~~~~~ code := 'a'. method := Object compiler source: code; requestor: nil; failBlock: [ ^nil ]; compile. all := [ Object compile: code. ]. compile := [ Object compiler source: code; requestor: nil; failBlock: [ ^nil ]; compile. ]. store := [ method putSource: code inFile: 2 withPreamble: [:f | f cr; nextPut: $!; nextChunkPut: 'Behavior method'; cr]. ]. add := [ Object addSelector: method selector withMethod: method notifying: nil. ]. ~~~~~~~~~~~~~~~~~~~ Windows XP: ~~~~~~~~~~~~~~~~~~~~~~~~~~~ all bench. "'183.763 per second'" compile bench. "'10,729 per second'" *store bench. "'286.170 per second'"* add bench. "'697.883 per second'" ~~~~~~~~~~~~~~~~~~~~~~~~~~~ Debian ~~~~~~~~~~~~~~~~~~~~~~~~~~~~ all bench. "'622.551 per second'" compile bench. "'11,129 per second'" *store bench. "'41,604 per second'"* add bench. "'787.885 per second'" ~~~~~~~~~~~~~~~~~~~~~~~~~~~ 150x slower disk operations? -_- I mean for normal programming this doesn't really matter, but when we are downloading even medium-sized package it takes ages to process... Peter
