Allow Tuple.Head and Tuple.Tail to accept any Tuple

Author: Decel

compiler/test/dotc/pos-test-pickling.blacklist

@@ -27,6 +27,8 @@ i9804.scala
 i13433.scala
 i16649-irrefutable.scala
 strict-pattern-bindings-3.0-migration.scala
+i17186b.scala
+i11982a.scala
 
 # Tree is huge and blows stack for printing Text
 i7034.scala

library/src/scala/Tuple.scala

@@ -96,7 +96,7 @@ object Tuple {
   }
 
   /** Type of the head of a tuple */
-  type Head[X <: NonEmptyTuple] = X match {
+  type Head[X <: Tuple] = X match {
     case x *: _ => x
   }
 
@@ -108,7 +108,7 @@ object Tuple {
   }
 
   /** Type of the tail of a tuple */
-  type Tail[X <: NonEmptyTuple] <: Tuple = X match {
+  type Tail[X <: Tuple] <: Tuple = X match {
     case _ *: xs => xs
   }
 

tests/neg/i11982a.scala renamed to tests/pos/i11982a.scala

@@ -6,9 +6,9 @@ object Unpair {
 
   def unpair[X <: Tuple2[?, ?]](
       using a: ValueOf[Tuple.Head[X]],
-            b: ValueOf[Tuple.Head[Tuple.Tail[X]]]  // error
-  ): Tuple2[Tuple.Head[X], Tuple.Head[Tuple.Tail[X]]] =  // error
+            b: ValueOf[Tuple.Head[Tuple.Tail[X]]]
+  ): Tuple2[Tuple.Head[X], Tuple.Head[Tuple.Tail[X]]] =
     type AA = Tuple.Head[X]
-    type BB = Tuple.Head[Tuple.Tail[X]]  // error
+    type BB = Tuple.Head[Tuple.Tail[X]]
     pair[AA, BB](using a, b)
-}
+}

tests/pos/i17186a.scala

@@ -0,0 +1,5 @@
+type second[X <: Tuple2[Any, Any]] = Tuple.Head[Tuple.Tail[X]]
+type middle[X <: Tuple3[Any, Any, Any]] = Tuple.Head[Tuple.Tail[X]]
+
+val a: Tuple.Head[Tuple.Tail[Tuple2[Int, String]]] = ???
+val b: Tuple.Head[Tuple.Tail[Tuple3[Int, String, Boolean]]] = ???

tests/pos/i17186b.scala

@@ -0,0 +1,5 @@
+type SecondOfTwo[X <: Tuple2[Any, Any]] = Tuple.Head[Tuple.Tail[X]]
+val a = implicitly[SecondOfTwo[Tuple2[Int, String]] =:= String]
+
+type LastOfThree[X <: Tuple3[Any, Any, Any]] = Tuple.Tail[Tuple.Tail[X]]
+val b = implicitly[LastOfThree[Tuple3[Int, String, Boolean]] =:= Tuple1[Boolean]]