映射到压缩的 HLists

Question

我正在尝试使用 shapeless 从两个 HList 中选择“非空”值：

import shapeless.{ HNil, Poly2}

object choose extends Poly2 {
  implicit def caseInt =
    at[Int,Int]{
      case (_,n) if n > 0 => n
      case (o,_) => o
    }

  implicit def caseString  =
    at[String,String] {
      case (_,n) if n.nonEmpty => n
      case(o,_) => o
    }
}


val g = "a" :: "" :: 0 :: HNil
val h = "" :: "a"  :: 5 :: HNil

g.zip(h).map(choose)

我在缺少隐式映射器时遇到错误如果我理解正确，我需要提供证明 zip 的结果是可映射的，但我不知道该怎么做

Answer 1

你很接近，但定义choose有点错误：map需要一个Poly1不是一个Poly2。

您正在映射元组的 hlist，因此您需要一个采用单个参数（元组）的多态函数。您提供的是一个带有两个参数的多态函数。差异是微妙的，但它就在那里。

这是一个有效的版本：

import shapeless.{ HNil, Poly1 }

object choose extends Poly1 {
  implicit def caseInt =
    at[(Int,Int)]{
      case (_,n) if n > 0 => n
      case (o,_) => o
    }

  implicit def caseString  =
    at[(String,String)] {
      case (_,n) if n.nonEmpty => n
      case(o,_) => o
    }
}

val g = "a" :: "" :: 0 :: HNil
val h = "" :: "a"  :: 5 :: HNil

g.zip(h).map(choose) // "a" :: "a" :: 5 :: HNil

正如您所看到的，技巧是扩展Poly1而不是Poly2定义at元组上的案例。