Scala注释宏仅适用于预定义的类

Question

注意：下面有一个EDIT！ 注意：下面还有另一个编辑！

我已经编写了一个Scala注释宏，该宏正在传递给一个类并创建（或填充）一个case对象。 案例对象的名称与传递的类的名称相同。 更重要的是，对于传递的类的每个字段，case对象中将有一个同名字段。 但是，case对象的字段都是String类型，其值是所传递的类中各个字段的类型的名称。 例：

// Using the annotation macro to populate a case object called `String`
@RegisterClass(classOf[String]) case object String

// The class `String` defines a field called `value` of type `char[]`.
// The case object also has a field `value`, containing `"char[]"`.
println(String.value) // Prints `"char[]"` to the console

但是，这似乎仅适用于诸如String类的预定义类。 如果我定义了一个case class A(...)并尝试执行@RegisterClass(classOf[A]) case object A ， @RegisterClass(classOf[A]) case object A出现以下错误：

[info]   scala.tools.reflect.ToolBoxError: reflective compilation has failed:
[info]   
[info]   not found: type A

我做错了什么？ 我的宏的代码可以在下面找到。 另外，如果有人注意到不习惯的Scala或一般的不良做法，我也不会介意。 提前非常感谢您！

class RegisterClass[T](clazz: Class[T]) extends StaticAnnotation {
  def macroTransform(annottees: Any*) =
    macro RegisterClass.expandImpl[T]
}

object RegisterClass {
  def expandImpl[T](c: blackbox.Context)(annottees: c.Expr[Any]*) = {
    import c.universe._
    val clazz: Class[T] = c.prefix.tree match {
      case q"new RegisterClass($clazz)" => c.eval[Class[T]](c.Expr(clazz))
      case _ =>  c.abort(c.enclosingPosition, "RegisterClass: Annotation expects a Class[T] instance as argument.")
    }
    annottees.map(_.tree) match {
      case List(q"case object $caseObjectName") =>
        if (caseObjectName.toString != clazz.getSimpleName)
          c.abort(c.enclosingPosition, "RegisterClass: Annotated case object and class T of passed Class[T] instance" +
            "must have the same name.")
        val clazzFields = clazz.getDeclaredFields.map(field => field.getName -> field.getType.getSimpleName).toList
        val caseObjectFields = clazzFields.map(field => {
          val fieldName: TermName = field._1
          val fieldType: String = field._2
          q"val $fieldName = $fieldType"
        })
        c.Expr[Any](q"case object $caseObjectName { ..$caseObjectFields }")
      case _ => c.abort(c.enclosingPosition, "RegisterClass: Annotation must be applied to a case object definition.")
    }
  }
}

编辑：正如Eugene Burmako指出的，发生错误是因为尚未编译class A ，因此尚不存在java.lang.Class 。 我现在已经开始为每个人提供100个StackOverflow积分的奖励，以此作为一个想法，让他们如何工作！

编辑2：用例的一些背景：作为我的本科论文的一部分，我正在研究Scala DSL，用于表达对事件处理系统的查询。 传统上，这些查询用字符串表示，这会引起很多问题。 一个典型的查询看起来像是：“从pattern [A-> B]中选择A.id，B.timestamp”。 含义：如果发生类型A的事件， A发生类型B的事件，请给我A事件的id和B事件的timestamp 。 类型A和B通常是我无法控制的简单Java类。 id和timestamp是这些类的字段。 我希望对DSL的查询看起来像这样： select (A.id, B.timestamp) { /* ... * / } 。 这意味着对于每个表示事件类型的类，例如A ，我需要一个伴随对象-理想情况下应使用相同的名称。 该伴随对象应该具有与相应类相同的字段，以便可以将其字段传递给select函数，如下所示： select (A.id, B.timestamp) { /* ... * / } 。 这样，如果我尝试将A.idd传递给select函数，则在原始类中没有此类字段的情况下，它将在编译时失败-因为那样，在同伴对象中也将没有该字段。

Answer 1

这不是您的宏问题的答案，但是可以解决您的一般问题。
如果您可以允许对DSL语法进行较小的更改，则可以在不使用宏的情况下进行更改（取决于此问题中未提及的其他要求）。

scala> class Select[A,B]{
     |   def apply[R,S](fa: A => R, fb: B => S)(body: => Unit) = ???
     | }
defined class Select

scala> def select[A,B] = new Select[A,B]
select: [A, B]=> Select[A,B]

scala> class MyA { def id = 42L }
defined class MyA

scala> class MyB { def timestamp = "foo" }
defined class MyB

scala> select[A,B](_.id, _.timestamp){ /* ... */ }
scala.NotImplementedError: an implementation is missing

我使用Select类作为一种方法，可以指定事件类的类型，同时让编译器推断出fa和fb函数的结果类型。 如果不需要这些结果类型，则可以将其写为def select[A,B](fa: A => Any, fb: B => Any)(body: => Unit) = ??? 。

如有必要，您仍可以将select或apply方法实现为宏。 但是使用这种语法，您将不再需要生成带有宏注释的对象。