suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Forgot properties

Browse Source 
svn: r15270
This commit is contained in:
Jay McCarthy 2009-06-25 19:01:10 +00:00
parent cc7bd5597b
commit 2abe1fd5d2
1 changed files with 7 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
collects/frtime/tests/time.ss Normal file
View File

@ -0,0 +1,7 @@
#lang frtime
(require frtime/etc)
(define x (rec y (0 . until . (add1 (inf-delay y)))))
(==> (filter-e zero? (changes (modulo seconds 10)))
(lambda (v)
(printf "~S~n" (value-now x))))