Fixed StackOverflow in CanBeValInspection.kt

idea/src/org/jetbrains/kotlin/idea/inspections/CanBeValInspection.kt

@@ -108,7 +108,7 @@ class CanBeValInspection : AbstractKotlinInspection() {
                     if (next in visited) continue
                     if (next in targets) return true
                     visited.add(next)
-                    if (canReach(next, targets)) return true
+                    if (canReach(next, targets, visited)) return true
                 }
                 return false
             }

idea/testData/inspections/canBeVal/inspectionData/expected.xml

@@ -52,4 +52,13 @@
         <problem_class severity="WARNING" attribute_key="WARNING_ATTRIBUTES">Local 'var' can be declared as 'val'</problem_class>
         <description>Can be declared as 'val'</description>
     </problem>
+
+    <problem>
+        <file>stackOverflowBug.kt</file>
+        <line>2</line>
+        <module>light_idea_test_case</module>
+        <entry_point TYPE="file" FQNAME="stackOverflowBug.kt" />
+        <problem_class severity="WARNING" attribute_key="WARNING_ATTRIBUTES">Local 'var' can be declared as 'val'</problem_class>
+        <description>Can be declared as 'val'</description>
+    </problem>
 </problems>

idea/testData/inspections/canBeVal/stackOverflowBug.kt

@@ -0,0 +1,6 @@
+fun foo() {
+    var a: Int
+    a = 1
+    for (i in 1..10)
+        print(i)
+}