compiler.cfg.builder.alien: fix caller-linkage to return the DLL and not the library tuple again; fixes issue #121

2011-09-13 14:48:11 -07:00 · 2011-09-13 14:48:11 -07:00 · d6668caf7d
parent a5788c4205
commit d6668caf7d
1 changed files with 1 additions and 1 deletions
--- a/basis/compiler/cfg/builder/alien/alien.factor
+++ b/basis/compiler/cfg/builder/alien/alien.factor
@ -92,7 +92,7 @@ M: array dlsym-valid? '[ _ dlsym ] any? ;
 : caller-linkage ( params -- symbols dll )
    [ dup abi>> callee-cleanup? [ decorated-symbol ] [ function>> ] if ]
    [ library>> library ]
-    bi 2dup check-dlsym ;
+    bi 2dup check-dlsym library-dll ;

 : caller-return ( params -- )
    return>> [ ] [