haskell/esqueleto
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Merge pull request #52 from EdwardBetts/spelling

Browse Source 
correct spelling mistake
This commit is contained in:
Chris Allen 2017-09-01 13:07:55 -05:00 committed by GitHub
commit 91ea0b0fca
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
test/Test.hs
View File

@ -846,7 +846,7 @@ main = do
return (p ^. PersonId :: SqlExpr (Value PersonId)) return (p ^. PersonId :: SqlExpr (Value PersonId))
-- There are 2^4 = 16 possible orderings. The chance -- There are 2^4 = 16 possible orderings. The chance
-- of 11 random samplings returning the same ordering -- of 11 random samplings returning the same ordering
-- is 1/2^40, so this test should pass almost everytime. -- is 1/2^40, so this test should pass almost every time.
liftIO $ S.size rets `shouldSatisfy` (>2) liftIO $ S.size rets `shouldSatisfy` (>2)
it "works on a composite primary key" $ it "works on a composite primary key" $