FileConventions.Test: add failing test

Add failing test for DetectNotUsingSnakeCaseInScriptName
function.

src/FileConventions.Test/DummyFiles/dummy_snake_case.fsx

@@ -0,0 +1,3 @@
+#!/usr/bin/env -S dotnet fsi
+
+printfn "Hello World!"

src/FileConventions.Test/FileConventions.Test.fs

@@ -586,3 +586,13 @@ let IsExecutableTest2() =
         ))
 
     Assert.That(IsExecutable fileInfo, Is.EqualTo false)
+
+
+[<Test>]
+let DetectNotUsingSnakeCaseInScriptName1() =
+    let fileInfo =
+        (FileInfo(
+            Path.Combine(dummyFilesDirectory.FullName, "dummy_snake_case.fsx")
+        ))
+
+    Assert.That(DetectNotUsingSnakeCaseInScriptName fileInfo, Is.EqualTo false)

src/FileConventions/Library.fs

@@ -390,3 +390,7 @@ let NonVerboseFlags(fileInfo: FileInfo) =
 let IsExecutable(fileInfo: FileInfo) =
     let hasExecuteAccess = Syscall.access(fileInfo.FullName, AccessModes.X_OK)
     hasExecuteAccess = 0
+
+let DetectNotUsingSnakeCaseInScriptName(fileInfo: FileInfo) =
+    printfn "%A" fileInfo.FullName
+    true