Added test for KT-4640

#KT-4640 Obsolete

compiler/testData/diagnostics/tests/delegatedProperty/kt4640.kt

@@ -0,0 +1,11 @@
+//KT-4640 "Trace is erased after resolution completion" exception
+
+class ValueWrapper()
+{
+    var value: Int = 0
+
+    fun get() = value
+    fun set(v: Int) { value = v }
+}
+
+val foo by <!DELEGATE_SPECIAL_FUNCTION_NONE_APPLICABLE!>ValueWrapper()<!>

compiler/tests/org/jetbrains/jet/checkers/JetDiagnosticsTestGenerated.java

@@ -2579,6 +2579,11 @@ public class JetDiagnosticsTestGenerated extends AbstractJetDiagnosticsTest {
                 doTest("compiler/testData/diagnostics/tests/delegatedProperty/incompleteTypeInference.kt");
             }
             
+            @TestMetadata("kt4640.kt")
+            public void testKt4640() throws Exception {
+                doTest("compiler/testData/diagnostics/tests/delegatedProperty/kt4640.kt");
+            }
+            
             @TestMetadata("localVariable.kt")
             public void testLocalVariable() throws Exception {
                 doTest("compiler/testData/diagnostics/tests/delegatedProperty/localVariable.kt");