libao backend no longer necessary, all playing done via ao-play-async

2026-04-15 09:40:46 +02:00
parent fdba3ad8f8
commit 296e4bb687
3 changed files with 40 additions and 186 deletions
--- a/play-test.rkt
+++ b/play-test.rkt
@@ -35,8 +35,7 @@
         (duration (hash-ref frame 'duration))
         )
    (when (eq? ao-h #f)
-      (let ((fmt (ao-mk-format bits-per-sample rate channels 'big-endian)))
-        (set! ao-h (ao-open-live #f fmt))))
+      (set! ao-h (ao-open-live bits-per-sample rate channels 'big-endian)))
    ;(displayln 'ao-play)
    (ao-play ao-h second duration buffer buf-len 'flac)
    ;(displayln 'done)