~ chicken-core (chicken-5) 1d136037b61acbf3503f8680fc576e28800b4145

commit 1d136037b61acbf3503f8680fc576e28800b4145
Author:     Christian Kellermann <ckeen@pestilenz.org>
AuthorDate: Tue Apr 24 22:17:34 2012 +0200
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Fri Apr 27 23:00:53 2012 +0200

    Do not set other optimising options in -O5 than the optimising level
    
    This has been reported as bug #817 by Sven Hartrumpf
    
    Signed-off-by: felix <felix@call-with-current-continuation.org>

diff --git a/csc.scm b/csc.scm
index 3ba50075..68834ea6 100644
--- a/csc.scm
+++ b/csc.scm
@@ -674,10 +674,7 @@ EOF
 	       [(|-O3|) (set! rest (cons* "-optimize-level" "3" rest))]
 	       [(|-O4|) (set! rest (cons* "-optimize-level" "4" rest))]
 	       [(|-O5|)
-		(set! rest (cons* "-optimize-level" "5" rest))
-		(when (memq (build-platform) '(mingw32 cygwin gnu clang))
-		  (set! compile-options 
-		    (cons* "-O3" "-fomit-frame-pointer" compile-options)) ) ]
+		(set! rest (cons* "-optimize-level" "5" rest))]
 	       [(|-d0|) (set! rest (cons* "-debug-level" "0" rest))]
 	       [(|-d1|) (set! rest (cons* "-debug-level" "1" rest))]
 	       [(|-d2|) (set! rest (cons* "-debug-level" "2" rest))]