suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

try libpng15 before libpng12

Browse Source
This commit is contained in:
Matthew Flatt 2012-05-05 10:31:50 -06:00
parent b30374824a
commit c5d3750d39
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
collects/racket/draw/unsafe/png.rkt
View File

@ -9,10 +9,10 @@
(define-runtime-lib png-lib (define-runtime-lib png-lib
[(unix) [(unix)
;; Most Linux distros supply "libpng12", while other Unix ;; Most Linux distros supply "libpng12", while other Unix
;; variants often have just "libpng": ;; variants often have just "libpng", etc.
(ffi-lib "libpng12" '("0" "")
#:fail (lambda ()
(ffi-lib "libpng15" '("15" "") (ffi-lib "libpng15" '("15" "")
#:fail (lambda ()
(ffi-lib "libpng12" '("0" "")
#:fail (lambda () #:fail (lambda ()
(ffi-lib "libpng")))))] (ffi-lib "libpng")))))]
[(macosx) (ffi-lib "libpng15.15.dylib")] [(macosx) (ffi-lib "libpng15.15.dylib")]