【发布时间】:2020-06-07 08:13:10
【问题描述】:
我想使用宏执行 AST 遍历,对于 AST 类型,例如:
trait Node
case class Root(children: Seq[Node]) extends Node {
override def toString = s"Root(${children.size})"
}
case class Bi(left: Node, var right: Node) extends Node
case class Leaf(id: String) extends Node
在下面的代码中,我可以检测到 T 的成员,这些成员的类型为 B,并创建一个调用它们的函数。我还想检测类型为Seq[B] 的成员(以及可能包含B 的其他容器)。我尝试构造一个类型TypeApply(Ident(TermName("Seq")), List(tq"$B")),它似乎可以工作,但是在此调用.tpe 返回null,因此我不能在结果上调用<:<。
f.asMethod.returnType <:< Seq[B]怎么办?
def walker[B, T <: B]: (T, B => Unit) => Unit = macro walker_impl[B, T]
def walker_impl[B: c.WeakTypeTag, T: c.WeakTypeTag](c: blackbox.Context): c.Expr[(T, B => Unit) => Unit] = {
import c.universe._
val T = weakTypeOf[T]
val B = weakTypeOf[B]
val seqType = TypeApply(Ident(TermName("Seq")), List(tq"$B"))
val dive = T.decls.collect {
case f if f.isMethod && f.asMethod.paramLists.isEmpty && f.asMethod.isGetter && f.asMethod.returnType <:< B =>
q"t.$f"
case f if f.isMethod && f.asMethod.paramLists.isEmpty &&
f.asMethod.isGetter && f.asMethod.returnType <:< seqType.tpe
=>
q"t.$f" // TODO: decompose the seq
}
c.Expr[(T, B => Unit) => Unit](
q"(t: $T, f: $B => Unit) => Seq(..$dive).map(f)"
)
}
【问题讨论】:
标签: scala types macros scala-macros