From d6668caf7d1e946da7c9779e14dff32177cc8a4f Mon Sep 17 00:00:00 2001 From: Joe Groff Date: Tue, 13 Sep 2011 14:48:11 -0700 Subject: [PATCH] compiler.cfg.builder.alien: fix caller-linkage to return the DLL and not the library tuple again; fixes issue #121 --- basis/compiler/cfg/builder/alien/alien.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/basis/compiler/cfg/builder/alien/alien.factor b/basis/compiler/cfg/builder/alien/alien.factor index 8c1a213fb8..ff7a2cdae2 100644 --- 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>> [ ] [