-
This commit is contained in:
@@ -18,7 +18,8 @@
|
|||||||
)
|
)
|
||||||
|
|
||||||
(define lib (get-lib '("ao-play-async" "libao-play-async") '(#f)))
|
(define lib (get-lib '("ao-play-async" "libao-play-async") '(#f)))
|
||||||
(define-ffi-definer define-libao-async lib)
|
(define-ffi-definer define-libao-async lib
|
||||||
|
#:default-make-fail make-not-available)
|
||||||
|
|
||||||
(define _libao-async-handle-pointer (_cpointer 'ao-async-handle))
|
(define _libao-async-handle-pointer (_cpointer 'ao-async-handle))
|
||||||
|
|
||||||
|
|||||||
@@ -27,7 +27,8 @@
|
|||||||
|
|
||||||
|
|
||||||
(define ao_lib (get-lib '("libao") '("5" "4" "3" #f)))
|
(define ao_lib (get-lib '("libao") '("5" "4" "3" #f)))
|
||||||
(define-ffi-definer define-libao ao_lib)
|
(define-ffi-definer define-libao ao_lib
|
||||||
|
#:default-make-fail make-not-available)
|
||||||
|
|
||||||
(define _libao-pointer (_cpointer 'ao_device))
|
(define _libao-pointer (_cpointer 'ao_device))
|
||||||
(define-cstruct _ao_sample_format (
|
(define-cstruct _ao_sample_format (
|
||||||
|
|||||||
@@ -16,7 +16,8 @@
|
|||||||
|
|
||||||
|
|
||||||
(define lib (get-lib '("libFLAC") '(#f)))
|
(define lib (get-lib '("libFLAC") '(#f)))
|
||||||
(define-ffi-definer define-libflac lib)
|
(define-ffi-definer define-libflac lib
|
||||||
|
#:default-make-fail make-not-available)
|
||||||
|
|
||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
;; Some FLAC Constants
|
;; Some FLAC Constants
|
||||||
|
|||||||
@@ -68,7 +68,9 @@
|
|||||||
|
|
||||||
(define libtag (get-lib '("tag" "libtag") '("2" #f)))
|
(define libtag (get-lib '("tag" "libtag") '("2" #f)))
|
||||||
(define libtag_c (get-lib '("tag_c" "libtag_c") '("#2" #f)))
|
(define libtag_c (get-lib '("tag_c" "libtag_c") '("#2" #f)))
|
||||||
(define-ffi-definer define-tag-c-lib libtag_c)
|
|
||||||
|
(define-ffi-definer define-tag-c-lib libtag_c
|
||||||
|
#:default-make-fail make-not-available)
|
||||||
|
|
||||||
(define TagLib_File_Type
|
(define TagLib_File_Type
|
||||||
(_enum '(
|
(_enum '(
|
||||||
|
|||||||
Reference in New Issue
Block a user