Support single-underscore named variables in JVM backend

There are mainly two kind of changes:
- skipping 'componentX' calls for destructuring entries named _
- fixing local variable table for them
 - skip entries for destructuring entries named _
 - use $noName_<i> format for lambda parameters named _

 #KT-3824 Fixed
 #KT-2783 Fixed

compiler/testData/checkLocalVariablesTable/underscoreNames.kt

@@ -0,0 +1,34 @@
+data class A(val x: Double = 1.0, val y: String = "", val z: Char = '0')
+
+fun foo(a: A, block: (A, String, Int) -> String): String = block(a, "", 1)
+
+val arrayOfA: Array<A> = Array(1) { A() }
+
+fun box() {
+
+    foo(A()) {
+        (x, _, y), _, w ->
+
+        val (a, _, c) = A()
+        val (_, `_`, d) = A()
+
+        for ((_, q) in arrayOfA) {
+
+        }
+
+        ""
+    }
+}
+
+// METHOD : UnderscoreNamesKt$box$1.invoke(LA;Ljava/lang/String;I)Ljava/lang/String;
+// VARIABLE : NAME=q TYPE=Ljava/lang/String; INDEX=15
+// VARIABLE : NAME=d TYPE=C INDEX=11
+// VARIABLE : NAME=_ TYPE=Ljava/lang/String; INDEX=10
+// VARIABLE : NAME=c TYPE=C INDEX=9
+// VARIABLE : NAME=a TYPE=D INDEX=7
+// VARIABLE : NAME=this TYPE=LUnderscoreNamesKt$box$1; INDEX=0
+// VARIABLE : NAME=$x_$_$_y TYPE=LA; INDEX=1
+// VARIABLE : NAME=$noName_1 TYPE=Ljava/lang/String; INDEX=2
+// VARIABLE : NAME=w TYPE=I INDEX=3
+// VARIABLE : NAME=x TYPE=D INDEX=4
+// VARIABLE : NAME=y TYPE=C INDEX=6

compiler/testData/codegen/box/closures/underscoreParameters.kt

@@ -0,0 +1,3 @@
+fun foo(block: (String, String, String) -> String): String = block("O", "fail", "K")
+
+fun box() = foo { x, _, y -> x + y }

compiler/testData/codegen/box/destructuringDeclInLambdaParam/underscoreNames.kt

@@ -0,0 +1,9 @@
+class A {
+    operator fun component1() = "O"
+    operator fun component2(): String = throw RuntimeException("fail 0")
+    operator fun component3() = "K"
+}
+
+fun foo(a: A, block: (A) -> String): String = block(a)
+
+fun box() = foo(A()) { (x, _, y) -> x + y }

compiler/testData/codegen/box/functions/functionExpression/underscoreParameters.kt

@@ -0,0 +1,3 @@
+fun foo(block: (String, String, String) -> String): String = block("O", "fail", "K")
+
+fun box() = foo(fun(x: String, _: String, y: String) = x + y)

compiler/testData/codegen/box/multiDecl/UnderscoreNames.kt

@@ -0,0 +1,14 @@
+class A {
+    operator fun component1() = 1
+    operator fun component2() = 2
+}
+
+fun box() : String {
+    val (_, b) = A()
+
+    val (a, _) = A()
+
+    val (`_`, c) = A()
+
+    return if (a == 1 && b == 2 && _ == 1 && c == 2) "OK" else "fail"
+}

compiler/testData/codegen/box/multiDecl/forRange/UnderscoreNames.kt

@@ -0,0 +1,43 @@
+class Range(val from : C, val to: C) {
+    operator fun iterator() = It(from, to)
+}
+
+class It(val from: C, val to: C) {
+    var c = from.i
+
+    operator fun next(): C {
+        val next = C(c)
+        c++
+        return next
+    }
+
+    operator fun hasNext(): Boolean = c <= to.i
+}
+
+class C(val i : Int) {
+    operator fun component1() = i + 1
+    operator fun component2() = i + 2
+    operator fun rangeTo(c: C) = Range(this, c)
+}
+
+fun doTest(): String {
+    var s = ""
+    for ((a, _) in C(0)..C(2)) {
+        s += "$a;"
+    }
+
+    for ((_, b) in C(1)..C(3)) {
+        s += "$b;"
+    }
+
+    for ((_, `_`) in C(2)..C(4)) {
+        s += "$_;"
+    }
+
+    return s
+}
+
+fun box(): String {
+    val s = doTest()
+    return if (s == "1;2;3;3;4;5;4;5;6;") "OK" else "fail: $s"
+}

compiler/testData/codegen/box/multiDecl/forRange/UnderscoreNamesDontCallComponent.kt

@@ -0,0 +1,15 @@
+class A {
+    operator fun component1() = "O"
+    operator fun component2(): String = throw RuntimeException("fail 0")
+    operator fun component3() = "K"
+}
+
+fun box(): String {
+    val aA = Array(1) { A() }
+
+    for ((x, _, z) in aA) {
+        return x + z
+    }
+
+    return "OK"
+}