Welcome to the CHICKEN Scheme pasting service

channel-receive with timeout added by DerGuteMoritz on Mon Mar 12 13:30:24 2012

#;1> (use channel)
#;2> (define c (make-channel)) (thread-start! (lambda () (thread-sleep! 5) (channel-enqueue c 1)))
#<thread: thread46>
#;4> (channel-receive c 2)
#f
#;5> (channel-receive c 2)
#f
#;6> (channel-receive c 2)
1
#;7>
[ permalink | raw ]

Your annotation:

Enter a new annotation:

Your nick:
The title of your paste:
Your paste (mandatory) :
What's the result of `(apply + (list -3 4 2))'?
Visually impaired? Let me spell it for you (wav file) download WAV