Get rid of "shouldsucceed" subdirectory by moving tests to parent directory.

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16797 85f007b7-540e-0410-9357-904b9bb8a0f7

1 files changed, 18 insertions, 0 deletions

diff --git a/test-suite/bugs/closed/1865.v b/test-suite/bugs/closed/1865.v
new file mode 100644
index 000000000..17c199894
--- /dev/null
+++ b/test-suite/bugs/closed/1865.v
@@ -0,0 +1,18 @@
+(* Check that tactics (here dependent inversion) do not generate
+   conversion problems T <= U with sup's of universes in U *)
+
+(* Submitted by David Nowak *)
+
+Inductive list (A:Set) : nat -> Set :=
+| nil : list A O
+| cons : forall n, A -> list A n -> list A (S n).
+
+Definition f (n:nat) : Type :=
+  match n with
+  | O => bool
+  | _ => unit
+  end.
+
+Goal forall A n, list A n -> f n.
+intros A n.
+dependent inversion n.