word24 0.1.2 → 0.1.4
raw patch · 3 files changed
+4/−5 lines, 3 files
Files
- src/Data/Int/Int24.hs +1/−1
- src/Data/Word/Word24.hs +2/−2
- word24.cabal +1/−2
src/Data/Int/Int24.hs view
@@ -1,4 +1,4 @@-{-# LANGUAGE MagicHash, NoImplicitPrelude #-}+{-# LANGUAGE MagicHash, NoImplicitPrelude, BangPatterns #-} ----------------------------------------------------------------------------- -- |
src/Data/Word/Word24.hs view
@@ -1,4 +1,4 @@-{-# LANGUAGE MagicHash #-}+{-# LANGUAGE MagicHash, BangPatterns #-} -- | -- Module : Data.Word.Word24@@ -147,7 +147,7 @@ w2' = (fromIntegral :: (Word8 -> Word24)) w2 w3' = (fromIntegral :: (Word8 -> Word24)) w3 w = w1' .|. (w2' `shiftL` 8) .|. (w3' `shiftL` 16)- return $ fromIntegral w+ return w writeWord24ToPtr :: Ptr Word24 -> Word24 -> IO () writeWord24ToPtr p v = do
word24.cabal view
@@ -1,5 +1,5 @@ name: word24-version: 0.1.2+version: 0.1.4 synopsis: 24-bit word and int types for GHC description: 24-bit Word and Int data types. category: Data@@ -63,7 +63,6 @@ test-framework >= 0.2 && < 0.3, test-framework-quickcheck2 >= 0.2 && < 0.3 else- executable: False buildable: False if flag(splitBase)