summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
e0dc0bc)
Fix compilation with GHC 6.2.x, hopefully
go str 0
#if __GLASGOW_HASKELL__ < 600
go str 0
#if __GLASGOW_HASKELL__ < 600
mallocForeignPtrBytes :: Int -> IO (ForeignPtr a)
mallocForeignPtrBytes n = do
r <- mallocBytes n
mallocForeignPtrBytes :: Int -> IO (ForeignPtr a)
mallocForeignPtrBytes n = do
r <- mallocBytes n
finalizerFree :: Ptr a -> IO ()
peekCAStringLen = peekCStringLen
finalizerFree :: Ptr a -> IO ()
peekCAStringLen = peekCStringLen
+
+#elif __GLASGOW_HASKELL__ <= 602
+
+peekCAStringLen = peekCStringLen
+