diff --git a/TestCentre/LibraryTests.fs b/TestCentre/LibraryTests.fs index 335dbc2..34dbfd6 100644 --- a/TestCentre/LibraryTests.fs +++ b/TestCentre/LibraryTests.fs @@ -93,6 +93,8 @@ open TestingHelpers open Xunit + open DeathSocket + open System (* This test is a precaution (a test for the tests if you will...). It is here to make sure the property test has what it needs to run. @@ -103,4 +105,14 @@ let ``LoadingTestArea contains at least 100 test images`` () = let length = imagesInLoadingTestArea.Length let imagesAreThere = if length < 100 then false else true - Assert.True imagesAreThere \ No newline at end of file + Assert.True imagesAreThere + + [] + let ``Divide By Zero Exception is thrown when 0 rows is used when determining horizontal lines`` () = + let result () = GridPainter.determineHorizontalLines 100 100 0 + Assert.Throws(fun () -> result() |> ignore) + + [] + let ``Divide By Zero Exception is thrown when 0 columns is used when determining vertical lines`` () = + let result () = GridPainter.determineVerticalLines 100 100 0 + Assert.Throws(fun () -> result() |> ignore) \ No newline at end of file