This commit is contained in:
2026-04-07 15:42:08 +02:00
parent cd8e21c4bd
commit 521ce3d55b

View File

@@ -63,7 +63,9 @@
(unless (soundlibs-available?) (unless (soundlibs-available?)
(download-soundlibs)) (download-soundlibs))
(if (null? libs-to-try) (if (null? libs-to-try)
(error (format "Cannot find library, tried ~a" orig-libs)) (begin
(displayln (format "Warning: Cannot find library, tried ~a" orig-libs))
#f)
(ffi-lib (car libs-to-try) versions (ffi-lib (car libs-to-try) versions
#:get-lib-dirs (λ () (cons (build-lib-path) (get-lib-search-dirs))) #:get-lib-dirs (λ () (cons (build-lib-path) (get-lib-search-dirs)))
#:fail (λ () (get-lib* (cdr libs-to-try) orig-libs versions)) #:fail (λ () (get-lib* (cdr libs-to-try) orig-libs versions))