Files
kotlin-fork/compiler/testData/codegen/box/callableReference/bound/emptyLHS.kt
T
Steven Schäfer 7d59c7689c JVM IR: Avoid direct invokes in callable reference tests
Due to the direct invoke optimization, most callable reference tests
were not generating callable references/lambdas.
2022-07-14 23:24:18 +02:00

84 lines
2.3 KiB
Kotlin
Vendored

var result = ""
class A {
fun memberFunction() { result += "A.mf," }
fun aMemberFunction() { result += "A.amf," }
val memberProperty: Int get() = 42.also { result += "A.mp," }
val aMemberProperty: Int get() = 42.also { result += "A.amp," }
fun test(): String {
(::memberFunction).let { it() }
(::aExtensionFunction).let { it() }
(::memberProperty).let { it() }
(::aExtensionProperty).let { it() }
return result
}
inner class B {
fun memberFunction() { result += "B.mf," }
val memberProperty: Int get() = 42.also { result += "B.mp," }
fun test(): String {
(::aMemberFunction).let { it() }
(::aExtensionFunction).let { it() }
(::aMemberProperty).let { it() }
(::aExtensionProperty).let { it() }
(::memberFunction).let { it() }
(::memberProperty).let { it() }
(::bExtensionFunction).let { it() }
(::bExtensionProperty).let { it() }
return result
}
}
}
fun A.aExtensionFunction() { result += "A.ef," }
val A.aExtensionProperty: Int get() = 42.also { result += "A.ep," }
fun A.B.bExtensionFunction() { result += "B.ef," }
val A.B.bExtensionProperty: Int get() = 42.also { result += "B.ep," }
fun box(): String {
val a = A().test()
if (a != "A.mf,A.ef,A.mp,A.ep,") return "Fail $a"
result = ""
val b = A().B().test()
if (b != "A.amf,A.ef,A.amp,A.ep,B.mf,B.mp,B.ef,B.ep,") return "Fail $b"
result = ""
with(A()) {
(::memberFunction).let { it() }
(::aExtensionFunction).let { it() }
(::memberProperty).let { it() }
(::aExtensionProperty).let { it() }
}
if (result != "A.mf,A.ef,A.mp,A.ep,") return "Fail $result"
result = ""
with(A()) {
with(B()) {
(::aMemberFunction).let { it() }
(::aExtensionFunction).let { it() }
(::aMemberProperty).let { it() }
(::aExtensionProperty).let { it() }
(::memberFunction).let { it() }
(::memberProperty).let { it() }
(::bExtensionFunction).let { it() }
(::bExtensionProperty).let { it() }
}
}
if (result != "A.amf,A.ef,A.amp,A.ep,B.mf,B.mp,B.ef,B.ep,") return "Fail $result"
return "OK"
}