 <PRIVATE
 SYMBOL: c-library
 SYMBOL: library-is-c++
-SYMBOL: compiler-args
+SYMBOL: linker-args
 SYMBOL: c-strings
 
 : cleanup-variables ( -- )
-    { c-library library-is-c++ compiler-args c-strings }
+    { c-library library-is-c++ linker-args c-strings }
     [ off ] each ;
 
 : function-types-effect ( -- function types effect )

    ] dip append-function-body c-strings get push ;

: c-link-to ( str -- )
    "-l" prepend compiler-args get push ;

: c-use-framework ( str -- )
    "-framework" swap compiler-args get '[ _ push ] bi@ ;

: c-link-to/use-framework ( str -- )
    os macosx? [ c-use-framework ] [ c-link-to ] if ;

: define-c-library ( name -- )
    c-library-name c-library set
    V{ } clone c-strings set
    V{ } clone linker-args set ;

: compile-c-library ( -- )
    compile-library? [ compile-library ] when
