Skip to content
Snippets Groups Projects
Commit fe9fe32a authored by Robbert Krebbers's avatar Robbert Krebbers
Browse files

Test.

parent b81fb0fc
No related branches found
No related tags found
1 merge request!296Do not call `done` recursively when solving `is_Some`.
Pipeline #50431 passed
From stdpp Require Import tactics.
From stdpp Require Import tactics option.
Goal P1 P2 P3 P4 (P: Prop),
P1 (Is_true (P2 || P3)) P4
......@@ -69,3 +69,8 @@ universe, like [Is_true : bool → Prop]. *)
Goal True.
let x := mk_evar true in idtac.
Abort.
(** Make sure that [done] is not called recursively when solving [is_Some],
which might leave an unresolved evar before performing ex falso. *)
Goal False is_Some (@None nat).
Proof. done. Qed.
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment