@@ -68,5 +68,5 @@ skipWhile p = I.skipWhile (p . w2c)
69-- | Skip over white space.
69-- | Skip over white space.
70skipSpace :: PARSER ()
70skipSpace :: PARSER ()
71−skipSpace = takeWhile isSpace >> return ()
71+skipSpace = skipWhile isSpace >> return ()
72{-# INLINE skipSpace #-}
72{-# INLINE skipSpace #-}