added send-msg to rsc3/main.rkt
This commit is contained in:
parent
6e125ef878
commit
53a86bf848
1 changed files with 5 additions and 0 deletions
|
@ -1562,6 +1562,11 @@
|
|||
(lambda (fd n u)
|
||||
(async fd (d-recv (encode-graphdef (synthdef n u))))))
|
||||
|
||||
;; osc message -> ()
|
||||
(define (send-msg msg)
|
||||
(with-sc3 (lambda (fd)
|
||||
(send fd msg))))
|
||||
|
||||
;; port -> ugen -> ()
|
||||
(define play
|
||||
(lambda (fd u)
|
||||
|
|
Loading…
Reference in a new issue