get-midi-device-names-alist   scheme


Defined in:  https://github.com/digego/extempore/tree/v0.8.9/examples/sharedsystem/midisetup.xtm

Implementation

;; helper for doing regex-based matching of device names
(define get-midi-device-names-alist
  (lambda ()
    (make-list-with-proc
     (pm_count_devices)
     (lambda (id) (cons id (cptr->string (pm_device_name id)))))))


Back to Index