pause behavior

2026-05-07 14:56:17 +02:00
parent f0b2d7a6b3
commit d531f9caef
1 changed files with 2 additions and 2 deletions
@@ -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)