module HGamer3D.Bindings.Bullet.ClassHG3DBulletMotionStateHandler where
import Foreign
import Foreign.Ptr
import Foreign.C
import HGamer3D.Data.HG3DClass
import HGamer3D.Data.Vector
import HGamer3D.Data.Colour
import HGamer3D.Data.Angle
import HGamer3D.Bindings.Bullet.Utils
import HGamer3D.Bindings.Bullet.ClassPtr
import HGamer3D.Bindings.Bullet.StructHG3DClass
import HGamer3D.Bindings.Bullet.StructVec3
import HGamer3D.Bindings.Bullet.StructQuaternion
createDefaultMotionState :: Vec3 -> Quaternion -> IO (HG3DClass)
createDefaultMotionState a1 a2 =
withVec3 a1 $ \a1' ->
withQuaternion a2 $ \a2' ->
alloca $ \a3' ->
createDefaultMotionState'_ a1' a2' a3' >>= \res ->
peek a3'>>= \a3'' ->
return (a3'')
getPosition :: HG3DClass -> IO (Vec3)
getPosition a1 =
withHG3DClass a1 $ \a1' ->
alloca $ \a2' ->
getPosition'_ a1' a2' >>= \res ->
peekVec3 a2'>>= \a2'' ->
return (a2'')
setPosition :: HG3DClass -> Vec3 -> IO ()
setPosition a1 a2 =
withHG3DClass a1 $ \a1' ->
withVec3 a2 $ \a2' ->
setPosition'_ a1' a2' >>= \res ->
return ()
getQuaternion :: HG3DClass -> IO (Quaternion)
getQuaternion a1 =
withHG3DClass a1 $ \a1' ->
alloca $ \a2' ->
getQuaternion'_ a1' a2' >>= \res ->
peekQuaternion a2'>>= \a2'' ->
return (a2'')
setQuaternion :: HG3DClass -> Quaternion -> IO ()
setQuaternion a1 a2 =
withHG3DClass a1 $ \a1' ->
withQuaternion a2 $ \a2' ->
setQuaternion'_ a1' a2' >>= \res ->
return ()
foreign import ccall safe "HGamer3D\\Bindings\\Bullet\\ClassHG3DBulletMotionStateHandler.chs.h bt_hg3dblmsh_createDefaultMotionState"
createDefaultMotionState'_ :: ((Vec3Ptr) -> ((QuaternionPtr) -> ((HG3DClassPtr) -> (IO ()))))
foreign import ccall safe "HGamer3D\\Bindings\\Bullet\\ClassHG3DBulletMotionStateHandler.chs.h bt_hg3dblmsh_getPosition"
getPosition'_ :: ((HG3DClassPtr) -> ((Vec3Ptr) -> (IO ())))
foreign import ccall safe "HGamer3D\\Bindings\\Bullet\\ClassHG3DBulletMotionStateHandler.chs.h bt_hg3dblmsh_setPosition"
setPosition'_ :: ((HG3DClassPtr) -> ((Vec3Ptr) -> (IO ())))
foreign import ccall safe "HGamer3D\\Bindings\\Bullet\\ClassHG3DBulletMotionStateHandler.chs.h bt_hg3dblmsh_getQuaternion"
getQuaternion'_ :: ((HG3DClassPtr) -> ((QuaternionPtr) -> (IO ())))
foreign import ccall safe "HGamer3D\\Bindings\\Bullet\\ClassHG3DBulletMotionStateHandler.chs.h bt_hg3dblmsh_setQuaternion"
setQuaternion'_ :: ((HG3DClassPtr) -> ((QuaternionPtr) -> (IO ())))