added send-async-msg to rsc3/main.rkt

This commit is contained in:
Mustafa 2014-05-17 15:16:20 -07:00
parent 75253c76c9
commit 50094471ab

View file

@ -1567,6 +1567,14 @@
(with-sc3 (lambda (fd) (with-sc3 (lambda (fd)
(send fd msg)))) (send fd msg))))
;; osc message -> ()
;; waits for /done
(define (send-async-msg msg)
(with-sc3 (lambda (fd)
(async fd msg))))
;; port -> ugen -> () ;; port -> ugen -> ()
(define play (define play
(lambda (fd u) (lambda (fd u)