Remove whitespace gobbling from annotateLocation

This commit is contained in:
Joe Hermaszewski 2016-06-25 12:01:15 +01:00
parent 8c55ce604d
commit 6c0683eff3

View file

@ -27,7 +27,6 @@ import Prelude hiding (elem)
annotateLocation :: Parser a -> Parser (Ann SrcSpan a) annotateLocation :: Parser a -> Parser (Ann SrcSpan a)
annotateLocation p = do annotateLocation p = do
whiteSpace
begin <- position begin <- position
res <- p res <- p
end <- position end <- position