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

module Box2D.FilterJoint
  ( create
  )

  where

import Foreign
import Box2D.Id (JointId(..), WorldId(..))
import Box2D.Types (FilterJointDef)

foreign import ccall unsafe "b2CreateFilterJoint"
  c_b2CreateFilterJoint :: WorldId -> Ptr FilterJointDef -> IO JointId

{- | Create a filter joint.
See also b2FilterJointDef for details.

Binds @b2CreateFilterJoint@.
-}
create
  :: WorldId
  -> FilterJointDef
  -> IO JointId
create :: WorldId -> FilterJointDef -> IO JointId
create WorldId
a0 FilterJointDef
a1 =
  FilterJointDef -> (Ptr FilterJointDef -> IO JointId) -> IO JointId
forall a b. Storable a => a -> (Ptr a -> IO b) -> IO b
with FilterJointDef
a1 ((Ptr FilterJointDef -> IO JointId) -> IO JointId)
-> (Ptr FilterJointDef -> IO JointId) -> IO JointId
forall a b. (a -> b) -> a -> b
$ \Ptr FilterJointDef
p1 ->
  WorldId -> Ptr FilterJointDef -> IO JointId
c_b2CreateFilterJoint WorldId
a0 Ptr FilterJointDef
p1