added send-async-msg to rsc3/main.rkt
This commit is contained in:
parent
75253c76c9
commit
50094471ab
1 changed files with 8 additions and 0 deletions
|
@ -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)
|
||||||
|
|
Loading…
Reference in a new issue