Comment out tests that dependent on Apply/Unapply

The Unapply match type only worked because of an unsound behavior
in match type reduction. To move forward with HK type class derivation
we need to find an alternative to the Apply/Unapply trick, either using
implicits/macros or by adding a new primitive match type to the compiler.

See discussion in scala/scala3#7389.

Author: OlivierBlanvillain

modules/data/src/test/scala/shapeless3/data/monoidal.scala

@@ -47,6 +47,7 @@ object MonoidalTest {
   type pb = (Double, (Char, Unit))
   type pc = ("i", ("s", ("b", Unit)))
   type pd = ((Int, (String, Unit)), ((Boolean, Unit), (Unit, ((Double, (Char, Unit)), Unit))))
+  /*
   summon[pairs.length[p] =:= 3]
   summon[pairs.reverse[p] =:= (Boolean, (String, (Int, Unit)))]
   summon[pairs.map[p][Option] =:= (Option[Int], (Option[String], (Option[Boolean], Unit)))]
@@ -129,4 +130,5 @@ object MonoidalTest {
   summon[coproduct.flatten[cd] =:= Cp[T[Int, T[String, T[Boolean, T[Double, T[Char, U]]]]]]]
   summon[coproduct.flatMap[cb][orIntc] =:= Cp[T[Double, T[Int, T[Char, T[Int, U]]]]]]
   summon[coproduct.select[c, 1] =:= Cp[T[String, T[Int, T[Boolean, U]]]]]
+  */
 }

modules/deriving/src/test/scala/shapeless3/deriving/adts.scala

@@ -21,24 +21,24 @@ package shapeless3.deriving
 object adts {
   case class ISB(i: Int, s: String, b: Boolean) derives Monoid, Eq, Empty, Show, Read
 
-  case class Box[A](x: A) derives Monoid, Eq, Show, Read, Functor, Pure
+  case class Box[A](x: A) derives Monoid, Eq, Show, Read /*, Functor, Pure*/
 
   sealed trait OptionInt derives Eq, Empty, Show, Read
   case class SomeInt(value: Int) extends OptionInt
   case object NoneInt extends OptionInt
 
-  sealed trait Opt[+A] derives Eq, Show, Read, Functor, EmptyK, Pure
+  sealed trait Opt[+A] derives Eq, Show, Read /*, Functor, EmptyK, Pure*/
   case class Sm[+A](value: A) extends Opt[A]
   case object Nn extends Opt[Nothing]
 
-  sealed trait CList[+A] derives Eq, Show, Read, Functor, EmptyK
+  sealed trait CList[+A] derives Eq, Show, Read /*, Functor, EmptyK*/
   case class CCons[+A](hd: A, tl: CList[A]) extends CList[A]
   case object CNil extends CList[Nothing]
 
   case class Order[F[_]](
     item: F[String],
     quantity: F[Int]
-  ) derives FunctorK
+  ) // derives FunctorK
 
   sealed trait OptionD[T] {
     def fold: T = this match {
@@ -53,7 +53,7 @@ object adts {
   case class Given[T](value: T) extends OptionD[T]
   case class Default[T](value: T) extends OptionD[T]
 
-  sealed trait ListF[+A, +R] derives Bifunctor
+  sealed trait ListF[+A, +R] // derives Bifunctor
   object ListF {
     type List[A] = Fix[ListF, A]
   }

modules/deriving/src/test/scala/shapeless3/deriving/deriving.scala

@@ -78,6 +78,7 @@ class DerivationTests {
     assert(!v8.eqv(CCons(1, CCons(2, CCons(3, CNil))), CCons(1, CCons(4, CCons(3, CNil)))))
   }
 
+  /*
   @Test
   def functor: Unit = {
     val v0 = Functor[Box]
@@ -115,6 +116,7 @@ class DerivationTests {
     val v3: ListF.List[Int] = Fix(ConsF(3, Fix(ConsF(4, Fix(ConsF(6, Fix(NilF)))))))
     assert(Bifunctor.map((_: String).length)(v2) == v3)
   }
+  */
 
   @Test
   def data: Unit = {
@@ -144,6 +146,7 @@ class DerivationTests {
     assert(v0.empty == ISB(0, "", false))
   }
 
+  /*
   @Test
   def emptyk: Unit = {
     val v0 = EmptyK[Opt]
@@ -159,6 +162,7 @@ class DerivationTests {
     val v1 = Pure[CList]
     assert(v1.pure(23) == CCons(23, CNil))
   }
+  */
 
   @Test
   def labels: Unit = {