{-# LINE 1 "Graphics/ImageMagick/MagickCore/Types/FFI/Types.hsc" #-} {-# LANGUAGE CPP #-} {-# LINE 2 "Graphics/ImageMagick/MagickCore/Types/FFI/Types.hsc" #-} {-# LANGUAGE ForeignFunctionInterface #-} {-# LANGUAGE RankNTypes #-} module Graphics.ImageMagick.MagickCore.Types.FFI.Types where import Data.Int import Data.Word import Foreign.C.String import Foreign.C.Types {-# LINE 12 "Graphics/ImageMagick/MagickCore/Types/FFI/Types.hsc" #-} type MagickRealType = Double {-# LINE 14 "Graphics/ImageMagick/MagickCore/Types/FFI/Types.hsc" #-} type MagickStatusType = Word32 {-# LINE 15 "Graphics/ImageMagick/MagickCore/Types/FFI/Types.hsc" #-} type MagickOffsetType = Int64 {-# LINE 16 "Graphics/ImageMagick/MagickCore/Types/FFI/Types.hsc" #-} type MagickSizeType = Word64 {-# LINE 17 "Graphics/ImageMagick/MagickCore/Types/FFI/Types.hsc" #-} type SignedQuantum = Int32 {-# LINE 18 "Graphics/ImageMagick/MagickCore/Types/FFI/Types.hsc" #-} type QuantumAny = Word64 {-# LINE 19 "Graphics/ImageMagick/MagickCore/Types/FFI/Types.hsc" #-} type Quantum = Word16 {-# LINE 20 "Graphics/ImageMagick/MagickCore/Types/FFI/Types.hsc" #-} type IndexPacket = Word16 {-# LINE 21 "Graphics/ImageMagick/MagickCore/Types/FFI/Types.hsc" #-} magickEpsilon :: forall a. Fractional a => a magickEpsilon = 1e-10 -- #const MagickEpsilon magickHuge :: forall a. Num a => a magickHuge = 4503599727262001 {-# LINE 26 "Graphics/ImageMagick/MagickCore/Types/FFI/Types.hsc" #-} maxColormapSize :: forall a. Num a => a maxColormapSize = 65536 {-# LINE 28 "Graphics/ImageMagick/MagickCore/Types/FFI/Types.hsc" #-} maxMap :: forall a. Num a => a maxMap = 65535 {-# LINE 30 "Graphics/ImageMagick/MagickCore/Types/FFI/Types.hsc" #-} quantumFormat :: forall a. Num a => a quantumFormat = 134518005 {-# LINE 32 "Graphics/ImageMagick/MagickCore/Types/FFI/Types.hsc" #-} quantumRange :: forall a. Num a => a quantumRange = 65535 {-# LINE 34 "Graphics/ImageMagick/MagickCore/Types/FFI/Types.hsc" #-}