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

fixed typo

Browse Source 
svn: r3071
This commit is contained in:
Matthew Flatt 2006-05-26 12:12:26 +00:00
parent 67b5c30218
commit 4a0d8018b1
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/mzlib/foreign.ss
View File

@ -168,7 +168,7 @@
[name (if (regexp-match lib-suffix-re name0) ; name + suffix [name (if (regexp-match lib-suffix-re name0) ; name + suffix
(string-append name0 version) (string-append name0 version)
(string-append name0 "." lib-suffix version))]) (string-append name0 "." lib-suffix version))])
(or (and absolute? (or (and (not absolute?)
(ormap (lambda (dir) (ormap (lambda (dir)
;; try good name first, then original ;; try good name first, then original
(or (ffi-lib (build-path dir name) #t) (or (ffi-lib (build-path dir name) #t)