diff options
Diffstat (limited to 'guile')
| -rw-r--r-- | guile/starlet/midi-control/base.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/guile/starlet/midi-control/base.scm b/guile/starlet/midi-control/base.scm index 9585766..cbd113e 100644 --- a/guile/starlet/midi-control/base.scm +++ b/guile/starlet/midi-control/base.scm @@ -218,7 +218,8 @@ (let again () (let ((bytes-to-send (atomic-box-swap! send-queue '()))) (for-each (lambda (a) - (put-u8 midi-port a)) + (put-u8 midi-port a) + (usleep 1)) bytes-to-send) (usleep 1000) (again)))) |