CSharpFriendlyAsyncOverload: add failing tests

Author: parhamsaremi

tests/FSharpLint.Core.Tests/Rules/Conventions/CSharpFriendlyAsyncOverload.fs

@@ -8,19 +8,40 @@ type TestConventionsCSharpFriendlyAsyncOverload() =
     inherit TestAstNodeRuleBase.TestAstNodeRuleBase(CSharpFriendlyAsyncOverload.rule)
 
     [<Test>]
-    member this.``async function must suggest friendly implementation``() =
+    member this.``async function should have the prefix Async``() =
         this.Parse("""
 module Foo =
     let Bar(): Async<unit> =
         Async.Sleep 5""")
 
         Assert.IsTrue(this.ErrorExistsAt(3, 8))
+        
+    [<Test>]
+    member this.``async function should have the prefix Async 2``() =
+        this.Parse("""
+module Foo =
+    let Bar(): Async<unit> =
+        Async.Sleep 5
+    let BarAsync(): Task<unit> =
+        Bar() |> Async.StartAsTask""")
+
+        Assert.IsTrue(this.ErrorExistsAt(3, 8))
+       
+        
+    [<Test>]
+    member this.``async function must suggest friendly implementation``() =
+        this.Parse("""
+module Foo =
+    let AsyncBar(): Async<unit> =
+        Async.Sleep 5""")
+
+        Assert.IsTrue(this.ErrorExistsAt(3, 8))
 
     [<Test>]
     member this.``async function with friendly implementation must not have errors``() =
         this.Parse("""
 module Foo =
-    let Bar(): Async<unit> =
+    let AsyncBar(): Async<unit> =
         Async.Sleep 5
     let BarAsync(): Task<unit> =
         Bar() |> Async.StartAsTask""")
@@ -40,7 +61,7 @@ module Foo =
     member this.``async function must not have errors when not delcared immediately following the parent function``() =
         this.Parse("""
 module Foo =
-    let Bar(): Async<unit> =
+    let AsyncBar(): Async<unit> =
         Async.Sleep 5
     let RandomFunction() =
         ()
@@ -53,13 +74,13 @@ module Foo =
     member this.``multiple async functions must have errors``() =
         this.Parse("""
 module Foo =
-    let Bar(): Async<unit> =
+    let AsyncBar(): Async<unit> =
         Async.Sleep 5
     let RandomFunction() =
         ()
     let BarAsync(): Task<unit> =
         Bar() |> Async.StartAsTask
-    let Foo(): Async<unit> =
+    let AsyncFoo(): Async<unit> =
         Async.Sleep 10""")
 
         Assert.IsTrue(this.ErrorExistsAt(9, 8))
@@ -68,13 +89,13 @@ module Foo =
     member this.``multiple async functions must not have errors``() =
         this.Parse("""
 module Foo =
-    let Bar(): Async<unit> =
+    let AsyncBar(): Async<unit> =
         Async.Sleep 5
     let RandomFunction() =
         ()
     let BarAsync(): Task<unit> =
         Bar() |> Async.StartAsTask
-    let Foo(): Async<unit> =
+    let AsyncFoo(): Async<unit> =
         Async.Sleep 10
     let FooAsync(): Task<unit> =
         Foo() |> Async.StartAsTask""")