summaryrefslogtreecommitdiff
path: root/backend/Allocproof.v
diff options
context:
space:
mode:
Diffstat (limited to 'backend/Allocproof.v')
-rw-r--r--backend/Allocproof.v10
1 files changed, 0 insertions, 10 deletions
diff --git a/backend/Allocproof.v b/backend/Allocproof.v
index bbe9ba3..9303878 100644
--- a/backend/Allocproof.v
+++ b/backend/Allocproof.v
@@ -1606,16 +1606,6 @@ Proof.
red; intros; subst r. rewrite H in H8; discriminate.
Qed.
-Lemma wt_instr_inv:
- forall s f sp pc rs m i,
- wt_state (RTL.State s f sp pc rs m) ->
- f.(RTL.fn_code)!pc = Some i ->
- exists env, wt_instr f env i /\ wt_regset env rs.
-Proof.
- intros. inv H. exists env; split; auto.
- inv WT_FN. eauto.
-Qed.
-
(** The proof of semantic preservation is a simulation argument of the
"plus" kind. *)