Cache AppliedType#isStable

Author: mbovel

compiler/src/dotty/tools/dotc/core/Types.scala

@@ -175,7 +175,7 @@ object Types {
         // see: tests/explicit-nulls/pos/flow-stable.scala.disabled
         tp.tp1.isStable && (realizability(tp.tp2) eq Realizable) ||
         tp.tp2.isStable && (realizability(tp.tp1) eq Realizable)
-      case AppliedType(tycon: TypeRef, args) if defn.isCompiletimeAppliedType(tycon.symbol) && args.forall(_.isStable) => true
+      case tp: AppliedType => tp.cachedIsStable
       case _ => false
     }
 
@@ -4162,10 +4162,25 @@ object Types {
     private var myStableHash: Byte = 0
     private var myGround: Byte = 0
 
+    private var myIsStablePeriod: Period = Nowhere
+    private var myIsStable: Boolean = false
+
     def isGround(acc: TypeAccumulator[Boolean])(using Context): Boolean =
       if myGround == 0 then myGround = if acc.foldOver(true, this) then 1 else -1
       myGround > 0
 
+    private[Types] def cachedIsStable(using Context): Boolean =
+      if myIsStablePeriod != ctx.period then
+        val res = tycon match
+          case tycon: TypeRef if defn.isCompiletimeAppliedType(tycon.symbol) && args.forall(_.isStable) => true
+          case _ => false
+        if !isProvisional then
+          myIsStablePeriod = ctx.period
+          myIsStable = res
+        res
+      else
+        myIsStable
+
     override def underlying(using Context): Type = tycon
 
     override def superType(using Context): Type =