diff --git a/libao-async-ffi-racket.rkt b/libao-async-ffi-racket.rkt index a99e480..556959b 100644 --- a/libao-async-ffi-racket.rkt +++ b/libao-async-ffi-racket.rkt @@ -1,4 +1,4 @@ -#lang racket/base +(#lang racket/base ;; Pure Racket replacement for ao_playasync.c as used by libao.rkt. ;; @@ -160,7 +160,7 @@ #:mutable ) -(define ao-buf-ms 100) ;; Playback buffer of 0.5s +(define ao-buf-ms 250) ;; Playback buffer of 0.25s (define (get h ms-wait) (let ((el (if (<= ms-wait 0)