Fix capturing outer this in some cases in JVM codegen

When property initializer of some inner entity (e.g. anonymous object) contains
a reference to some outer entity (say, a property of the outer class), we need
to make sure we called "lookupInContext" on this entity's owner class, so that
"setCaptureThis" was called on the appropriate closure

 #KT-4176 Fixed

compiler/testData/codegen/box/closures/captureOuterProperty/captureFunctionInProperty.kt

@@ -0,0 +1,15 @@
+trait T {
+    fun result(): String
+}
+
+class A(val x: String) {
+    fun getx() = x
+
+    fun foo() = object : T {
+        val bar = getx()
+
+        override fun result() = bar
+    }
+}
+
+fun box() = A("OK").foo().result()

compiler/testData/codegen/box/closures/captureOuterProperty/inFunction.kt

@@ -0,0 +1,13 @@
+trait T {
+    fun result(): String
+}
+
+class A(val x: String) {
+    fun foo() = object : T {
+        fun bar() = x
+
+        override fun result() = bar()
+    }
+}
+
+fun box() = A("OK").foo().result()

compiler/testData/codegen/box/closures/captureOuterProperty/inProperty.kt

@@ -0,0 +1,13 @@
+trait T {
+    fun result(): String
+}
+
+class A(val x: String) {
+    fun foo() = object : T {
+        val bar = x
+
+        override fun result() = bar
+    }
+}
+
+fun box() = A("OK").foo().result()

compiler/testData/codegen/box/closures/captureOuterProperty/inPropertyDeepObjectChain.kt

@@ -0,0 +1,18 @@
+trait T {
+    fun result(): String
+}
+
+class A(val x: String) {
+    fun foo() = object : T {
+        fun bar() = object : T {
+            fun baz() = object : T {
+                val y = x
+                override fun result() = y
+            }
+            override fun result() = baz().result()
+        }
+        override fun result() = bar().result()
+    }
+}
+
+fun box() = A("OK").foo().result()

compiler/testData/codegen/box/closures/captureOuterProperty/inPropertyFromSuperClass.kt

@@ -0,0 +1,15 @@
+trait T {
+    fun result(): String
+}
+
+open class B(val x: String)
+
+class A : B("OK") {
+    fun foo() = object : T {
+        val bar = x
+
+        override fun result() = bar
+    }
+}
+
+fun box() = A().foo().result()

compiler/testData/codegen/box/closures/captureOuterProperty/inPropertyFromSuperSuperClass.kt

@@ -0,0 +1,17 @@
+trait T {
+    fun result(): String
+}
+
+abstract class A<Z>(val x: Z)
+
+open class B : A<String>("OK")
+
+class C : B() {
+    fun foo() = object : T {
+        val bar = x
+
+        override fun result() = bar
+    }
+}
+
+fun box() = C().foo().result()

compiler/testData/codegen/box/closures/captureOuterProperty/kt4176.kt

@@ -0,0 +1,17 @@
+open class Z(val s: Int) {
+    open fun a() {}
+}
+
+class B(val x: Int) {
+    fun foo() {
+        class X : Z(x) {
+
+        }
+        X()
+    }
+}
+
+fun box(): String {
+    B(1).foo()
+    return "OK"
+}

compiler/testData/codegen/boxWithStdlib/regressions/objectCaptureOuterConstructorProperty.kt

@@ -0,0 +1,29 @@
+import kotlin.support.*
+
+trait Stream<T> {
+    fun iterator(): Iterator<T>
+}
+
+class ZippingStream<T1, T2>(val stream1: Stream<T1>, val stream2: Stream<T2>) : Stream<Pair<T1,T2>> {
+    override fun iterator(): Iterator<Pair<T1,T2>> = object : AbstractIterator<Pair<T1,T2>>() {
+        val iterator1 = stream1.iterator()
+        val iterator2 = stream2.iterator()
+        override fun computeNext() {
+            if (iterator1.hasNext() && iterator2.hasNext()) {
+                setNext(iterator1.next() to iterator2.next())
+            } else {
+                done()
+            }
+        }
+    }
+}
+
+
+object EmptyStream : Stream<Nothing> {
+    override fun iterator() = listOf<Nothing>().iterator()
+}
+
+fun box(): String {
+    ZippingStream(EmptyStream, EmptyStream).iterator().hasNext()
+    return "OK"
+}