satisfyString :: (Char -> Bool) -> Parser String
satisfyString p = satisfy p >>= (\c -> return [c])
satisfyString :: (Char -> Bool) -> Parser String
satisfyString p = satisfy p >>= (\c -> return [c])
satisfyString p = satisfy p >>= (\c -> return [c])