Small changes to example
This commit is contained in:
@@ -169,7 +169,7 @@
|
|||||||
(letrec ((f (λ ()
|
(letrec ((f (λ ()
|
||||||
(when go-on-counter
|
(when go-on-counter
|
||||||
(send this inc-counter)
|
(send this inc-counter)
|
||||||
(sleep 0.01)
|
(sleep 0.1)
|
||||||
(f)))))
|
(f)))))
|
||||||
(set! go-on-counter #t)
|
(set! go-on-counter #t)
|
||||||
(f)))))
|
(f)))))
|
||||||
|
|||||||
Binary file not shown.
Reference in New Issue
Block a user