missing conversion to internal version of get-ffi-lib

svn: r3539
2006-06-29 14:10:41 +00:00 · 2006-06-29 14:10:41 +00:00 · 0dca64f8f4
commit 0dca64f8f4
parent 9aa084b1f4
1 changed files with 1 additions and 1 deletions
--- a/collects/mzlib/foreign.ss
+++ b/collects/mzlib/foreign.ss
@ -217,7 +217,7 @@
   [(name lib type) (get-ffi-obj* name lib type #f)]
   [(name lib type failure)
    (let ([name (get-ffi-obj-name 'get-ffi-obj name)]
-          [lib  (get-ffi-lib lib)])
+          [lib  (get-ffi-lib-internal lib)])
      (let-values ([(obj error?)
                    (with-handlers
                        ([exn:fail:filesystem?