From 59be27207e4527661d219991728a1372335ceede Mon Sep 17 00:00:00 2001 From: lduboisd Date: Fri, 8 Apr 2022 17:11:50 +0200 Subject: use of anomaly for timeout --- src/Tactics.v | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Tactics.v') diff --git a/src/Tactics.v b/src/Tactics.v index e41b0f5..c44af14 100644 --- a/src/Tactics.v +++ b/src/Tactics.v @@ -29,7 +29,7 @@ Ltac get_hyps_acc acc k := | id _ => fail | _ => change P with (id P) in H; - match acc with + lazymatch acc with | Some ?t => get_hyps_acc (Some (H, t)) k | None => get_hyps_acc (Some H) k end -- cgit