[box-tests] Added a couple of reproducers for KT-52795

compiler/testData/codegen/boxInline/anonymousObject/kt52795.kt

@@ -0,0 +1,20 @@
+// NO_CHECK_LAMBDA_INLINING
+// FILE: 1.kt
+inline fun <T> mrun(block: () -> T) = block()
+
+// FILE: 2.kt
+fun bar(o: String): String {
+    val callable = mrun {
+        fun localAnonymousFun(k: String): String {
+            val obj = object {
+                fun foo() = o + k
+            }
+            return obj.foo()
+        }
+        ::localAnonymousFun
+    }
+
+    return callable("K")
+}
+
+fun box() = bar("O")