diff options
Diffstat (limited to 'driver')
-rw-r--r-- | driver/Compopts.v | 3 | ||||
-rw-r--r-- | driver/Driver.ml | 1 |
2 files changed, 0 insertions, 4 deletions
diff --git a/driver/Compopts.v b/driver/Compopts.v index 16ad7c33..e6eecc9b 100644 --- a/driver/Compopts.v +++ b/driver/Compopts.v @@ -42,9 +42,6 @@ Parameter optim_redundancy: unit -> bool. (** Flag -fpostpass. Postpass scheduling for K1 architecture *) Parameter optim_postpass: unit -> bool. -(** Flag -fpp_optimizer, to specify the postpass optimizer to use *) -Parameter optim_pp_optimizer: unit -> nat. - (** Flag -fthumb. For the ARM back-end. *) Parameter thumb: unit -> bool. diff --git a/driver/Driver.ml b/driver/Driver.ml index 98e057d4..c68c066a 100644 --- a/driver/Driver.ml +++ b/driver/Driver.ml @@ -296,7 +296,6 @@ let cmdline_actions = Exact "-O", Unit (set_all optimization_options); _Regexp "-O[123]$", Unit (set_all optimization_options); Exact "-Os", Set option_Osize; - Exact "-pp-optimizer", String(fun s -> option_pp_optimizer := if (s == "list_scheduler") then 1 else if (s == "cascaded_scheduler") then 2 else 0); Exact "-fsmall-data", Integer(fun n -> option_small_data := n); Exact "-fsmall-const", Integer(fun n -> option_small_const := n); Exact "-ffloat-const-prop", Integer(fun n -> option_ffloatconstprop := n); |