如何在Scala宏中创建类或对象?

时间:2015-07-15 01:56:47

标签: scala macros

我正在尝试使用宏从案例类生成伴随对象,但我很难找到如何实现此目的的任何示例。

例如:

case class Person(name: String, age: Int, id: Option[Int] = None)

如果我这样做:

object PersonTable extends TypedTable[Person]

我希望它能够生成:

object PersonTable extends Table("PERSON") {
  val name = column[String]("NAME")
  val age = column[Int]("AGE")
  val id = column[Option[Int]]("ID")
}

此外,我希望能够扩展它并添加其他字段:

object PersonTable extends TypedTable[Person] {
  val created = column[Timestamp]("TIMESTAMP")
}

它会产生:

object PersonTable extends Table("PERSON") {
  val name = column[String]("NAME")
  val age = column[Int]("AGE")
  val id = column[Option[Int]]("ID")
  val created = column[Timestamp]("TIMESTAMP")
}

修改

在阅读了宏注释后(感谢Eugene和Mario),我创建了以下代码:

class table[T] extends StaticAnnotation {
  def macroTransform(annottees: Any*) = macro TableGenerator.impl
}

object TableGenerator {
  def impl(c: whitebox.Context)(annottees: c.Expr[Any]*): c.Expr[Any] = {
    import c.universe._

    def modifiedObject(objectDef: ModuleDef): c.Expr[Any] = {
      val ModuleDef(_, objectName, template) = objectDef
      val ret = q"""
object $objectName {
  def test() = println("Wahoo!")
}
      """
      c.Expr[Any](ret)
    }

    annottees.map(_.tree) match {
      case (objectDecl: ModuleDef) :: _ => modifiedObject(objectDecl)
      case x => c.abort(c.enclosingPosition, s"@table can only be applied to an object, not to $x")
    }
  }
}

然后试图像这样使用它:

@table[String] object MyCoolObject
MyCoolObject.test()

第一行工作正常,但第二行表示无法找到测试方法。如何使测试方法可见?

1 个答案:

答案 0 :(得分:4)

遗憾的是,很难在网上找到宏的好例子 - 特别是对于2.11。我终于能够把一切都搞定了,所以我想为以后遇到同样问题的人提供代码链接。

https://github.com/outr/scalarelational/blob/master/mapper/src/main/scala/org/scalarelational/mapper/typedTable.scala

再次感谢尤金和马里奥的出色回答,让我找到答案。