From de0085539583f59dc7c4bf4e272e18711d565466 Mon Sep 17 00:00:00 2001 From: Samuel Mimram Date: Thu, 13 Jul 2006 14:28:31 +0000 Subject: Imported Upstream version 8.0pl3+8.1beta.2 --- test-suite/success/Case19.v | 8 ++++++++ 1 file changed, 8 insertions(+) create mode 100644 test-suite/success/Case19.v (limited to 'test-suite/success/Case19.v') diff --git a/test-suite/success/Case19.v b/test-suite/success/Case19.v new file mode 100644 index 00000000..9a6ed71a --- /dev/null +++ b/test-suite/success/Case19.v @@ -0,0 +1,8 @@ +(* This used to fail in Coq version 8.1 beta due to a non variable + universe (issued by the inductive sort-polymorphism) being sent by + pretyping to the kernel (bug #1182) *) + +Variable T : Type. +Variable x : nat*nat. + +Check let (_, _) := x in sigT (fun _ : T => nat). -- cgit v1.2.3