Quick Fixes: Implement "Create label" quick fix

#KT-8855 Fixed

idea/testData/quickfix/createLabel/breakInlambdaBeforeLoop.kt

@@ -0,0 +1,11 @@
+// "Create label foo@" "false"
+// ERROR: The label '@foo' does not denote a loop
+// ERROR: Unresolved reference: @foo
+
+fun bar(f: () -> Unit) { }
+
+fun test() {
+    while (true) {
+        bar { break@<caret>foo }
+    }
+}