Reordering FFI libs

libao/libao-ffi.rkt

@@ -2,7 +2,6 @@
 
 (require ffi/unsafe
          ffi/unsafe/define
-         setup/dirs
          "../utils/utils.rkt"
          )
 
@@ -27,16 +26,7 @@
          )
 
 
-(define ao_lib (ffi-lib "libao" '("3" "4" "5" #f)
-                        #:get-lib-dirs (λ ()
-                                         (let ((sp (cons (build-path ".") (get-lib-search-dirs))))
-                                           (displayln sp)
-                              sp))
-                        #:fail (λ ()
-                                 (ffi-lib (get-lib-path "libao-4.dll")))
-                        ))
-
-
+(define ao_lib (get-lib '("libao") '("5" "4" "3" #f)))
 (define-ffi-definer define-libao ao_lib)
 
 (define _libao-pointer (_cpointer 'ao_device))