5 ms·
Back to Parsec using applicative style, and parsing the same thing as the original. parseAddress = Address <$> hexDigits <*> (dash *> hexDigits) wher
by evincarofautumn 14y ago
Back to Parsec using applicative style, and parsing the same thing as the original.
parseAddress = Address <$> hexDigits <*> (dash *> hexDigits)
where
hexDigits = read . ("0x" ++) <$> many1 hexDigit
dash = char '-'