{-# OPTIONS_GHC -fglasgow-exts #-}
data ForeignPtr a = ForeignPtr

mallocForeignPtr :: IO (ForeignPtr a) = undefined

mallocForeignPtrBytes :: IO (ForeignPtr a)
mallocForeignPtrBytes = undefined