equal
deleted
inserted
replaced
2404 |milliseconds| |
2404 |milliseconds| |
2405 |
2405 |
2406 milliseconds := aTimeDurationOrIntegerSeconds isTimeDuration |
2406 milliseconds := aTimeDurationOrIntegerSeconds isTimeDuration |
2407 ifTrue:[ aTimeDurationOrIntegerSeconds asMilliseconds ] |
2407 ifTrue:[ aTimeDurationOrIntegerSeconds asMilliseconds ] |
2408 ifFalse:[ (aTimeDurationOrIntegerSeconds * 1000) truncated]. |
2408 ifFalse:[ (aTimeDurationOrIntegerSeconds * 1000) truncated]. |
2409 ^ self valueWithWatchDog:[^ nil] afterMilliseconds:milliseconds |
2409 ^ self valueWithWatchDog:[nil] afterMilliseconds:milliseconds |
2410 |
2410 |
2411 " |
2411 " |
2412 [ |
2412 [ |
2413 1 to:15 do:[:round | |
2413 1 to:15 do:[:round | |
2414 Transcript showCR:round. |
2414 Transcript showCR:round. |