diff options
author | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2020-04-01 14:24:05 +0200 |
---|---|---|
committer | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2020-04-01 14:24:05 +0200 |
commit | 6379f6291eea909426f074db67837b04a1dec9ae (patch) | |
tree | 1d8a189c2863d7a9be543984badcd119ba4b5b3c /backend | |
parent | d0590cab5ee32df395c129ee3edfa2dc3aaa202d (diff) | |
download | compcert-kvx-6379f6291eea909426f074db67837b04a1dec9ae.tar.gz compcert-kvx-6379f6291eea909426f074db67837b04a1dec9ae.zip |
attempt at compiling
Diffstat (limited to 'backend')
-rw-r--r-- | backend/LICM.v | 9 | ||||
-rw-r--r-- | backend/LICMproof.v | 21 |
2 files changed, 30 insertions, 0 deletions
diff --git a/backend/LICM.v b/backend/LICM.v new file mode 100644 index 00000000..1b5334ba --- /dev/null +++ b/backend/LICM.v @@ -0,0 +1,9 @@ +Require Import Coqlib Maps Errors Integers Floats Lattice Kildall. +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). + +Definition transf_program := Inject.transf_program gen_injections. diff --git a/backend/LICMproof.v b/backend/LICMproof.v new file mode 100644 index 00000000..065a7f74 --- /dev/null +++ b/backend/LICMproof.v @@ -0,0 +1,21 @@ +Require Import Coqlib Maps Errors Integers Floats Lattice Kildall. +Require Import AST Linking. +Require Import Memory Registers Op RTL. +Require Import LICM. +Require Injectproof. + +Definition match_prog : program -> program -> Prop := + Injectproof.match_prog gen_injections. + +Section PRESERVATION. + + Variables prog tprog: program. + Hypothesis TRANSF: match_prog prog tprog. + + Theorem transf_program_correct : + Smallstep.forward_simulation (semantics prog) (semantics tprog). + Proof. + apply Injectproof.transf_program_correct with (gen_injections := gen_injections). + exact TRANSF. + Qed. +End PRESERVATION. |