-
This commit is contained in:
@@ -233,7 +233,7 @@
|
|||||||
|
|
||||||
(define (ao-pause handle pause)
|
(define (ao-pause handle pause)
|
||||||
(if (eq? libao-async-mode 'ffi)
|
(if (eq? libao-async-mode 'ffi)
|
||||||
(ffi:ao_pause_async (ao-handle-async-player handle) pause)
|
(ffi:ao_pause_async (ao-handle-async-player handle) (if (eq? pause #f) 0 1))
|
||||||
(scm:ao_pause_async (ao-handle-async-player handle) pause)
|
(scm:ao_pause_async (ao-handle-async-player handle) pause)
|
||||||
))
|
))
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user