pause behavior
This commit is contained in:
@@ -765,6 +765,8 @@
|
|||||||
)
|
)
|
||||||
|
|
||||||
(define (ao_pause_async h paused)
|
(define (ao_pause_async h paused)
|
||||||
|
(when (integer? paused)
|
||||||
|
(set! paused (not (= paused 0))))
|
||||||
(dbg-sound "ao_pause_async ~a" paused)
|
(dbg-sound "ao_pause_async ~a" paused)
|
||||||
(sync-log-sound)
|
(sync-log-sound)
|
||||||
(if (ao-handle-paused h)
|
(if (ao-handle-paused h)
|
||||||
|
|||||||
Reference in New Issue
Block a user