    -- GENERATED by C->Haskell Compiler, version 0.28.6 Switcheroo, 25 November 2017 (Haskell)
    -- Edit the ORIGNAL .chs file instead!

    {-# LINE 1 "src/Codec/Compression/BZip/Common.chs" #-}
    module Codec.Compression.BZip.Common ( bzStreamInit ) where
    import qualified Foreign.C.Types as C2HSImp
    import qualified Foreign.Ptr as C2HSImp
    import qualified Foreign.Storable as C2HSImp

    import Codec.Compression.BZip.Foreign.Common (BzStream)
    import Control.Applicative
    import Foreign.Ptr (nullFunPtr, nullPtr, Ptr)
    import Foreign.Marshal (mallocBytes)

    bzStreamInit :: IO (Ptr BzStream)
    bzStreamInit = do
        p <- mallocBytes 80
    {-# LINE 12 "src/Codec/Compression/BZip/Common.chs" #-}

        (\ptr val -> do {C2HSImp.pokeByteOff ptr 56 (val :: (C2HSImp.FunPtr ((C2HSImp.Ptr ()) -> (C2HSImp.CInt -> (C2HSImp.CInt -> (IO (C2HSImp.Ptr ())))))))}) p nullFunPtr
        (\ptr val -> do {C2HSImp.pokeByteOff ptr 64 (val :: (C2HSImp.FunPtr ((C2HSImp.Ptr ()) -> ((C2HSImp.Ptr ()) -> (IO ())))))}) p nullFunPtr
        (\ptr val -> do {C2HSImp.pokeByteOff ptr 72 (val :: (C2HSImp.Ptr ()))}) p nullPtr
        pure p