diff options
-rw-r--r-- | scheduling/BTLtoRTLproof.v | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/scheduling/BTLtoRTLproof.v b/scheduling/BTLtoRTLproof.v index 4ef55928..cbdc81bd 100644 --- a/scheduling/BTLtoRTLproof.v +++ b/scheduling/BTLtoRTLproof.v @@ -232,8 +232,8 @@ Proof. inv MIB. exists pc'; split; auto; constructor. apply plus_one. inv LOAD. eapply exec_Iload; eauto. - 2: destruct (eval_addressing _ _ _ _) eqn:EVAL; - [ eapply exec_Iload_notrap2 | eapply exec_Iload_notrap1]; eauto. + all: try (destruct (eval_addressing _ _ _ _) eqn:EVAL; + [ eapply exec_Iload_notrap2 | eapply exec_Iload_notrap1]; eauto). all: erewrite <- eval_addressing_preserved; eauto; intros; rewrite symbols_preserved; trivial. - (* exec_store *) |