diff --git a/TestCentre/ConsoleTests.fs b/TestCentre/ConsoleTests.fs index 106e7fc..95cd185 100644 --- a/TestCentre/ConsoleTests.fs +++ b/TestCentre/ConsoleTests.fs @@ -2,6 +2,10 @@ module TestingHelpers = + (* When you are writing tests, please keep all helper functions in this module. + If this module grows to a point where it hinders the actual testing modules, + consider moving it then. *) + open System open DeathSocketCLI.Validation @@ -13,6 +17,8 @@ let loadPath = loadLocation + "/LoadTest.png" let savePath = saveLocation + "/SaveTest.png" + (* Brushes converted to string []. + CLI deals with strings before brushes. *) let testingColourArray = colourList |> Map.toSeq @@ -75,7 +81,8 @@ penWidth = pWidth rows =randRows columns = randCols } - let spec = buildSpec loadPath randRows randCols pWidth colourString savePath + let spec = + buildSpec loadPath randRows randCols pWidth colourString savePath intendedSpec = spec module UnitTests =