[FE1.0, FIR] Support secondary constructors for Value Classes

Signed-off-by: Evgeniy.Zhelenskiy <Evgeniy.Zhelenskiy@jetbrains.com>

#KT-1179

compiler/testData/codegen/box/inlineClasses/boxImplDoesNotExecuteInSecondaryConstructor.kt

@@ -1,10 +1,9 @@
 // WITH_STDLIB
 // WORKS_WHEN_VALUE_CLASS
-// LANGUAGE: +ValueClasses
+// LANGUAGE: +ValueClasses, +ValueClassesSecondaryConstructorWithBody
 
 OPTIONAL_JVM_INLINE_ANNOTATION
 value class IC private constructor(val i: Int) {
-    @Suppress("SECONDARY_CONSTRUCTOR_WITH_BODY_INSIDE_VALUE_CLASS")
     constructor() : this(0) {
         counter += 1
     }

compiler/testData/codegen/box/inlineClasses/boxImplDoesNotExecuteInSecondaryConstructorGeneric.kt

@@ -1,10 +1,9 @@
 // WITH_STDLIB
 // WORKS_WHEN_VALUE_CLASS
-// LANGUAGE: +ValueClasses, +GenericInlineClassParameter
+// LANGUAGE: +ValueClasses, +GenericInlineClassParameter, +ValueClassesSecondaryConstructorWithBody
 
 OPTIONAL_JVM_INLINE_ANNOTATION
 value class IC<T: Int> private constructor(val i: T) {
-    @Suppress("SECONDARY_CONSTRUCTOR_WITH_BODY_INSIDE_VALUE_CLASS")
     constructor() : this(0 as T) {
         counter += 1
     }

compiler/testData/codegen/box/inlineClasses/secondaryConstructorsInsideInlineClass.kt

@@ -1,8 +1,6 @@
 // WITH_STDLIB
 // WORKS_WHEN_VALUE_CLASS
-// LANGUAGE: +ValueClasses
-
-@file:Suppress("SECONDARY_CONSTRUCTOR_WITH_BODY_INSIDE_VALUE_CLASS")
+// LANGUAGE: +ValueClasses, +ValueClassesSecondaryConstructorWithBody
 
 var global = "wrong"
 

compiler/testData/codegen/box/inlineClasses/secondaryConstructorsInsideInlineClassGeneric.kt

@@ -1,8 +1,6 @@
 // WITH_STDLIB
 // WORKS_WHEN_VALUE_CLASS
-// LANGUAGE: +ValueClasses, +GenericInlineClassParameter
-
-@file:Suppress("SECONDARY_CONSTRUCTOR_WITH_BODY_INSIDE_VALUE_CLASS")
+// LANGUAGE: +ValueClasses, +GenericInlineClassParameter, +ValueClassesSecondaryConstructorWithBody
 
 var global = "wrong"
 

compiler/testData/codegen/box/inlineClasses/secondaryConstructorsInsideInlineClassWithPrimitiveCarrierType.kt

@@ -1,6 +1,6 @@
 // WITH_STDLIB
 // WORKS_WHEN_VALUE_CLASS
-// LANGUAGE: +ValueClasses
+// LANGUAGE: +ValueClasses, +ValueClassesSecondaryConstructorWithBody
 
 var global = "wrong"
 
@@ -10,7 +10,6 @@ value class Foo(val x: Int) {
 
     constructor(z: Long) : this(z.toInt() + 1)
 
-    @Suppress("SECONDARY_CONSTRUCTOR_WITH_BODY_INSIDE_VALUE_CLASS")
     constructor(other: Char) : this(other.toInt().toString()) {
         global = "OK"
     }

compiler/testData/codegen/box/inlineClasses/secondaryConstructorsInsideInlineClassWithPrimitiveCarrierTypeGeneric.kt

@@ -1,6 +1,6 @@
 // WITH_STDLIB
 // WORKS_WHEN_VALUE_CLASS
-// LANGUAGE: +ValueClasses, +GenericInlineClassParameter
+// LANGUAGE: +ValueClasses, +GenericInlineClassParameter, +ValueClassesSecondaryConstructorWithBody
 
 var global = "wrong"
 
@@ -10,7 +10,6 @@ value class Foo<T: Int>(val x: T) {
 
     constructor(z: Long) : this((z.toInt() + 1) as T)
 
-    @Suppress("SECONDARY_CONSTRUCTOR_WITH_BODY_INSIDE_VALUE_CLASS")
     constructor(other: Char) : this(other.toInt().toString()) {
         global = "OK"
     }

compiler/testData/codegen/box/inlineClasses/simpleSecondaryConstructor.kt

@@ -4,9 +4,7 @@
 // IGNORE_BACKEND: JS_IR_ES6
 // WITH_STDLIB
 // WORKS_WHEN_VALUE_CLASS
-// LANGUAGE: +ValueClasses
-
-@file:Suppress("SECONDARY_CONSTRUCTOR_WITH_BODY_INSIDE_VALUE_CLASS")
+// LANGUAGE: +ValueClasses, +ValueClassesSecondaryConstructorWithBody
 
 OPTIONAL_JVM_INLINE_ANNOTATION
 value class Foo(val x: String) {

compiler/testData/codegen/box/inlineClasses/simpleSecondaryConstructorGeneric.kt

@@ -4,9 +4,7 @@
 // IGNORE_BACKEND: JS_IR_ES6
 // WITH_STDLIB
 // WORKS_WHEN_VALUE_CLASS
-// LANGUAGE: +ValueClasses, +GenericInlineClassParameter
-
-@file:Suppress("SECONDARY_CONSTRUCTOR_WITH_BODY_INSIDE_VALUE_CLASS")
+// LANGUAGE: +ValueClasses, +GenericInlineClassParameter, +ValueClassesSecondaryConstructorWithBody
 
 OPTIONAL_JVM_INLINE_ANNOTATION
 value class Foo<T: String>(val x: T) {

compiler/testData/codegen/box/valueClasses/complex.kt

@@ -6,20 +6,26 @@
 // TARGET_BACKEND: JVM_IR
 // IGNORE_BACKEND: ANDROID, ANDROID_IR
 // WORKS_WHEN_VALUE_CLASS
-// LANGUAGE: +ValueClasses
+// LANGUAGE: +ValueClasses, +ValueClassesSecondaryConstructorWithBody
 
 @JvmInline
 value class A<T : Any>(val x: List<T>)
 
 @JvmInline
-value class B(val x: UInt)
+value class B(val x: UInt) {
+    constructor(x: String) : this(x.toUInt()) {
+        supply(x)
+    }
+}
 
 @JvmInline
 value class C(val x: Int, val y: B, val z: String = "3")
 
 @JvmInline
 value class D(val x: C) {
-    constructor(x: Int, y: UInt, z: Int) : this(C(x, B(y), z.toString()))
+    constructor(x: Int, y: UInt, z: Int) : this(C(x, B(y), z.toString())) {
+        supply(y)
+    }
 
     init {
         supply(x.x)
@@ -69,6 +75,7 @@ fun <T : List<Int>> h(r: R<T>) {
     g(r.z)
     f(r)
     r
+    require(B("3") == B(3U))
     C(2, B(3U), "")
     D(C(2, B(3U), ""))
     val x = D(C(2, B(3U), ""))
@@ -227,6 +234,7 @@ fun box(): String {
         1
         #3
         3
+        4
         #4
         #5
         R(x=1, y=2, z=E(x=D(x=C(x=3, y=B(x=4), z=5))), t=A(x=[[6]]))
@@ -257,12 +265,14 @@ fun box(): String {
         B(x=4)
         5
         4
+        3
         2
         2
         4
         D(x=C(x=4, y=B(x=5), z=1))
         6
         6
+        7
         6
         6
         D(x=C(x=6, y=B(x=7), z=2))

compiler/testData/codegen/box/valueClasses/complex.txt

@@ -24,6 +24,7 @@ public final class B {
     private final field x: int
     private synthetic method <init>(p0: int): void
     public synthetic final static method box-impl(p0: int): B
+    public static method constructor-impl(@org.jetbrains.annotations.NotNull p0: java.lang.String): int
     public static method constructor-impl(p0: int): int
     public method equals(p0: java.lang.Object): boolean
     public static method equals-impl(p0: int, p1: java.lang.Object): boolean