Minor change to Haddock

main
Sam Hatfield 2020-08-23 15:30:43 -05:00
parent 0187b87158
commit 03f0394fd4
Signed by: sehqlr
GPG Key ID: 6B1E0EDE1530CA2B
1 changed files with 1 additions and 1 deletions

View File

@ -53,7 +53,7 @@ stringifyEntry (wrd, sugs) =
]
-- |Given a maximum suggestion Int, a dictionary, and a list of words,
-- generate a tuple of a misspelled word and the list of Suggestions,
-- generate a tuple of a misspelled word and the list of 'Suggestion's,
-- bounded by the maximum suggestion length
spellcheckEntries :: (Ord a) => Int -> [[a]] -> [[a]] -> [([a], [Suggestion [a]])]
spellcheckEntries max dict wrds = filter pred_ $ map head_ entries