Scala类型类扩展泛型类型：没有为参数找到的含义

Question

我想编写一个类型类，为泛型类型添加一些行为。但是，我无法弄清楚该怎么做;我一直遇到下面的错误。

想象一下你有一个通用类型MyList[A]：

trait MyList[A]

object MyList {
  case class Empty[A]() extends MyList[A]
  case class Node[A](value: A, next: MyList[A]) extends MyList[A]
}

现在您要为此类添加一些行为，例如把它转换成Stream[A]。基于类型类的扩展似乎是合适的：

// inspired by https://scalac.io/typeclasses-in-scala

trait MyListExt[T, A <: MyList[T]] {
  def stream(a: A): Stream[T]
}

object MyListExt {
  def apply[T, A <: MyList[T]](implicit a: MyListExt[T, A]): MyListExt[T, A] = a

  object ops {
    implicit class MyListExtOps[T, A <: MyList[T]](val a: A) extends AnyVal {
      def stream(implicit ext: MyListExt[T, A]): Stream[T] = ext.stream(a)
    }
  }

  private type T0

  implicit val myListToStreamImpl: MyListExt[T0, MyList[T0]] = new MyListExt[T0, MyList[T0]] {
    override def stream(a: MyList[T0]): Stream[T0] = {
      def fold[T1](l: MyList[T1], acc: Stream[T1]): Stream[T1] = l match {
        case MyList.Empty() => acc
        case MyList.Node(value, next) => fold(next, acc :+ value)
      }
      fold(a, Stream.empty)
    }
  }
}

当我现在尝试在我的代码中使用此类型类时，我在l.stream上收到以下错误：

No implicits found for parameter ext: MyListExt[T_, MyList[Int]]

object MyListTest {
  def main(args: Array[String]): Unit = {
    import MyListExt.ops._
    val l: MyList[Int] = MyList.Node(1, MyList.Node(2, MyList.Node(3, MyList.Empty())))
    l.stream.foreach(println)
  }
}

我做错了什么，或者我怎样才能让我的l.stream工作？ 我见过很多涉及类型类和隐式转换的例子，但到目前为止还没有一个在泛型类型上运行。

Answer 1

  implicit def myListToStreamImpl[T]: MyListExt[T, MyList[T]] = new MyListExt[T, MyList[T]] {
    override def stream(a: MyList[T]): Stream[T] = {
      def fold(l: MyList[T1], acc: Stream[T1]): Stream[T1] = l match {
        case MyList.Empty() => acc
        case MyList.Node(value, next) => fold(next, acc :+ value)
      }
      fold(a, Stream.empty[T1])
    }
  }

你的类型不对齐，因为你已经使用了private type任何奇怪的原因。嵌套在对象内的类型具有完全不同的应用程序，它们与您当前的用例无关。

Answer 2

麻烦的是，在l.stream.foreach(println)中，l被隐式转换为new MyListExt.ops.MyListExtOps[.., ..](l)，而仿制药被推断为[Nothing, MyList[Int]]，它不满足[T, A <: MyList[T]]。

我看不出有理由用MyListExt和T参数化A <: MyList[T]。我想T就足够了，使用MyList[T]而不是A。

不要使用private type T0，只需使用myListToStreamImpl aka def参数化T0（使其成为T）。

尝试

  trait MyList[A]

  object MyList {
    case class Empty[A]() extends MyList[A]
    case class Node[A](value: A, next: MyList[A]) extends MyList[A]
  }

  trait MyListExt[T] {
    def stream(a: MyList[T]): Stream[T]
  }

  object MyListExt {
    def apply[T](implicit a: MyListExt[T]): MyListExt[T] = a

    object ops {
      implicit class MyListExtOps[T](val a: MyList[T]) extends AnyVal {
        def stream(implicit ext: MyListExt[T]): Stream[T] = ext.stream(a)
      }
    }

    implicit def myListToStreamImpl[T]: MyListExt[T] = new MyListExt[T] {
      override def stream(a: MyList[T]): Stream[T] = {
        def fold[T1](l: MyList[T1], acc: Stream[T1]): Stream[T1] = l match {
          case MyList.Empty() => acc
          case MyList.Node(value, next) => fold(next, acc :+ value)
        }
        fold(a, Stream.empty)
      }
    }
  }

  object MyListTest {
    def main(args: Array[String]): Unit = {
      import MyListExt.ops._
      val l: MyList[Int] = MyList.Node(1, MyList.Node(2, MyList.Node(3, MyList.Empty())))
      l.stream.foreach(println)
    }
  }