[FE 1.0] Create captured star projection for self types by replacing type arguments deeply

^KT-49752 Fixed
2021-11-19 14:42:41 +03:00
parent 6474a90555
commit 61d40403e7
12 changed files with 139 additions and 2 deletions
@@ -0,0 +1,51 @@
+// IGNORE_BACKEND_FIR: JVM_IR
+// FIR status: a new FE 1.0 test, failed with FIR, need to review
+
+abstract class Interpreter<IS, TS, SELF>
+        where IS : Interpreter.Intermediary<SELF>,
+              TS : Interpreter.Terminal<SELF>,
+              SELF : Interpreter<IS, TS, SELF> {
+    sealed interface Step<INTERPRETER>
+            where INTERPRETER : Interpreter<out Intermediary<INTERPRETER>, out Terminal<INTERPRETER>, INTERPRETER>
+    interface Intermediary<INTERPRETER> : Step<INTERPRETER>
+            where INTERPRETER : Interpreter<out Intermediary<INTERPRETER>, out Terminal<INTERPRETER>, INTERPRETER>
+    interface Terminal<INTERPRETER> : Step<INTERPRETER>
+            where INTERPRETER : Interpreter<out Intermediary<INTERPRETER>, out Terminal<INTERPRETER>, INTERPRETER>
+    abstract fun next(currentStep: IS): () -> Step<SELF>
+}
+
+sealed interface BaseTerminal<I : Interpreter<*, out BaseTerminal<I>, I>> : Interpreter.Terminal<I> {
+    data class Success<I : Interpreter<*, out BaseTerminal<I>, I>>(
+        val result: Int
+    ) : BaseTerminal<I>
+}
+
+class CountingInterpreter : Interpreter<CountingInterpreter.Intermediary, BaseTerminal.Success<CountingInterpreter>, CountingInterpreter>() {
+    sealed interface Intermediary : Interpreter.Intermediary<CountingInterpreter> {
+        data class KeepCounting(
+            val togo: Int
+        ) : Intermediary
+    }
+    var count = 0
+    override fun next(
+        currentStep: Intermediary
+    ): () -> Step<CountingInterpreter> = {
+        when (currentStep) {
+            is Intermediary.KeepCounting -> if (currentStep.togo == 0) {
+                BaseTerminal.Success(count)
+            } else {
+                count++
+                Intermediary.KeepCounting(currentStep.togo - 1)
+            }
+        }
+    }
+}
+
+fun box(): String {
+    val interpreter = CountingInterpreter()
+    var step: Interpreter.Step<CountingInterpreter> = CountingInterpreter.Intermediary.KeepCounting(1)
+    while (step is CountingInterpreter.Intermediary) {
+        step = interpreter.next(step).invoke()
+    }
+    return if ((step as BaseTerminal.Success<CountingInterpreter>).result == 1) "OK"  else "NOK"
+}