summaryrefslogtreecommitdiff
path: root/test-suite/bugs/closed/5449.v
blob: d7fc2aaa002ca2e3d10fe5d727f881b9d7af818e (plain)
1
2
3
4
5
6
(* An example of decide equality which was failing due to a lhs dep into the rhs *)

Require Import Coq.PArith.BinPos.
Goal forall x y, {Pos.compare_cont Gt x y = Gt} + {Pos.compare_cont Gt x y <> Gt}.
intros.
decide equality.