diff --git a/libao-async-ffi-racket.rkt b/libao-async-ffi-racket.rkt
index 31db370..04c1c79 100644
--- a/libao-async-ffi-racket.rkt
+++ b/libao-async-ffi-racket.rkt
@@ -765,12 +765,16 @@
   )
 
 (define (ao_pause_async h paused)
+  (dbg-sound "ao_pause_async ~a" paused)
+  (sync-log-sound)
   (if (ao-handle-paused h)
       (when (eq? paused #f)
         (mutex-unlock (ao-handle-pause-mutex h))
         (set-ao-handle-paused! h #f)
         )
       (when (eq? paused #t)
+        (dbg-sound "locking pause mutex")
+        (sync-log-sound)
         (mutex-lock (ao-handle-pause-mutex h))
         (set-ao-handle-paused! h #t)
         (dbg-sound "paused")
diff --git a/libao.rkt b/libao.rkt
index c6503f9..5672f36 100644
--- a/libao.rkt
+++ b/libao.rkt
@@ -179,6 +179,7 @@
 (rc:define/contract (ao-pause handle pause)
   (rc:-> ao-handle? boolean? void?)
   (dbg-sound "ao-pause ~a" pause)
+  (sync-log-sound)
   (ffi:ao_pause_async (ao-handle-async-player handle) (if (eq? pause #f) 0 1))
   )