|
|
|
@ -11,9 +11,9 @@
|
|
|
|
|
|
|
|
|
|
(* End of Session Note - Monday 23rd July |
|
|
|
|
================================================================================================================== |
|
|
|
|
[] Remove the "contains a full stop" tests -- no longer needed due to change in functionality. |
|
|
|
|
[x] Remove the "contains a full stop" tests -- no longer needed due to change in functionality. |
|
|
|
|
[] Update the "end with a full-stop" tests -- expanded the way a sentence can end. |
|
|
|
|
[] Double check UnitTests.fs |
|
|
|
|
[x] Double check UnitTests.fs |
|
|
|
|
*) |
|
|
|
|
|
|
|
|
|
module ``Null Tests`` = |
|
|
|
@ -103,6 +103,14 @@
|
|
|
|
|
let results () = Assert.Equal(desiredSentencesCount , test()) |
|
|
|
|
Check.Quick (results()) |
|
|
|
|
|
|
|
|
|
[<Property>] |
|
|
|
|
let ``CleanResult returns a string which ends with the correct end-token`` () = |
|
|
|
|
let test () = |
|
|
|
|
Pancake.CleanResultAsync (DefaultSentenceCount()) DefaultTestSentence |
|
|
|
|
|> Async.RunSynchronously |
|
|
|
|
|> EndsAsIntended |
|
|
|
|
let results () = Assert.True(test()) |
|
|
|
|
Check.Quick (results()) |
|
|
|
|
|
|
|
|
|
[<Property>] |
|
|
|
|
let ``RequestAllTemplateFiles does not return an empty list`` () = |
|
|
|
|