- | @checkParser p r s@ tries to run parser @p@ on input @s@ to parse
-- entire @s@. Result of the parsing is compared with expected result @r@,
-- it should match, otherwise the property doesn't hold and the test fails.

checkParser :: (Eq a, Show a) =>
               Parser a -> Either ParseError a -> String -> Property
checkParser p r s = simpleParse p s === r

checkParser :: (Eq a, Show a) =>
               Parser a -> Either ParseError a -> String -> Property
checkParser p r s = simpleParse p s === r
checkParser p r s = simpleParse p s === r