-

2026-02-26 16:51:01 +01:00
parent c2ef8bcc99
commit eac031c17f
2 changed files with 2 additions and 2 deletions
--- a/libao/libao.rkt
+++ b/libao/libao.rkt
@@ -187,7 +187,7 @@
         (audio-buf-len (* channels bytes-per-sample buf-len))
         (audio (if (eq? libao-async-mode 'ffi)
                    (malloc 'atomic audio-buf-len)
-                    (malloc 'raw audio-buf-len)))
+                    (malloc 'atomic audio-buf-len)))   ; was: 'raw
         (get-sample (lambda (k channel)
                       (let ((chan-buf (list-ref buffer channel)))
                         (vector-ref chan-buf k))))