Commits

Bryan O'Sullivan  committed f01087e

Fix build with GHC 6.12.3

  • Participants
  • Parent commits 34de207

Comments (0)

Files changed (1)

File Data/ByteString/Base16.hs

           poke d . fromIntegral $ lo + (hi `shiftL` 4)
           go (s `plusPtr` 2) (d `plusPtr` 1)
 
-    hex (I# index) = W8# $ indexWord8OffAddr# table index
+    hex (I# index) = W8# (indexWord8OffAddr# table index)
     !table =
         "\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\
         \\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\