Browse Source

remove unused comments from property tests.

master
Craig Oates 5 years ago
parent
commit
319e63e153
  1. 1
      .gitignore
  2. 66
      TestCentre/PropertyTests.fs

1
.gitignore vendored

@ -328,3 +328,4 @@ ASALocalRun/
# MFractors (Xamarin productivity tool) working folder
.mfractor/
/WetPancake/NuGet.exe

66
TestCentre/PropertyTests.fs

@ -17,8 +17,7 @@
Pancake.CleanResultAsync (DefaultSentenceCount()) DefaultTestSentence
|> Async.RunSynchronously
|> EndsAsIntended
let results () = Assert.True(test())
Check.Quick (results())
test () = true
[<Property>]
let ``CleanResult returns intended number of sentences`` () =
@ -27,15 +26,12 @@
Pancake.CleanResultAsync desiredSentencesCount DefaultTestSentence
|> Async.RunSynchronously
|> CountSentences
let results () = Assert.Equal(desiredSentencesCount , test())
Check.Quick (results())
test () = desiredSentencesCount
[<Property>]
let ``RequestAllTemplateFiles does not return an empty list`` () =
let test () =
Pancake.RequestAllTemplateFiles ()
let results () = Assert.NotEmpty (test())
Check.Quick (results())
let test () = Pancake.RequestAllTemplateFiles ()
List.isEmpty (test ()) = false
[<Property>]
let ``RequestCleanText returns a string which ends with the correct end-token`` () =
@ -43,8 +39,8 @@
Pancake.RequestCleanTextAsync (ValidGibberishLevelInput()) 4
|> Async.RunSynchronously
|> EndsAsIntended
let results () = Assert.True(test())
Check.Quick (results())
test () = true
[<Property>]
let ``RequestCleanText returns intended number of sentences`` () =
@ -53,8 +49,7 @@
Pancake.RequestCleanTextAsync (ValidGibberishLevelInput()) desiredSentencesCount
|> Async.RunSynchronously
|> CountSentences
let results () = Assert.Equal(desiredSentencesCount, test())
Check.Quick (results())
test () = desiredSentencesCount
[<Property>]
let ``RequestCleanTextFromFile returns a string which ends with the correct end-token when using console-waterworks-announcement`` () =
@ -62,8 +57,7 @@
Pancake.RequestCleanTextFromFileAsync (ValidGibberishLevelInput()) (ValidSentencesInput()) ConsoleWaterworks
|> Async.RunSynchronously
|> EndsAsIntended
let results () = Assert.True(test())
Check.Quick (results())
test () = true
[<Property>]
let ``RequestCleanTextFromFile returns a string which ends with the correct end-token when using desktop-clock-info`` () =
@ -71,8 +65,7 @@
Pancake.RequestCleanTextFromFileAsync (ValidGibberishLevelInput()) (ValidSentencesInput()) DesktopClock
|> Async.RunSynchronously
|> EndsAsIntended
let results () = Assert.True(test())
Check.Quick (results())
test () = true
[<Property>]
let ``RequestCleanTextFromFile returns a string which ends with the correct end-token when using test-post`` () =
@ -80,8 +73,7 @@
Pancake.RequestCleanTextFromFileAsync (ValidGibberishLevelInput()) (ValidSentencesInput()) TestPost
|> Async.RunSynchronously
|> EndsAsIntended
let results () = Assert.True(test())
Check.Quick (results())
test () = true
[<Property>]
let ``RequestCleanTextFromFile returns a string which ends with the correct end-token when using word-generator`` () =
@ -89,8 +81,7 @@
Pancake.RequestCleanTextFromFileAsync (ValidGibberishLevelInput()) (ValidSentencesInput()) WordGenerator
|> Async.RunSynchronously
|> EndsAsIntended
let results () = Assert.True(test())
Check.Quick (results())
test () = true
[<Property>]
let ``RequestCleanTextFromFile returns intended number of strings when using console-waterworks-announcement`` () =
@ -99,8 +90,7 @@
Pancake.RequestCleanTextFromFileAsync (ValidGibberishLevelInput()) desiredSentencesCount ConsoleWaterworks
|> Async.RunSynchronously
|> CountSentences
let results () = Assert.Equal(desiredSentencesCount, test())
Check.Quick (results())
test () = desiredSentencesCount
[<Property>]
let ``RequestCleanTextFromFile returns intended number of strings when using desktop-clock-info`` () =
@ -109,8 +99,7 @@
Pancake.RequestCleanTextFromFileAsync (ValidGibberishLevelInput()) desiredSentencesCount DesktopClock
|> Async.RunSynchronously
|> CountSentences
let results () = Assert.Equal(desiredSentencesCount, test())
Check.Quick (results())
test () = desiredSentencesCount
[<Property>]
let ``RequestCleanTextFromFile returns intended number of strings when using test-post`` () =
@ -119,8 +108,7 @@
Pancake.RequestCleanTextFromFileAsync (ValidGibberishLevelInput()) desiredSentencesCount TestPost
|> Async.RunSynchronously
|> CountSentences
let results () = Assert.Equal(desiredSentencesCount, test())
Check.Quick (results())
test () = desiredSentencesCount
[<Property>]
let ``RequestCleanTextFromFile returns intended number of strings when using word-generator`` () =
@ -129,8 +117,7 @@
Pancake.RequestCleanTextFromFileAsync (ValidGibberishLevelInput()) desiredSentencesCount WordGenerator
|> Async.RunSynchronously
|> CountSentences
let results () = Assert.Equal(desiredSentencesCount, test())
Check.Quick (results())
test () = desiredSentencesCount
[<Property>]
let ``RequestRandomText returns a string which ends with the correct end-token`` () =
@ -138,8 +125,7 @@
Pancake.RequestRandomTextAsync ()
|> Async.RunSynchronously
|> EndsAsIntended
let results () = Assert.True(test())
Check.Quick (results())
test () = true
[<Property>]
let ``RequestText returns a string which ends with the correct end-token`` () =
@ -147,8 +133,8 @@
Pancake.RequestTextAsync (ValidGibberishLevelInput()) (ValidSentencesInput())
|> Async.RunSynchronously
|> EndsAsIntended
let results () = Assert.True(test())
Check.Quick (results())
test () = true
[<Property>]
let ``RequestTextFromFile returns a string which ends with with the correct end-token when using console-waterwork-announcement`` () =
@ -156,8 +142,7 @@
Pancake.RequestTextFromFileAsync (ValidGibberishLevelInput()) (ValidSentencesInput()) ConsoleWaterworks
|> Async.RunSynchronously
|> EndsAsIntended
let results () = Assert.True(test())
Check.Quick (results())
test () = true
[<Property>]
let ``RequestTextFromFile returns a string which ends with with the correct end-token when using desktop-clock-info`` () =
@ -165,8 +150,8 @@
Pancake.RequestTextFromFileAsync (ValidGibberishLevelInput()) (ValidSentencesInput()) DesktopClock
|> Async.RunSynchronously
|> EndsAsIntended
let results () = Assert.True(test())
Check.Quick (results())
test () = true
[<Property>]
let ``RequestTextFromFile returns a string which ends with with the correct end-token when using test-post`` () =
@ -174,8 +159,7 @@
Pancake.RequestTextFromFileAsync (ValidGibberishLevelInput()) (ValidSentencesInput()) TestPost
|> Async.RunSynchronously
|> EndsAsIntended
let results () = Assert.True(test())
Check.Quick (results())
test () = true
[<Property>]
let ``RequestTextFromFile returns a string which ends withwith the correct end-token when using word-generator`` () =
@ -183,8 +167,7 @@
Pancake.RequestTextFromFileAsync (ValidGibberishLevelInput()) (ValidSentencesInput()) WordGenerator
|> Async.RunSynchronously
|> EndsAsIntended
let results () = Assert.True(test())
Check.Quick (results())
test () = true
[<Property>]
let ``TextInFileIsValid returns true when processing the text in the template files`` () =
@ -195,5 +178,4 @@
let test () =
Pancake.TextInFileIsValidAsync (ValidFileInput())
|> Async.RunSynchronously
let results () = Assert.True (test())
Check.Quick (results())
test () = true
Loading…
Cancel
Save