Add ClassDef.supertypes to reflection API

Author: pikinier20

compiler/src/scala/quoted/runtime/impl/QuotesImpl.scala

@@ -246,6 +246,11 @@ class QuotesImpl private (using val ctx: Context) extends Quotes, QuoteUnpickler
           optional(self.rhs.asInstanceOf[tpd.Template].self)
         def body: List[Statement] =
           self.rhs.asInstanceOf[tpd.Template].body
+        def supertypes: List[TypeRepr] = self.symbol match
+          case cls: dotc.core.Symbols.ClassSymbol =>
+            val ref = cls.classDenot.classInfo.appliedRef
+            ref.baseClasses.map(ref.baseType(_))
+          case _ => List()
       end extension
     end ClassDefMethods
 

library/src/scala/quoted/Quotes.scala

@@ -490,6 +490,10 @@ trait Quotes { self: runtime.QuoteUnpickler & runtime.QuoteMatching =>
          *  @syntax markdown
          */
         def body: List[Statement]
+
+        /** Supertypes of the class */
+        def supertypes: List[TypeRepr]
+
       end extension
     end ClassDefMethods