Write typeinfo annotations of generated componentN methods

Add some LoadKotlin testcases to test that.

compiler/backend/src/org/jetbrains/jet/codegen/ImplementationBodyCodegen.java

@@ -378,6 +378,14 @@ public class ImplementationBodyCodegen extends ClassBodyCodegen {
                                        "()" + componentType.getDescriptor(),
                                        null, null);
 
+        JetMethodAnnotationWriter aw = JetMethodAnnotationWriter.visitAnnotation(mv);
+        BitSet kotlinFlags = getFlagsForVisibility(function.getVisibility());
+        aw.writeFlags(kotlinFlags);
+        aw.writeNullableReturnType(returnType.isNullable());
+        JvmMethodSignature jvmMethodSignature = typeMapper.mapToCallableMethod(function, false, kind).getSignature();
+        aw.writeReturnType(jvmMethodSignature.getKotlinReturnType());
+        aw.visitEnd();
+
         mv.visitCode();
         InstructionAdapter iv = new InstructionAdapter(mv);
         if (!componentType.equals(Type.VOID_TYPE)) {

compiler/testData/loadKotlin/dataClass/MixedComponents.kt

@@ -0,0 +1,3 @@
+package test
+
+data class DataClass(var x: String, y: Int, val z: Double)

compiler/testData/loadKotlin/dataClass/MixedComponents.txt

@@ -0,0 +1,9 @@
+namespace test
+
+jet.data() internal final class test.DataClass : jet.Any {
+    public final /*constructor*/ fun <init>(/*0*/ x: jet.String, /*1*/ y: jet.Int, /*2*/ z: jet.Double): test.DataClass
+    internal final fun component1(): jet.String
+    internal final fun component2(): jet.Double
+    internal final var x: jet.String
+    internal final val z: jet.Double
+}

compiler/testData/loadKotlin/dataClass/NoComponents.kt

@@ -0,0 +1,3 @@
+package test
+
+data class DataClass

compiler/testData/loadKotlin/dataClass/NoComponents.txt

@@ -0,0 +1,5 @@
+namespace test
+
+jet.data() internal final class test.DataClass : jet.Any {
+    public final /*constructor*/ fun <init>(): test.DataClass
+}

compiler/testData/loadKotlin/dataClass/OneVal.kt

@@ -0,0 +1,3 @@
+package test
+
+data class DataClass(val x: String)

compiler/testData/loadKotlin/dataClass/OneVal.txt

@@ -0,0 +1,7 @@
+namespace test
+
+jet.data() internal final class test.DataClass : jet.Any {
+    public final /*constructor*/ fun <init>(/*0*/ x: jet.String): test.DataClass
+    internal final fun component1(): jet.String
+    internal final val x: jet.String
+}

compiler/testData/loadKotlin/dataClass/OpenDataClass.kt

@@ -0,0 +1,3 @@
+package test
+
+open data class DataClass(val x: String)

compiler/testData/loadKotlin/dataClass/OpenDataClass.txt

@@ -0,0 +1,7 @@
+namespace test
+
+jet.data() internal open class test.DataClass : jet.Any {
+    public final /*constructor*/ fun <init>(/*0*/ x: jet.String): test.DataClass
+    internal final fun component1(): jet.String
+    internal final val x: jet.String
+}

compiler/testData/loadKotlin/dataClass/OpenPropertyFinalComponent.kt

@@ -0,0 +1,3 @@
+package test
+
+open data class DataClass(open val x: String)

compiler/testData/loadKotlin/dataClass/OpenPropertyFinalComponent.txt

@@ -0,0 +1,7 @@
+namespace test
+
+jet.data() internal open class test.DataClass : jet.Any {
+    public final /*constructor*/ fun <init>(/*0*/ x: jet.String): test.DataClass
+    internal final fun component1(): jet.String
+    internal open val x: jet.String
+}

compiler/testData/loadKotlin/dataClass/TwoVals.kt

@@ -0,0 +1,3 @@
+package test
+
+data class DataClass(val x: String, val y: Int)

compiler/testData/loadKotlin/dataClass/TwoVals.txt

@@ -0,0 +1,9 @@
+namespace test
+
+jet.data() internal final class test.DataClass : jet.Any {
+    public final /*constructor*/ fun <init>(/*0*/ x: jet.String, /*1*/ y: jet.Int): test.DataClass
+    internal final fun component1(): jet.String
+    internal final fun component2(): jet.Int
+    internal final val x: jet.String
+    internal final val y: jet.Int
+}

compiler/testData/loadKotlin/dataClass/TwoVars.kt

@@ -0,0 +1,3 @@
+package test
+
+data class DataClass(var x: String, var y: Int)

compiler/testData/loadKotlin/dataClass/TwoVars.txt

@@ -0,0 +1,9 @@
+namespace test
+
+jet.data() internal final class test.DataClass : jet.Any {
+    public final /*constructor*/ fun <init>(/*0*/ x: jet.String, /*1*/ y: jet.Int): test.DataClass
+    internal final fun component1(): jet.String
+    internal final fun component2(): jet.Int
+    internal final var x: jet.String
+    internal final var y: jet.Int
+}