diff --git a/pkgs/racket-test-core/tests/racket/sync.rktl b/pkgs/racket-test-core/tests/racket/sync.rktl index aeb6627bb0..c7d1220aef 100644 --- a/pkgs/racket-test-core/tests/racket/sync.rktl +++ b/pkgs/racket-test-core/tests/racket/sync.rktl @@ -1432,7 +1432,7 @@ (test val values got))) (try values 'ok-channel) - (try (lambda (c) (choice-evt c (alarm-evt (+ 10000 (current-milliseconds))))) + (try (lambda (c) (choice-evt c (alarm-evt (+ 10000 (current-inexact-milliseconds))))) 'ok-channel+alarm)) ;; ----------------------------------------