|
|
|
@ -9,14 +9,6 @@
|
|
|
|
|
open Helpers |
|
|
|
|
open InputGeneration |
|
|
|
|
|
|
|
|
|
(* End of Session Note - Monday 23rd July/Tuesday 24th July |
|
|
|
|
================================================================================================================== |
|
|
|
|
[x] Remove the "contains a full stop" tests -- no longer needed due to change in functionality. |
|
|
|
|
[x] Update the "end with a full-stop" tests -- expanded the way a sentence can end. |
|
|
|
|
[...] Add returns intended sentences for "clean" functions. |
|
|
|
|
[x] Double check UnitTests.fs |
|
|
|
|
*) |
|
|
|
|
|
|
|
|
|
module ``Null Tests`` = |
|
|
|
|
|
|
|
|
|
[<Property>] |
|
|
|
@ -176,8 +168,6 @@
|
|
|
|
|
let results () = Assert.True(test()) |
|
|
|
|
Check.Quick (results()) |
|
|
|
|
|
|
|
|
|
// clean text from file returns intended sent. |
|
|
|
|
|
|
|
|
|
[<Property>] |
|
|
|
|
let ``RequestCleanTextFromFile returns intended number of strings when using console-waterworks-announcement`` () = |
|
|
|
|
let desiredSentencesCount = (ValidSentencesInput()) |
|
|
|
@ -218,8 +208,6 @@
|
|
|
|
|
let results () = Assert.Equal(desiredSentencesCount, test()) |
|
|
|
|
Check.Quick (results()) |
|
|
|
|
|
|
|
|
|
// end of intended sent. tests |
|
|
|
|
|
|
|
|
|
[<Property>] |
|
|
|
|
let ``RequestRandomText returns a string which ends with the correct end-token`` () = |
|
|
|
|
let test () = |
|
|
|
|