- | Parse spaces.
--
-- > [ \t\r\n\f]+
--
-- Spaces are 1 or more space characters.
s :: Parser String
s = (do x <- many1 s_char
        return $ concat x) 
    <?> "spaces"

s :: Parser String
s = (do x <- many1 s_char
        return $ concat x) 
    <?> "spaces"
s = (do x <- many1 s_char
        return $ concat x) 
    <?> "spaces"