From 05aabb13f4f6e151fc0b9da0db3fce0125dc74da Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Tue, 8 Jul 2014 01:12:44 -0500 Subject: [PATCH] alien.libraries: Normalize the path before opening a dll since find-library can return paths that have "resource:" in them. --- basis/alien/libraries/libraries.factor | 1 + 1 file changed, 1 insertion(+) diff --git a/basis/alien/libraries/libraries.factor b/basis/alien/libraries/libraries.factor index 5a06b01a84..9dc22f5df3 100755 --- 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* ;