Fix Ltac2 bug in Dawn file
This commit is contained in:
parent
abdc8e5056
commit
d72e64c7f9
|
@ -131,7 +131,7 @@ Ltac2 rec solve_basic () := Control.enter (fun _ =>
|
||||||
| [|- Sem_int ?vs1 apply ?vs2] => apply Sem_apply
|
| [|- Sem_int ?vs1 apply ?vs2] => apply Sem_apply
|
||||||
| [|- Sem_expr ?vs1 (e_comp ?e1 ?e2) ?vs2] => eapply Sem_e_comp; solve_basic ()
|
| [|- Sem_expr ?vs1 (e_comp ?e1 ?e2) ?vs2] => eapply Sem_e_comp; solve_basic ()
|
||||||
| [|- Sem_expr ?vs1 (e_int ?e) ?vs2] => apply Sem_e_int; solve_basic ()
|
| [|- Sem_expr ?vs1 (e_int ?e) ?vs2] => apply Sem_e_int; solve_basic ()
|
||||||
| [|- Sem_e_quote ?vs1 (e_quote ?e) ?vs2] => apply Sem_quote
|
| [|- Sem_expr ?vs1 (e_quote ?e) ?vs2] => apply Sem_e_quote
|
||||||
| [_ : _ |- _] => ()
|
| [_ : _ |- _] => ()
|
||||||
end).
|
end).
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue
Block a user