;; send and process random control change messages (for testing) (bind-func test (lambda () (rtmidi_send midi_out MIDI_CC 0 1 (i64toi8 (random 128))) (rtmidi_process_message midi_in)))