From 4d57af6bc4fd30dd761576b21cde1c5e6d0b8110 Mon Sep 17 00:00:00 2001 From: Ralf Jung <jung@mpi-sws.org> Date: Thu, 18 Oct 2018 16:28:59 +0200 Subject: [PATCH] note some FIXMEs --- theories/program_logic/language.v | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/theories/program_logic/language.v b/theories/program_logic/language.v index 5512fb3f3..58b8cc5c7 100644 --- a/theories/program_logic/language.v +++ b/theories/program_logic/language.v @@ -120,7 +120,7 @@ Section language. rtc erased_step Ï1 Ï2 → ∃ n κs, nsteps n Ï1 κs Ï2. Proof. - induction 1; firstorder; eauto. + induction 1; firstorder; eauto. (* FIXME: [naive_solver eauto] should be able to handle this *) Qed. Lemma of_to_val_flip v e : of_val v = e → to_val e = Some v. @@ -171,6 +171,7 @@ Section language. t1 ≡ₚ t1' → erased_step (t1,σ1) (t2,σ2) → ∃ t2', t2 ≡ₚ t2' ∧ erased_step (t1',σ1) (t2',σ2). Proof. intros Heq [? Hs]. pose proof (step_Permutation _ _ _ _ _ _ Heq Hs). firstorder. + (* FIXME: [naive_solver] should be able to handle this *) Qed. Record pure_step (e1 e2 : expr Λ) := { -- GitLab