alien.inline: define-c-library: set "c-library"

2009-07-24 18:24:27 +12:00 · 2009-07-24 18:24:27 +12:00 · f0fb69b9c9
parent 477c52ee34
commit f0fb69b9c9
1 changed files with 1 additions and 1 deletions
--- a/extra/alien/inline/inline.factor
+++ b/extra/alien/inline/inline.factor
@ -65,7 +65,7 @@ PRIVATE>
    concat make-function ;

 : define-c-library ( name -- )
-    c-library-name c-library set
+    c-library-name [ c-library set ] [ "c-library" set ] bi
    V{ } clone c-strings set
    V{ } clone linker-args set ;