packages feed

half 0.2.2.1 → 0.2.2.2

raw patch · 3 files changed

+13/−5 lines, 3 filesPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

API changes (from Hackage documentation)

- Numeric.Half: getHalf :: Half -> CUShort
- Numeric.Half: instance Eq Half
- Numeric.Half: instance Floating Half
- Numeric.Half: instance Fractional Half
- Numeric.Half: instance Num Half
- Numeric.Half: instance Ord Half
- Numeric.Half: instance Read Half
- Numeric.Half: instance Real Half
- Numeric.Half: instance RealFloat Half
- Numeric.Half: instance RealFrac Half
- Numeric.Half: instance Show Half
- Numeric.Half: instance Storable Half
- Numeric.Half: instance Typeable Half
+ Numeric.Half: [getHalf] :: Half -> CUShort
+ Numeric.Half: instance Foreign.Storable.Storable Numeric.Half.Half
+ Numeric.Half: instance GHC.Classes.Eq Numeric.Half.Half
+ Numeric.Half: instance GHC.Classes.Ord Numeric.Half.Half
+ Numeric.Half: instance GHC.Float.Floating Numeric.Half.Half
+ Numeric.Half: instance GHC.Float.RealFloat Numeric.Half.Half
+ Numeric.Half: instance GHC.Num.Num Numeric.Half.Half
+ Numeric.Half: instance GHC.Read.Read Numeric.Half.Half
+ Numeric.Half: instance GHC.Real.Fractional Numeric.Half.Half
+ Numeric.Half: instance GHC.Real.Real Numeric.Half.Half
+ Numeric.Half: instance GHC.Real.RealFrac Numeric.Half.Half
+ Numeric.Half: instance GHC.Show.Show Numeric.Half.Half

Files

CHANGELOG.markdown view
@@ -1,3 +1,7 @@+0.2.2.2+-------+* Fixed an issue with `Storable` that was causing crashing for some users.+ 0.2.2.1 ------- * Added support for older GHCs still. `unsafeShiftR` was only added in 7.4.
half.cabal view
@@ -1,6 +1,6 @@ name:          half category:      Numeric-version:       0.2.2.1+version:       0.2.2.2 license:       BSD3 cabal-version: >= 1.8 license-file:  LICENSE
src/Numeric/Half.hs view
@@ -22,7 +22,7 @@ -- CPU as well. ---------------------------------------------------------------------------- -module Numeric.Half +module Numeric.Half   ( Half(..)   , isZero   , fromHalf@@ -58,12 +58,16 @@ foreign import ccall unsafe "hs_halfToFloat" fromHalf :: Half -> Float -- {-# RULES "fromHalf" realToFrac = fromHalf #-} -newtype {-# CTYPE "unsigned short" #-} Half = Half { getHalf :: CUShort } deriving (Typeable)+newtype+#if __GLASGOW_HASKELL__ >= 706+  {-# CTYPE "unsigned short" #-}+#endif+  Half = Half { getHalf :: CUShort } deriving (Typeable)  instance Storable Half where   sizeOf = sizeOf . getHalf   alignment = alignment . getHalf-  peek = peek . castPtr+  peek p = peek (castPtr p) >>= return . Half   poke p = poke (castPtr p) . getHalf  instance Show Half where@@ -168,7 +172,7 @@ pattern HALF_EPSILON = Half 0x1400  -- 0.00097656  -- | Number of base 10 digits that can be represented without change-pattern HALF_DIG = 2 +pattern HALF_DIG = 2  -- Minimum positive integer such that 10 raised to that power is a normalized half pattern HALF_MIN_10_EXP = -4