Added tests for FsUnitTyped

fsprojects · May 26, 2016 · 9453c12 · 9453c12
1 parent a732e9d
commit 9453c12
Show file tree

Hide file tree

Showing 2 changed files with 9 additions and 0 deletions.
diff --git a/RELEASE_NOTES.md b/RELEASE_NOTES.md
@@ -4,6 +4,7 @@
 * Fixed: Structural equality fail - https://github.com/fsprojects/FsUnit/issues/78
 * Fixed: Statically typed equality test - https://github.com/fsprojects/FsUnit/issues/21
 * Fixed: Simplify "should throw" - https://github.com/fsprojects/FsUnit/issues/20
+* Fixed: matchList can match empty obj lists - https://github.com/fsprojects/FsUnit/pull/90
 
 ### 2.1.0 - March 7, 2016
 * Added support of `NUnit 3.2`

diff --git a/tests/FsUnit.NUnit.Test/typed.shouldEqualTests.fs b/tests/FsUnit.NUnit.Test/typed.shouldEqualTests.fs
@@ -73,3 +73,11 @@ type ``shouldEqual Tests`` ()=
      ``structural equality`` () =
         let actualList: char list = [] in
         [(actualList, "")] |> shouldEqual [([], "")]
+
+    [<Test>] member test.
+     ``Empty obj list should match itself`` () =
+        [] |> shouldEqual []
+
+    [<Test>] member test.
+     ``List with elements should not match empty list`` () =
+        [1] |> shouldNotEqual []