折叠 HList？

Question

给定：

import shapeless._
case class F(x: Option[Int], y: Option[Int])

我想帮忙写一个函数，f:

def f(Option[Int] :: Option[Int] :: HNil): String

这样每个Option[Int] 都替换为Some 数字或empty；和"" 为HNil。

例子：

val res7 = Generic[F].to( F( Some(42), None) )
//res7: shapeless.::[Option[Int],shapeless.::
         [Option[Int],shapeless.HNil]] = Some(42) :: None :: HNil

f(res7) === "42empty"

f怎么写？

Answer 1

你需要一个Poly:

 object OptFolder extends Poly2{
   def conv(x: Option[Int]) = x.map(_.toString).getOrElse("empty")

   implicit val ff = at{ (y: String, z: Option[Int]) => y + conv(z) }
 }

 val lala: String = myHlist.foldLeft("")(OptFolder) //:String not required

所以Generic 转换为HList，然后foldLeft 具有明确定义的Poly。