diff --git a/WetPancake/ProductServices.fs b/WetPancake/ProductServices.fs index bbbe3bd..88d0489 100644 --- a/WetPancake/ProductServices.fs +++ b/WetPancake/ProductServices.fs @@ -44,6 +44,17 @@ module Pancake = | :? InvalidOperationException -> return text } + /// + /// Checks the text within the specified file to see if it contains a vaild end token. + /// They are '.', '!' and '?'. + /// + /// + /// The path of the .txt file being tested. + /// + /// + /// This function does not check to see if the filepath is valid. + /// Be sure to check the path is valid before calling this function. + /// let TextInFileIsValidAsync filePath = async { return DataAccess.LoadFile filePath |> TextContainsValidEndToken