Made vararg parameters have Array<out T> type

instead of simply Array<T>
  #KT-1638 Fixed
  #KT-2163 Fixed
  #KT-3213 Fixed
  #KT-4172 Fixed
  #KT-5534 Fixed

compiler/testData/codegen/box/diagnostics/vararg/kt4172.kt

@@ -0,0 +1,14 @@
+fun box(): String {
+    main(array())
+    return "OK"
+}
+
+fun main(args: Array<String>) {
+    D.foo(array())
+}
+
+object D {
+    fun foo(array: Array<out String>) = array
+}
+
+inline fun <reified T> array(vararg t : T) : Array<T> = t as Array<T>

compiler/testData/codegen/box/diagnostics/vararg/kt4172.txt

@@ -0,0 +1,21 @@
+package
+
+kotlin.inline() internal fun </*0*/ reified T> array(/*0*/ vararg t: T /*kotlin.Array<out T>*/): kotlin.Array<T>
+internal fun box(): kotlin.String
+internal fun main(/*0*/ args: kotlin.Array<kotlin.String>): kotlin.Unit
+
+internal object D {
+    private constructor D()
+    public open override /*1*/ /*fake_override*/ fun equals(/*0*/ other: kotlin.Any?): kotlin.Boolean
+    internal final fun foo(/*0*/ array: kotlin.Array<out kotlin.String>): kotlin.Array<out kotlin.String>
+    public open override /*1*/ /*fake_override*/ fun hashCode(): kotlin.Int
+    public open override /*1*/ /*fake_override*/ fun toString(): kotlin.String
+
+    public class object <class-object-for-D> : D {
+        private constructor <class-object-for-D>()
+        public open override /*1*/ /*fake_override*/ fun equals(/*0*/ other: kotlin.Any?): kotlin.Boolean
+        internal final override /*1*/ /*fake_override*/ fun foo(/*0*/ array: kotlin.Array<out kotlin.String>): kotlin.Array<out kotlin.String>
+        public open override /*1*/ /*fake_override*/ fun hashCode(): kotlin.Int
+        public open override /*1*/ /*fake_override*/ fun toString(): kotlin.String
+    }
+}

compiler/testData/codegen/box/vararg/kt796_797.kt

@@ -1,5 +1,5 @@
 fun <T> Array<T>?.get(i : Int?) = this!!.get(i!!)
-fun <T> array(vararg t : T) : Array<T> = t
+fun <T> array(vararg t : T) : Array<T> = t as Array<T>
 
 fun box() : String {
     val a : Array<String>? = array<String>("Str", "Str2")