Core.Tests: add new test to AvoidTooShortNames

Closes #592
fsprojects · Dec 15, 2022 · 62b8dca · 62b8dca
1 parent 889aa0d
commit 62b8dca
Showing 1 changed file with 12 additions and 0 deletions.
diff --git a/tests/FSharpLint.Core.Tests/Rules/Conventions/AvoidTooShortNames.fs b/tests/FSharpLint.Core.Tests/Rules/Conventions/AvoidTooShortNames.fs
@@ -95,3 +95,15 @@ type TorStreamCipher(keyBytes: array<byte>, ivOpt: Option<array<byte>>) =
  """
 
         Assert.IsTrue this.ErrorsExist
+
+    [<Test>]
+    member this.AvoidTooShortNamesShouldProduceError_7() =
+        this.Parse """
+module Base32Util =
+    let DecodeBase32 text =
+        let rec parse result input =
+            result
+        [ for c in text -> c ] |> parse List.Empty |> List.toArray
+ """
+
+        Assert.IsTrue this.ErrorsExist