Wrote unit tests for RequestCleanTextFromFile -- ends with correct end-token.

This includes console-waterworks, desktop-clock, test-post and word-generator.

TestCentre/UnitTests.fs

@@ -156,6 +156,38 @@
                 |> CountSentences
             Assert.Equal(desiredSentencesCount, result)
 
+        [<Fact>]
+        let ``RequestCleanFileTextFromFile returns a string which end with the correct end-token when using console-waterworks-announcement`` () =
+            let result =
+                Pancake.RequestCleanTextFromFileAsync (ValidGibberishLevelInput()) (ValidSentencesInput()) ConsoleWaterworks
+                |> Async.RunSynchronously
+                |> EndsAsIntended
+            Assert.True result
+
+        [<Fact>]
+        let ``RequestCleanFileTextFromFile returns a string which end with the correct end-token when using desktop-clock-info`` () =
+            let result =
+                Pancake.RequestCleanTextFromFileAsync (ValidGibberishLevelInput()) (ValidSentencesInput()) DesktopClock
+                |> Async.RunSynchronously
+                |> EndsAsIntended
+            Assert.True result
+
+        [<Fact>]
+        let ``RequestCleanFileTextFromFile returns a string which end with the correct end-token when using test-post`` () =
+            let result =
+                Pancake.RequestCleanTextFromFileAsync (ValidGibberishLevelInput()) (ValidSentencesInput()) TestPost
+                |> Async.RunSynchronously
+                |> EndsAsIntended
+            Assert.True result
+
+        [<Fact>]
+        let ``RequestCleanFileTextFromFile returns a string which end with the correct end-token when using word-generator`` () =
+            let result =
+                Pancake.RequestCleanTextFromFileAsync (ValidGibberishLevelInput()) (ValidSentencesInput()) WordGenerator
+                |> Async.RunSynchronously
+                |> EndsAsIntended
+            Assert.True result
+
         [<Fact>]
         let ``RequestCleanTextFromFile returns intended number of sentences when using console-waterworks-announcement`` () =
             let desiredSentencesCount = (ValidSentencesInput())