|
|
@ -58,7 +58,7 @@ |
|
|
|
(var buffer (* fvec_t) (new_fvec buffer-size)) |
|
|
|
|
|
|
|
(var sound-source (* aubio_source_t) |
|
|
|
(new_aubio_source "Tone_440.wav" sample-rate hop-size)) |
|
|
|
(new_aubio_source "assets/Tone_440.wav" sample-rate hop-size)) |
|
|
|
(var frames-read uint_t 0) |
|
|
|
(aubio_source_do sound-source buffer (addr frames-read)) |
|
|
|
(printf "Read %d frames\n" frames-read) |
|
|
@ -121,5 +121,3 @@ |
|
|
|
(add-library-dependency "aubio") |
|
|
|
;; TODO: Relative path is going to break for sure |
|
|
|
(add-library-runtime-search-directory "../Dependencies/aubio/build/src") |
|
|
|
|
|
|
|
(set-cakelisp-option executable-output "test/aubioTest") |
|
|
|