Commit f511425b authored by nominolo@gmail.com's avatar nominolo@gmail.com
Browse files

fixed typo

parent d1cd3dd3
......@@ -106,7 +106,7 @@ runP lineNo fieldname p s =
where results = readP_to_S p s
locatedErrorMsg :: PError -> (Maybe LineNo, String)
locatedErrorMsg (AmbigousParse f n) = (Just n, "Ambigous parse in field '"++f++"'")
locatedErrorMsg (AmbigousParse f n) = (Just n, "Ambiguous parse in field '"++f++"'")
locatedErrorMsg (NoParse f n) = (Just n, "Parse of field '"++f++"' failed: ")
locatedErrorMsg (FromString s n) = (n, s)
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment