diff --git a/src/FileConventions.Test/DummyFiles/DummyScriptWithEmptyString.fsx b/src/FileConventions.Test/DummyFiles/DummyScriptWithEmptyString.fsx new file mode 100644 index 00000000..1ae049d8 --- /dev/null +++ b/src/FileConventions.Test/DummyFiles/DummyScriptWithEmptyString.fsx @@ -0,0 +1 @@ +let myString = "\"Hello World\"" diff --git a/src/FileConventions.Test/DummyFiles/DummyScriptWithMatchEmptyString.fsx b/src/FileConventions.Test/DummyFiles/DummyScriptWithMatchEmptyString.fsx new file mode 100644 index 00000000..f8911d75 --- /dev/null +++ b/src/FileConventions.Test/DummyFiles/DummyScriptWithMatchEmptyString.fsx @@ -0,0 +1,5 @@ +let temp = "Hello World" + +match temp with +| "" -> failwith "Empty String" +| _ -> failwith "Non-Empty String" diff --git a/src/FileConventions.Test/FileConventions.Test.fs b/src/FileConventions.Test/FileConventions.Test.fs index bc4c6a3f..13549870 100644 --- a/src/FileConventions.Test/FileConventions.Test.fs +++ b/src/FileConventions.Test/FileConventions.Test.fs @@ -614,6 +614,32 @@ let DefiningEmptyStringsWithDoubleQuotes2() = Assert.That(DefiningEmptyStringsWithDoubleQuotes fileInfo, Is.EqualTo true) +[] +let DefiningEmptyStringsWithDoubleQuotes3() = + let fileInfo = + FileInfo( + Path.Combine( + dummyFilesDirectory.FullName, + "DummyScriptWithEmptyString.fsx" + ) + ) + + Assert.That(DefiningEmptyStringsWithDoubleQuotes fileInfo, Is.EqualTo false) + + +[] +let DefiningEmptyStringsWithDoubleQuotes4() = + let fileInfo = + FileInfo( + Path.Combine( + dummyFilesDirectory.FullName, + "DummyScriptWithMatchEmptyString.fsx" + ) + ) + + Assert.That(DefiningEmptyStringsWithDoubleQuotes fileInfo, Is.EqualTo false) + + [] let ProjFilesNamingConvention1() = let fileInfo = diff --git a/src/FileConventions.Test/FileConventions.Test.fsproj b/src/FileConventions.Test/FileConventions.Test.fsproj index c4beb5c4..2b470f8d 100644 --- a/src/FileConventions.Test/FileConventions.Test.fsproj +++ b/src/FileConventions.Test/FileConventions.Test.fsproj @@ -28,6 +28,8 @@ + +