http://pastebin.com/zqhCpxvLIn a nutshell:
0 to: 11 do: [:i|
myWait := Delay forMilliseconds: i.
Transcript show: (myWait asString),':';cr.
5 timesRepeat: [Transcript show: (Time millisecondsToRun: [1000
timesRepeat: [myWait wait]]);cr.]].
delay of 0 => 0 ms
delay of 1 => 2 ms
delay of 2 => 2 ms
delay of 3 => 4 ms
delay of 4 => 4 ms
delay of 5 => 6 ms
etc
Not a real biggie, but just seemed odd.
Lawson