implement scala 3 macro

Author: dwickern

src/main/scala-3/com/github/dwickern/macros/NameOf.scala

@@ -27,6 +27,20 @@ trait NameOf {
  */
  transparent inline def nameOf[T](inline expr: T => Any): String = ${NameOfImpl.nameOf('expr)}
 
+ /**
+ * Obtain a fully qualified identifier name as a constant string.
+ *
+ * This overload can be used to access an instance method without having an instance of the type.
+ *
+ * Example usage:
+ * {{{
+ * class Pet(val age: Int)
+ * class Person(val name: String, val pet: Pet)
+ * nameOf[Person](_.pet.age) => "pet.age"
+ * }}}
+ */
+ transparent inline def qualifiedNameOf[T](inline expr: T => Any): String = ${NameOfImpl.qualifiedNameOf('expr)}
+
  /**
  * Obtain a type's unqualified name as a constant string.
  *

src/main/scala-3/com/github/dwickern/macros/NameOfImpl.scala

@@ -9,8 +9,8 @@ object NameOfImpl {
  @tailrec def extract(tree: Tree): String = tree match {
  case Ident(name) => name
  case Select(_, name) => name
- case Block(List(stmt), term) => extract(stmt)
  case DefDef("$anonfun", _, _, Some(term)) => extract(term)
+ case Block(List(stmt), _) => extract(stmt)
  case Block(_, term) => extract(term)
  case Apply(term, _) if term.symbol.fullName != "<special-ops>.throw" => extract(term)
  case TypeApply(term, _) => extract(term)
@@ -22,6 +22,24 @@ object NameOfImpl {
  Expr(name)
  }
 
+ def qualifiedNameOf(expr: Expr[Any])(using Quotes): Expr[String] = {
+ import quotes.reflect.*
+ def extract(tree: Tree): List[String] = tree match {
+ case Ident(name) => List(name)
+ case Select(tree, name) => extract(tree) :+ name
+ case DefDef("$anonfun", _, _, Some(term)) => extract(term)
+ case Block(List(stmt), _) => extract(stmt)
+ case Block(_, term) => extract(term)
+ case Apply(term, _) if term.symbol.fullName != "<special-ops>.throw" => extract(term)
+ case TypeApply(term, _) => extract(term)
+ case Inlined(_, _, term) => extract(term)
+ case Typed(term, _) => extract(term)
+ case _ => throw new MatchError(s"Unsupported expression: ${expr.show}")
+ }
+ val name = extract(expr.asTerm).drop(1).mkString(".")
+ Expr(name)
+ }
+
  def nameOfType[T](using Quotes, Type[T]): Expr[String] = {
  import quotes.reflect.*
  val name = TypeTree.of[T].tpe.dealias match {