By | fr33domlover |
At | 2016-04-29 |
Title | Fix bugs in getHex16 |
Description |
Edit file src/Data/Binary/Get/Local.hs 0 → 0
- 62 let sl n = unsafeShiftL n . toInt
+ 62 let sl n = flip unsafeShiftL n . toInt
- 67 return $ hh .&. h .&. l .&. ll
+ 67 return $ hh .|. h .|. l .|. ll
… … … …