HList 上的映射因 Scala 和 Shapeless 中泛型类型的子类型而失败

假设我们有以下类和一些值（在 Scala 中）：

class A[T](val x: T)
class B[T](x: T, val y: T) extends A[T](x)

val x1 = new A("test")
val x2 = new B(1,2)
val x3 = new B("foo","bar")
val x4 = new A(1)

进一步，我们定义以下多态函数值（使用shapeless）：

object f extends (A ~> Option) {
  def apply[T](s: A[T]) = Some(s.x)
}

现在我们可以调用：

f(x1); f(x2); f(x3); f(x4)

一切都成功了（恕我直言，应该如此）。然而：

val list = x1 :: x2 :: x3 :: x4 :: HNil
list.map(f)

// could not find implicit value for parameter mapper:
// shapeless.Mapper[f.type,shapeless.::[A[String],shapeless.::[
//   B[Int],shapeless.::[B[String],shapeless.::[A[Int],shapeless.HNil]]]]]

我期待的地方：

Some("test") :: Some(1) :: Some("foo") :: Some(1) :: HNil

请注意，这有效：

val list2 = x1 :: x4 :: HNil // only instances of A
list2.map(f)

UPDATE

看来如果我们分别指定每种情况，就可以了：

object f extends Poly1 {
  implicit def caseA[T] = at[A[T]]{s => Some(s.x)}
  implicit def caseB[T] = at[B[T]]{s => Some(s.x)}
}

然而，试图更聪明地表达这一点是行不通的（即使对于简单的应用程序也是如此）：

object f extends Poly1 {
  implicit def caseA[T, S <: A[T]] = at[S]{s => Some(s.x)}
}

您最好的选择是@TravisBrown 建议使用视图绑定之一，

object f extends Poly1 {
  implicit def caseA[T, S <% A[T]] = at[S]{s => Some(s.x)}
}

或者，或多或少等效地，类型约束，

object f2 extends Poly1 {
  implicit def caseA[S, T](implicit ev : S <:< A[T]) = at[S]{s => Some(s.x)}
}

或您的两种情况解决方案的变体，其中排除了共性，

object f3 extends Poly1 {
  def asub[T](s: A[T]) = Some(s.x)
  implicit def caseA[T] = at[A[T]](asub)
  implicit def caseB[T] = at[B[T]](asub)
}

Shapeless 的多态函数值不太可能被更改为直接支持使初始定义按您想要的方式工作所需的参数类型方差，因为这会与（非常理想的 IMO）非常精确地区分特定于类型的情况的能力相冲突。