summaryrefslogtreecommitdiff
path: root/driver
diff options
context:
space:
mode:
authorGravatar xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>2013-11-27 08:53:19 +0000
committerGravatar xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>2013-11-27 08:53:19 +0000
commit6ee04b19dc6106932e7498e34c1b4938a94bf074 (patch)
treeab13736cea1d59384199e457a3329f12c0524f84 /driver
parent726c815f2070e9ae40bdf6df1d4e63b4a60b6e09 (diff)
Rename "-fno-sse" into "-fno-fpu" and honor it on PowerPC as well.
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@2374 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'driver')
-rw-r--r--driver/Clflags.ml2
-rw-r--r--driver/Driver.ml5
2 files changed, 4 insertions, 3 deletions
diff --git a/driver/Clflags.ml b/driver/Clflags.ml
index 88983d1..4871222 100644
--- a/driver/Clflags.ml
+++ b/driver/Clflags.ml
@@ -20,7 +20,7 @@ let option_fstruct_return = ref false
let option_fbitfields = ref false
let option_fvararg_calls = ref true
let option_fpacked_structs = ref false
-let option_fsse = ref true
+let option_ffpu = ref true
let option_ffloatconstprop = ref 2
let option_ftailcalls = ref true
let option_falignfunctions = ref (None: int option)
diff --git a/driver/Driver.ml b/driver/Driver.ml
index 4f5100e..5f0ae7e 100644
--- a/driver/Driver.ml
+++ b/driver/Driver.ml
@@ -387,7 +387,7 @@ Language support options (use -fno-<opt> to turn off -f<opt>) :
-fall Activate all language support options above
-fnone Turn off all language support options above
Code generation options: (use -fno-<opt> to turn off -f<opt>) :
- -fsse (IA32) Use SSE2 instructions for some integer operations [on]
+ -ffpu Use FP registers for some integer operations [on]
-fsmall-data <n> Set maximal size <n> for allocation in small data area
-fsmall-const <n> Set maximal size <n> for allocation in small constant area
-ffloat-const-prop <n> Control constant propagation of floats
@@ -508,7 +508,8 @@ let cmdline_actions =
@ f_opt "vararg-calls" option_fvararg_calls
@ f_opt "packed-structs" option_fpacked_structs
@ f_opt "inline-asm" option_finline_asm
- @ f_opt "sse" option_fsse
+ @ f_opt "fpu" option_ffpu
+ @ f_opt "sse" option_ffpu (* backward compatibility *)
let _ =
Gc.set { (Gc.get()) with Gc.minor_heap_size = 524288 };