>From 727426ed3e9df7855ce8190345b6ded70adc1e75 Mon Sep 17 00:00:00 2001 From: Kooda Date: Sat, 21 Oct 2017 22:18:03 +0200 Subject: [PATCH] Use the correct output file extension when using csc -c --- csc.scm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/csc.scm b/csc.scm index a4f8f9ac..c24ec836 100644 --- a/csc.scm +++ b/csc.scm @@ -558,9 +558,9 @@ EOF (set! translate-options (cons "-dynamic" translate-options)) ) (unless target-filename (set! target-filename - (if shared - (pathname-replace-extension (first scheme-files) shared-library-extension) - (pathname-replace-extension (first scheme-files) executable-extension) ) ) ) + (cond (shared (pathname-replace-extension (first scheme-files) shared-library-extension)) + (compile-only (pathname-replace-extension (first scheme-files) object-extension)) + (else (pathname-replace-extension (first scheme-files) executable-extension)) ) ) ) (run-translation) ] ) (unless translate-only (run-compilation) -- 2.15.0.rc1