Skip to content
Find file
Fetching contributors…
Cannot retrieve contributors at this time
17 lines (10 sloc) 345 Bytes
! Copyright (C) 2010 John Benediktsson
! See http://factorcode.org/license.txt for BSD license
USING: calendar fast-now kernel math tools.test tools.time ;
IN: fast-now.tests
[ f ] [ now now = ] unit-test
[ t ] [ fast-now fast-now eq? ] unit-test
[ t ] [
[ fast-now [ dup fast-now eq? ] loop drop ] benchmark
1075000 <
] unit-test
Something went wrong with that request. Please try again.