aboutsummaryrefslogtreecommitdiffstats
path: root/driver
diff options
context:
space:
mode:
authorDavid Monniaux <david.monniaux@univ-grenoble-alpes.fr>2019-05-03 11:34:22 +0200
committerDavid Monniaux <david.monniaux@univ-grenoble-alpes.fr>2019-05-03 11:34:22 +0200
commitad8f16390a68b0cf8e4da39d2ae5d1ad30026803 (patch)
tree5f0e12eccd40bcc688408cb5d07dc8d850832384 /driver
parentfb77ce264f957a1ee3f87e537b55afbb10785ecf (diff)
parentcba53c98b999eea7984e4ffd24a9449abea3e0e2 (diff)
downloadcompcert-kvx-ad8f16390a68b0cf8e4da39d2ae5d1ad30026803.tar.gz
compcert-kvx-ad8f16390a68b0cf8e4da39d2ae5d1ad30026803.zip
Merge remote-tracking branch 'origin/mppa-peephole' into mppa-work
Diffstat (limited to 'driver')
-rw-r--r--driver/Clflags.ml1
-rw-r--r--driver/Compopts.v3
-rw-r--r--driver/Driver.ml1
3 files changed, 5 insertions, 0 deletions
diff --git a/driver/Clflags.ml b/driver/Clflags.ml
index 46f19dcf..b1afab6f 100644
--- a/driver/Clflags.ml
+++ b/driver/Clflags.ml
@@ -70,3 +70,4 @@ let use_standard_headers = ref Configuration.has_standard_headers
let option_fglobaladdrtmp = ref false
let option_fglobaladdroffset = ref false
let option_fxsaddr = ref true
+let option_coalesce_mem = ref true
diff --git a/driver/Compopts.v b/driver/Compopts.v
index 3bb7a474..f7de596c 100644
--- a/driver/Compopts.v
+++ b/driver/Compopts.v
@@ -51,6 +51,9 @@ Parameter optim_fglobaladdroffset: unit -> bool.
(** FIXME TEMPORARY Flag -fxsaddr. Use .xs addressing mode (default true) *)
Parameter optim_fxsaddr: unit -> bool.
+(** FIXME TEMPORARY Flag -fcoaelesce-mem. Fuse (default true) *)
+Parameter optim_coalesce_mem: unit -> bool.
+
(** Flag -fthumb. For the ARM back-end. *)
Parameter thumb: unit -> bool.
diff --git a/driver/Driver.ml b/driver/Driver.ml
index 3b0830ad..cfafcaa3 100644
--- a/driver/Driver.ml
+++ b/driver/Driver.ml
@@ -375,6 +375,7 @@ let cmdline_actions =
@ f_opt "globaladdrtmp" option_fglobaladdrtmp
@ f_opt "globaladdroffset" option_fglobaladdroffset
@ f_opt "xsaddr" option_fxsaddr
+ @ f_opt "coalesce-mem" option_coalesce_mem
(* Code generation options *)
@ f_opt "fpu" option_ffpu
@ f_opt "sse" option_ffpu (* backward compatibility *)