aboutsummaryrefslogtreecommitdiffhomepage
path: root/test-suite/bugs/closed/5372.v
diff options
context:
space:
mode:
authorGravatar Tej Chajed <tchajed@mit.edu>2017-03-10 11:05:27 -0500
committerGravatar Tej Chajed <tchajed@mit.edu>2017-03-22 10:05:17 -0400
commit3602b909afc6eac0f150c9961a04b0bf50d8bbf0 (patch)
treee39a63f54546e079e5f2fe29a36edaa68e5ac0e0 /test-suite/bugs/closed/5372.v
parentcd87eac3757d8925ff4ba7dee85efadb195153a3 (diff)
funind: Ignore missing info for current function
Fixes [Coq bug #5372](https://coq.inria.fr/bugs/show_bug.cgi?id=5372) "Anomaly: Not a valid information when defining mutual fixpoints that are not mutual with Function".
Diffstat (limited to 'test-suite/bugs/closed/5372.v')
-rw-r--r--test-suite/bugs/closed/5372.v7
1 files changed, 7 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/5372.v b/test-suite/bugs/closed/5372.v
new file mode 100644
index 000000000..2dc78d4c7
--- /dev/null
+++ b/test-suite/bugs/closed/5372.v
@@ -0,0 +1,7 @@
+(* coq bug 5372: https://coq.inria.fr/bugs/show_bug.cgi?id=5372 *)
+Function odd (n:nat) :=
+ match n with
+ | 0 => false
+ | S n => true
+ end
+with even (n:nat) := false.