~ chicken-core (chicken-5) 92c661162f31370cc534609cd2829a5aa4aaa6bd
commit 92c661162f31370cc534609cd2829a5aa4aaa6bd Author: felix <felix@call-with-current-continuation.org> AuthorDate: Fri Jan 13 12:28:49 2017 +0100 Commit: felix <felix@call-with-current-continuation.org> CommitDate: Fri Jan 13 12:28:49 2017 +0100 csc: collect linked files before creating argument listm diff --git a/csc.scm b/csc.scm index 4175805f..512ea43b 100644 --- a/csc.scm +++ b/csc.scm @@ -915,10 +915,10 @@ EOF ;;; Link object files and libraries: (define (run-linking) + (set! object-files (collect-linked-objects object-files)) (let* ((files (map quotewrap object-files)) (target (quotewrap target-filename)) (targetdir #f)) - (set! object-files (collect-linked-objects object-files)) (command (string-intersperse (cons* (cond (cpp-mode c++-linker)Trap