diff options
author | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2020-04-01 16:15:54 +0200 |
---|---|---|
committer | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2020-04-01 16:15:54 +0200 |
commit | aebbc43842ec0c49058b718c685e08edf11ce614 (patch) | |
tree | 4a9418d0e86a88986dbca4f51ecd9a5cfd0c7355 /backend | |
parent | 87d2c34910a017c13a908cfe2cf2c627e56e6cfe (diff) | |
download | compcert-kvx-aebbc43842ec0c49058b718c685e08edf11ce614.tar.gz compcert-kvx-aebbc43842ec0c49058b718c685e08edf11ce614.zip |
route through LICMaux
Diffstat (limited to 'backend')
-rw-r--r-- | backend/LICM.v | 5 | ||||
-rw-r--r-- | backend/LICMaux.ml | 4 |
2 files changed, 5 insertions, 4 deletions
diff --git a/backend/LICM.v b/backend/LICM.v index d45eef43..0a0a1c7d 100644 --- a/backend/LICM.v +++ b/backend/LICM.v @@ -3,10 +3,7 @@ Require Import AST Linking. Require Import Memory Registers Op RTL. Require Inject. -Definition gen_injections (f : function) (max_pc : node) (max_reg : reg): - PTree.t (list Inject.inj_instr) := PTree.empty (list Inject.inj_instr). - -Opaque gen_injections. +Axiom gen_injections : function -> node -> reg -> PTree.t (list Inject.inj_instr). Definition transf_program : program -> res program := Inject.transf_program gen_injections. diff --git a/backend/LICMaux.ml b/backend/LICMaux.ml new file mode 100644 index 00000000..542b6ea8 --- /dev/null +++ b/backend/LICMaux.ml @@ -0,0 +1,4 @@ +open RTL;; + +let gen_injections (f : function) (max_pc : node) (max_reg : reg) = + PTree.empty;; |