Browse Source

Another timestate example

pr/32
Tony Garnock-Jones 4 years ago
parent
commit
7a4d528dc0
  1. 5
      racket/syndicate/examples/actor/timestate.rkt

5
racket/syndicate/examples/actor/timestate.rkt

@ -21,3 +21,8 @@
(printf "Tick ~v\n" (counter))
(counter (+ (counter) 1))
(deadline (+ (deadline) 1000))))
(spawn* #:name 'demo-sleep
(for [(counter (in-range 10))]
(printf "Sleeping tick ~v\n" counter)
(sleep 1.0)))

Loading…
Cancel
Save