 : define-c-library ( name -- )
     c-library-name c-library set
     V{ } clone c-strings set
-    V{ } clone compiler-args set ;
+    V{ } clone linker-args set ;
 
 : compile-c-library ( -- )
     compile-library? [ compile-library ] when

<PRIVATE
SYMBOL: c-library
SYMBOL: library-is-c++
SYMBOL: compiler-args
SYMBOL: c-strings

: cleanup-variables ( -- )
    { c-library library-is-c++ compiler-args c-strings }
    [ off ] each ;

: function-types-effect ( -- function types effect )


: compile-library ( -- )
    library-is-c++ get [ C++ ] [ C ] if
    linker-args get
    c-strings get "\n" join
    c-library get compile-to-library ;

