diff options
Diffstat (limited to 'lib/Data/Packed/Internal/Common.hs')
| -rw-r--r-- | lib/Data/Packed/Internal/Common.hs | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/lib/Data/Packed/Internal/Common.hs b/lib/Data/Packed/Internal/Common.hs index bce9922..1b63dd8 100644 --- a/lib/Data/Packed/Internal/Common.hs +++ b/lib/Data/Packed/Internal/Common.hs | |||
| @@ -101,9 +101,6 @@ check msg f = do | |||
| 101 | foreign import ccall "auxi.h gsl_strerror" gsl_strerror :: CInt -> IO (Ptr CChar) | 101 | foreign import ccall "auxi.h gsl_strerror" gsl_strerror :: CInt -> IO (Ptr CChar) |
| 102 | 102 | ||
| 103 | --------------------------------------------------- | 103 | --------------------------------------------------- |
| 104 | -- ugly, but my haddock version doesn't understand | ||
| 105 | -- yet infix type constructors | ||
| 106 | --------------------------------------------------- | ||
| 107 | ---------- signatures of the C functions --------- | 104 | ---------- signatures of the C functions --------- |
| 108 | -------------------------------------------------- | 105 | -------------------------------------------------- |
| 109 | type PD = Ptr Double -- | 106 | type PD = Ptr Double -- |
| @@ -141,8 +138,3 @@ type TCVM = CInt -> PC -> TM -- | |||
| 141 | type TMCVM = CInt -> CInt -> PD -> TCVM -- | 138 | type TMCVM = CInt -> CInt -> PD -> TCVM -- |
| 142 | type TMMCVM = CInt -> CInt -> PD -> TMCVM -- | 139 | type TMMCVM = CInt -> CInt -> PD -> TMCVM -- |
| 143 | -------------------------------------------------- | 140 | -------------------------------------------------- |
| 144 | |||
| 145 | type TauxMul a = CInt -> CInt -> CInt -> Ptr a | ||
| 146 | -> CInt -> CInt -> CInt -> Ptr a | ||
| 147 | -> CInt -> CInt -> Ptr a | ||
| 148 | -> IO CInt | ||