-- Produced by boxnd-gen; edit the generator, not this file.

module Box3D.Compound
  ( create
  , destroy
  )

  where

import Foreign
import Box3D.Tags (CompoundData, CompoundDef)

foreign import ccall unsafe "b3CreateCompound"
  c_b3CreateCompound :: Ptr CompoundDef -> IO (Ptr CompoundData)

foreign import ccall unsafe "b3DestroyCompound"
  c_b3DestroyCompound :: Ptr CompoundData -> IO ()

{- | Create a compound shape. All input data in the definition is cloned into the resulting compound.

Binds @b3CreateCompound@.
-}
create
  :: Ptr CompoundDef
  -> IO (Ptr CompoundData)
create :: Ptr CompoundDef -> IO (Ptr CompoundData)
create Ptr CompoundDef
a0 =
  Ptr CompoundDef -> IO (Ptr CompoundData)
c_b3CreateCompound Ptr CompoundDef
a0

{- | Destroy a compound shape.

Binds @b3DestroyCompound@.
-}
destroy
  :: Ptr CompoundData
  -> IO ()
destroy :: Ptr CompoundData -> IO ()
destroy Ptr CompoundData
a0 =
  Ptr CompoundData -> IO ()
c_b3DestroyCompound Ptr CompoundData
a0