@@ -347,7 +347,7 @@ hexadecimal = B8.foldl' step 0 `fmap` I.takeWhile1 isHexDigit
347347 where
348348 isHexDigit w = (w >= 48 && w <= 57) ||
349349 (w >= 97 && w <= 102) ||
350− (w >= 65 && w <= 90)
350+ (w >= 65 && w <= 70)
351351 step a w | w >= 48 && w <= 57 = (a `shiftL` 4) .|. fromIntegral (w - 48)
352352 | w >= 97 = (a `shiftL` 4) .|. fromIntegral (w - 87)
353353 | otherwise = (a `shiftL` 4) .|. fromIntegral (w - 55)