Marcel Taeumel uploaded a new version of Chronology-Tests to project The Trunk: http://source.squeak.org/trunk/Chronology-Tests-ct.27.mcz
==================== Summary ====================
Name: Chronology-Tests-ct.27 Author: ct Time: 2 July 2021, 6:29:32.622779 pm UUID: 38ff3da7-0f8e-8340-a4fd-155480a978b0 Ancestors: Chronology-Tests-dtl.25
Revises tests for Duration >> #wait and #busyWait. In particular, fixes a typo (#new instead of #now) in #testWait which made that test pretty much worthless. :-)
Supersedes Chronology-Tests-ct.26.
=============== Diff against Chronology-Tests-dtl.25 ===============
Item was added: + ----- Method: DurationTest>>testBusyWait (in category 'tests') ----- + testBusyWait + + | duration start elapsed | + duration := Duration milliSeconds: 1. + start := DateAndTime now. + + 1000 timesRepeat: [duration busyWait]. + elapsed := DateAndTime now - start. + + self assert: elapsed >= (duration * 1000). + self assert: elapsed <= (duration * 1000 * 2).!
Item was changed: ----- Method: DurationTest>>testWait (in category 'tests') ----- testWait + | duration start elapsed | + duration := Duration milliSeconds: 500. + start := DateAndTime now. + + duration wait. + elapsed := DateAndTime now - start. + + self assert: elapsed >= duration. + self assert: elapsed <= (duration * 2).! - | start | - start := DateAndTime new. - (Duration milliSeconds: 500) wait. - self assert: DateAndTime now - start > (Duration milliSeconds: 500). !
packages@lists.squeakfoundation.org