aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDavid Monniaux <david.monniaux@univ-grenoble-alpes.fr>2019-03-12 20:44:06 +0100
committerDavid Monniaux <david.monniaux@univ-grenoble-alpes.fr>2019-03-12 20:44:06 +0100
commit72e3e2dd1c73469ac2475c2787d2e85437d53b35 (patch)
tree335327d2ac22169684bb69418aa0800580dae1b7
parent691b6d46629006eca9cefcd54f3c513698db5c17 (diff)
downloadcompcert-kvx-72e3e2dd1c73469ac2475c2787d2e85437d53b35.tar.gz
compcert-kvx-72e3e2dd1c73469ac2475c2787d2e85437d53b35.zip
-fpostpass-ilp
-rw-r--r--driver/Compopts.v3
-rw-r--r--driver/Driver.ml1
-rw-r--r--extraction/extraction.v4
-rw-r--r--test/monniaux/quicksort/Makefile9
-rw-r--r--test/monniaux/rules.mk2
5 files changed, 3 insertions, 16 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);
diff --git a/extraction/extraction.v b/extraction/extraction.v
index a7fe8f9f..f58991aa 100644
--- a/extraction/extraction.v
+++ b/extraction/extraction.v
@@ -113,8 +113,6 @@ Extract Constant Compopts.optim_redundancy =>
"fun _ -> !Clflags.option_fredundancy".
Extract Constant Compopts.optim_postpass =>
"fun _ -> !Clflags.option_fpostpass".
-Extract Constant Compopts.optim_pp_optimizer =>
- "fun _ -> !Clflags.option_pp_optimizer".
Extract Constant Compopts.thumb =>
"fun _ -> !Clflags.option_mthumb".
Extract Constant Compopts.debug =>
@@ -193,4 +191,4 @@ Separate Extraction
Floats.Float32.from_parsed Floats.Float.from_parsed
Globalenvs.Senv.invert_symbol
Parser.translation_unit_file
- Compopts.optim_postpass Compopts.optim_pp_optimizer.
+ Compopts.optim_postpass.
diff --git a/test/monniaux/quicksort/Makefile b/test/monniaux/quicksort/Makefile
index e6e83210..98da795a 100644
--- a/test/monniaux/quicksort/Makefile
+++ b/test/monniaux/quicksort/Makefile
@@ -1,8 +1,4 @@
-CFLAGS=-Wall -O3
-K1C_CC=k1-mbr-gcc
-K1C_CFLAGS=-Wall -std=c99 -O2
-K1C_CCOMP=../../../ccomp
-K1C_CCOMPFLAGS=-Wall -O3
+include ../rules.mk
PRODUCTS=quicksort.host quicksort.gcc.k1c.out quicksort.ccomp.k1c.out quicksort.ccomp.k1c.s quicksort.gcc.k1c.s quicksort.gcc.k1c quicksort.ccomp.k1c
@@ -31,9 +27,6 @@ quicksort.gcc.k1c: quicksort.gcc.k1c.o quicksort_run.gcc.k1c.o
quicksort.ccomp.k1c: quicksort.ccomp.k1c.o quicksort_run.gcc.k1c.o
$(K1C_CCOMP) $(K1C_CCOMPFLAGS) $+ -o $@
-%.k1c.out: %.k1c
- k1-cluster --cycle-based -- $< | tee $@
-
clean:
$(RM) -f $(PRODUCTS) quicksort.gcc.k1c.o quicksort.ccomp.k1c.o quicksort_run.gcc.k1c.o quicksort_run.gcc.k1c.s
diff --git a/test/monniaux/rules.mk b/test/monniaux/rules.mk
index ff75b977..eec216bd 100644
--- a/test/monniaux/rules.mk
+++ b/test/monniaux/rules.mk
@@ -7,7 +7,7 @@ K1C_CC=k1-mbr-gcc
K1C_CFLAGS =-g -std=c99 -O2 -Wall -Wextra -Werror=implicit
K1C_CCOMP = ../../../ccomp
-K1C_CCOMPFLAGS=-O3 -Wall -Wno-c11-extensions -fno-unprototyped
+K1C_CCOMPFLAGS=-O3 -Wall -Wno-c11-extensions -fno-unprototyped # -fpostpass-ilp
EXECUTE=k1-cluster --syscall=libstd_scalls.so --