alien.libraries: Normalize the path before opening a dll since

find-library can return paths that have "resource:" in them.
2014-07-08 01:12:44 -05:00 · 2014-07-08 01:12:44 -05:00 · 05aabb13f4
parent 07aa2831a2
commit 05aabb13f4
1 changed files with 1 additions and 0 deletions
--- a/basis/alien/libraries/libraries.factor
+++ b/basis/alien/libraries/libraries.factor
@ -26,6 +26,7 @@ ERROR: no-library name ;
 : lookup-library ( name -- library ) libraries get at ;

 : open-dll ( path -- dll dll-error/f )
+    normalize-path
    [ dlopen dup dll-valid? [ f ] [ dlerror ] if ]
    [ f f ] if* ;