Prohibit using suspend functions as SAM in fun interfaces

#KT-40978 Fixed

compiler/testData/diagnostics/tests/funInterface/funInterfaceDeclarationCheck.kt

@@ -71,7 +71,7 @@ interface BaseWithGeneric {
 fun interface GoodExtensionGeneric : GoodGeneric<String>
 
 fun interface GoodSuspend {
-    suspend fun invoke()
+    <!FUN_INTERFACE_WITH_SUSPEND_FUNCTION!>suspend<!> fun invoke()
 }
 
 class WithNestedFun<K> {

compiler/testData/diagnostics/tests/funInterface/suspendFunInterfaceConversion.fir.kt

@@ -0,0 +1,14 @@
+// !LANGUAGE: +NewInference +SamConversionForKotlinFunctions +SamConversionPerArgument +FunctionalInterfaceConversion
+// !DIAGNOSTICS: -UNUSED_PARAMETER -NOTHING_TO_INLINE
+
+fun interface SuspendRunnable {
+    suspend fun invoke()
+}
+
+fun run(r: SuspendRunnable) {}
+
+suspend fun bar() {}
+
+fun test() {
+    run(::bar)
+}

compiler/testData/diagnostics/tests/funInterface/suspendFunInterfaceConversion.kt

@@ -1,9 +1,8 @@
-// FIR_IDENTICAL
 // !LANGUAGE: +NewInference +SamConversionForKotlinFunctions +SamConversionPerArgument +FunctionalInterfaceConversion
 // !DIAGNOSTICS: -UNUSED_PARAMETER -NOTHING_TO_INLINE
 
 fun interface SuspendRunnable {
-    suspend fun invoke()
+    <!FUN_INTERFACE_WITH_SUSPEND_FUNCTION!>suspend<!> fun invoke()
 }
 
 fun run(r: SuspendRunnable) {}