>From 76b0f3cc80805515eef8be044d3abe1f592ad66e Mon Sep 17 00:00:00 2001 From: Evan Hanson Date: Thu, 11 Oct 2012 22:34:21 -0500 Subject: [PATCH] disallow compiling from both stdin & named files --- csc.scm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/csc.scm b/csc.scm index b067c4e..f25a4f0 100644 --- a/csc.scm +++ b/csc.scm @@ -550,6 +550,8 @@ EOF (if shared (pathname-replace-extension f0 shared-library-extension) (pathname-replace-extension f0 executable-extension) ) ) ) ) ] + [(and (member "-" scheme-files) (> (length scheme-files) 1)) + (quit "cannot compile from standard input with named files")] [else (when (and shared (not embedded)) (set! translate-options (cons "-dynamic" translate-options)) ) -- 1.7.12.1