From: Mario Domenech Goulart <[email protected]>
Subject: [Chicken-hackers] [PATCH] csc.scm: properly handle -output-file
Date: Wed, 22 Aug 2012 18:00:49 -0400

> Hi,
> 
> The attached patch fixes #903 (csc ignores -output-file).  See
> http://bugs.call-cc.org/ticket/903

May I suggest the attached variant? Your patch still passes -output-file
to the "chicken" executable, but that isn't necessary.


cheers,
felix
diff --git a/csc.scm b/csc.scm
index 7aca745..5c49972 100644
--- a/csc.scm
+++ b/csc.scm
@@ -147,7 +147,7 @@
     -no-procedure-checks-for-toplevel-bindings))
 
 (define-constant complex-options
-  '(-debug -output-file -heap-size -nursery -stack-size -compiler -unit -uses -keyword-style
+  '(-debug -heap-size -nursery -stack-size -compiler -unit -uses -keyword-style
     -optimize-level -include-path -database-size -extend -prelude -postlude -prologue -epilogue 
     -inline-limit -profile-name
     -emit-inline-file -types -emit-type-file
@@ -666,7 +666,7 @@ EOF
 		(when osx 
 		  (set! link-options (cons* "-framework" (car rest) link-options)) )
 		(set! rest (cdr rest)) ]
-	       [(-o)
+	       [(-o -output-file)
 		(check s rest)
 		(let ([fn (car rest)])
 		  (set! rest (cdr rest))
_______________________________________________
Chicken-hackers mailing list
[email protected]
https://lists.nongnu.org/mailman/listinfo/chicken-hackers

Reply via email to