@@ -24,7 +24,6 @@ class IRs[U <: Universe with Singleton](val uni: U) {
24
24
// this part is interesting to unpicklers
25
25
def hasSetter = setter.isDefined
26
26
def isErasedParam = isParam && accessor.isEmpty // TODO: this should somehow communicate with the constructors phase!
27
- def isReifiedParam = isParam && accessor.nonEmpty
28
27
def isNonParam = ! isParam
29
28
}
30
29
case class ClassIR (tpe : Type , parent : ClassIR , fields : List [FieldIR ]) extends PickleIR
@@ -56,10 +55,8 @@ class IRs[U <: Universe with Singleton](val uni: U) {
56
55
val (filteredAccessors, transientAccessors) = allAccessors.partition(notMarkedTransient)
57
56
58
57
val ctorParams = if (ctor != NoSymbol ) ctor.asMethod.paramss.flatten.flatMap { sym =>
59
- if (transientAccessors.exists(acc => acc.name.toString == sym.name.toString)) {
60
- // println(s"found a BAD accessor: $sym")
61
- List ()
62
- } else List (sym.asTerm)
58
+ if (transientAccessors.exists(acc => acc.name.toString == sym.name.toString)) List ()
59
+ else List (sym.asTerm)
63
60
} else Nil
64
61
65
62
val (paramAccessors, otherAccessors) = allAccessors.partition(_.isParamAccessor)
@@ -75,16 +72,15 @@ class IRs[U <: Universe with Singleton](val uni: U) {
75
72
val varGetters = otherAccessors.collect{ case meth if meth.isGetter && meth.accessed != NoSymbol && meth.accessed.asTerm.isVar => meth }
76
73
val varFields = varGetters.map(sym => mkFieldIR(sym, None , Some (sym)))
77
74
78
- val res = paramFields ++ varFields
79
- res
75
+ paramFields ++ varFields
80
76
}
81
77
82
78
private def composition (f1 : (Q , Q ) => Q , f2 : (C , C ) => C , f3 : C => List [C ]) =
83
79
(c : C ) => f3(c).reverse.reduce[C ](f2)
84
80
85
81
private val f1 = (q1 : Q , q2 : Q ) => q1 ++ q2
86
82
87
- private val f2 = (c1 : C , c2 : C ) => ClassIR (c2.tpe, c1, /* fields( c2.tpe) */ c2. fields) // here: fields is called a 2nd time.
83
+ private val f2 = (c1 : C , c2 : C ) => ClassIR (c2.tpe, c1, c2.fields)
88
84
89
85
private val f3 = (c : C ) =>
90
86
c.tpe.baseClasses
0 commit comments