1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
import scala.reflect.macros.whitebox.Context
import language.experimental.macros
trait Tree
case object SomeTree extends Tree
object NewQuasiquotes {
implicit class QuasiquoteInterpolation(c: StringContext) {
object nq {
def unapply(t: Tree): Any = macro QuasiquoteMacros.unapplyImpl
}
}
}
object QuasiquoteMacros {
def unapplyImpl(c: Context)(t: c.Tree) = {
import c.universe._
q"""
new {
def unapply(t: Tree) = t match {
case SomeTree => Some((SomeTree, SomeTree))
case _ => None
}
}.unapply($t)
"""
}
}
|
