diff options
-rw-r--r-- | driver/Clflags.ml | 2 | ||||
-rw-r--r-- | scheduling/BTLScheduleraux.ml | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/driver/Clflags.ml b/driver/Clflags.ml index 25bd2c78..bcbf0668 100644 --- a/driver/Clflags.ml +++ b/driver/Clflags.ml @@ -109,7 +109,7 @@ let option_fexpanse_rtlcond = ref false let option_fexpanse_others = ref false let option_fforward_moves = ref false let option_fmove_loop_invariants = ref false -let option_fnontrap_loads = ref true +let option_fnontrap_loads = ref false let option_all_loads_nontrap = ref false let option_inline_auto_threshold = ref 0 let option_profile_arcs = ref false diff --git a/scheduling/BTLScheduleraux.ml b/scheduling/BTLScheduleraux.ml index 75672243..0e682c4c 100644 --- a/scheduling/BTLScheduleraux.ml +++ b/scheduling/BTLScheduleraux.ml @@ -272,7 +272,7 @@ let schedule_blk n ibf btl = | None -> btl let turn_all_loads_nontrap n ibf btl = - if not !config.has_non_trapping_loads then btl + if not !config.has_non_trapping_loads || not !Clflags.option_fnontrap_loads then btl else let rec traverse_rec ib = match ib with |