KT-32178 Keyword completion: don't add 'fun' after 'suspend' in type position

#KT-32178 Fixed

idea/idea-completion/src/org/jetbrains/kotlin/idea/completion/KeywordCompletion.kt

@@ -104,7 +104,7 @@ object KeywordCompletion {
             var keyword = keywordToken.value
 
             val nextKeyword = when {
-                keywordToken == SUSPEND_KEYWORD && ((position.containingFile as? KtFile)?.isScript() == true) -> null
+                keywordToken == SUSPEND_KEYWORD && position.getStrictParentOfType<KtTypeReference>() != null -> null
                 else -> COMPOUND_KEYWORDS[keywordToken]
             }
             var applicableAsCompound = false

idea/idea-completion/testData/keywords/InFunctionTypePosition.kt

@@ -2,5 +2,5 @@ fun foo() {
     val test : <caret>
 }
 
-// EXIST: suspend fun
+// EXIST: suspend
 // NOTHING_ELSE

idea/idea-completion/testData/keywords/InTypePosition.kt

@@ -1,5 +1,5 @@
 val a : <caret>
 
 
-// EXIST: suspend fun
+// EXIST: suspend
 // NOTHING_ELSE

idea/idea-completion/testData/keywords/SuspendInParameterTypePosition.kt

@@ -0,0 +1,4 @@
+fun foo(a: <caret>) {}
+
+// EXIST: suspend
+// NOTHING_ELSE

idea/idea-completion/testData/keywords/SuspendInsideTypeArguments.kt

@@ -5,7 +5,7 @@ class Su() {
 }
 
 
-// EXIST: suspend fun
+// EXIST: suspend
 
 /* TODO: items below are not valid here */
 // EXIST: class

idea/idea-completion/testData/keywords/SuspendInsideTypeArguments1.kt

@@ -5,7 +5,7 @@ class Su() {
 }
 
 
-// EXIST: suspend fun
+// EXIST: suspend
 
 /* TODO: items below are not valid here */
 // EXIST: class

idea/idea-completion/tests/org/jetbrains/kotlin/idea/completion/test/KeywordCompletionTestGenerated.java

@@ -503,6 +503,11 @@ public class KeywordCompletionTestGenerated extends AbstractKeywordCompletionTes
         runTest("idea/idea-completion/testData/keywords/ReturnSet.kt");
     }
 
+    @TestMetadata("SuspendInParameterTypePosition.kt")
+    public void testSuspendInParameterTypePosition() throws Exception {
+        runTest("idea/idea-completion/testData/keywords/SuspendInParameterTypePosition.kt");
+    }
+
     @TestMetadata("SuspendInsideTypeArguments.kt")
     public void testSuspendInsideTypeArguments() throws Exception {
         runTest("idea/idea-completion/testData/keywords/SuspendInsideTypeArguments.kt");