-- * Utility functions

-- | Our own space-skipping function, because A.skipSpace also skips
-- newline characters. It skips ZERO or more spaces, so it does not
-- fail if there are no spaces.
skipSpaces :: Parser ()
skipSpaces = A.skipWhile A.isHorizontalSpace
skipSpaces :: Parser ()
skipSpaces = A.skipWhile A.isHorizontalSpace
skipSpaces = A.skipWhile A.isHorizontalSpace