From 34f32c6ac00a9c385baf65861d367e0e1006c1ab Mon Sep 17 00:00:00 2001 From: Chantal Keller Date: Wed, 28 Apr 2021 14:09:03 +0200 Subject: prop2bool_hyps insensitive to parenthesis --- src/versions/standard/Tactics_standard.v | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/versions/standard/Tactics_standard.v') diff --git a/src/versions/standard/Tactics_standard.v b/src/versions/standard/Tactics_standard.v index 232ae54..61e663a 100644 --- a/src/versions/standard/Tactics_standard.v +++ b/src/versions/standard/Tactics_standard.v @@ -23,7 +23,7 @@ Ltac get_hyps_acc acc k := match goal with | [ H : ?P |- _ ] => let T := type of P in - match T with + lazymatch T with | Prop => lazymatch P with | id _ => fail -- cgit