diff options
author | Léo Gourdin <leo.gourdin@univ-grenoble-alpes.fr> | 2021-04-09 15:39:36 +0200 |
---|---|---|
committer | Léo Gourdin <leo.gourdin@univ-grenoble-alpes.fr> | 2021-04-09 15:39:36 +0200 |
commit | b9e034e713231dd7a43b91b7264c616554d33721 (patch) | |
tree | b9388fdea4ca05f15f25abea490ec3aae6b30e7c /scheduling | |
parent | b7720bc5973e9890e7c320bb34b784e2e2b2da69 (diff) | |
download | compcert-kvx-b9e034e713231dd7a43b91b7264c616554d33721.tar.gz compcert-kvx-b9e034e713231dd7a43b91b7264c616554d33721.zip |
removing useless flag check
Diffstat (limited to 'scheduling')
-rw-r--r-- | scheduling/RTLpathScheduleraux.ml | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/scheduling/RTLpathScheduleraux.ml b/scheduling/RTLpathScheduleraux.ml index cbd13588..aeed39df 100644 --- a/scheduling/RTLpathScheduleraux.ml +++ b/scheduling/RTLpathScheduleraux.ml @@ -284,9 +284,7 @@ let rec do_schedule code pm = function | [] -> (code, pm) | sb :: lsb -> (*debug_flag := true;*) - let (code_exp, pm) = - if !Clflags.option_fexpanse_rtlcond then (expanse sb code pm) - else (code, pm) in + let (code_exp, pm) = expanse sb code pm in (*debug_flag := false;*) (* Trick: instead of turning loads into non trap as needed.. * First, we turn them all into non-trap. |