steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

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

find-library can return paths that have "resource:" in them.
db4
Doug Coleman 2014-07-08 01:12:44 -05:00
parent 07aa2831a2
commit 05aabb13f4
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
basis/alien/libraries/libraries.factor
View File

@ -26,6 +26,7 @@ ERROR: no-library name ;
: lookup-library ( name -- library ) libraries get at ; : lookup-library ( name -- library ) libraries get at ;
: open-dll ( path -- dll dll-error/f ) : open-dll ( path -- dll dll-error/f )
normalize-path
[ dlopen dup dll-valid? [ f ] [ dlerror ] if ] [ dlopen dup dll-valid? [ f ] [ dlerror ] if ]
[ f f ] if* ; [ f f ] if* ;