module HGamer3D.Bindings.Ogre.ClassConfigFile 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.Ogre.Utils
import HGamer3D.Bindings.Ogre.ClassPtr
import HGamer3D.Bindings.Ogre.StructHG3DClass
new :: IO (HG3DClass)
new =
alloca $ \a1' ->
new'_ a1' >>= \res ->
peek a1'>>= \a1'' ->
return (a1'')
delete :: HG3DClass -> IO ()
delete a1 =
withHG3DClass a1 $ \a1' ->
delete'_ a1' >>= \res ->
return ()
load :: HG3DClass -> String -> String -> Bool -> IO ()
load a1 a2 a3 a4 =
withHG3DClass a1 $ \a1' ->
withCString a2 $ \a2' ->
withCString a3 $ \a3' ->
let {a4' = fromBool a4} in
load'_ a1' a2' a3' a4' >>= \res ->
return ()
load2 :: HG3DClass -> String -> String -> String -> Bool -> IO ()
load2 a1 a2 a3 a4 a5 =
withHG3DClass a1 $ \a1' ->
withCString a2 $ \a2' ->
withCString a3 $ \a3' ->
withCString a4 $ \a4' ->
let {a5' = fromBool a5} in
load2'_ a1' a2' a3' a4' a5' >>= \res ->
return ()
loadDirect :: HG3DClass -> String -> String -> Bool -> IO ()
loadDirect a1 a2 a3 a4 =
withHG3DClass a1 $ \a1' ->
withCString a2 $ \a2' ->
withCString a3 $ \a3' ->
let {a4' = fromBool a4} in
loadDirect'_ a1' a2' a3' a4' >>= \res ->
return ()
loadFromResourceSystem :: HG3DClass -> String -> String -> String -> Bool -> IO ()
loadFromResourceSystem a1 a2 a3 a4 a5 =
withHG3DClass a1 $ \a1' ->
withCString a2 $ \a2' ->
withCString a3 $ \a3' ->
withCString a4 $ \a4' ->
let {a5' = fromBool a5} in
loadFromResourceSystem'_ a1' a2' a3' a4' a5' >>= \res ->
return ()
getSetting :: HG3DClass -> String -> String -> String -> IO (String)
getSetting a1 a2 a3 a4 =
withHG3DClass a1 $ \a1' ->
withCString a2 $ \a2' ->
withCString a3 $ \a3' ->
withCString a4 $ \a4' ->
alloc64k $ \a5' ->
getSetting'_ a1' a2' a3' a4' a5' >>= \res ->
peekCString a5'>>= \a5'' ->
return (a5'')
clear :: HG3DClass -> IO ()
clear a1 =
withHG3DClass a1 $ \a1' ->
clear'_ a1' >>= \res ->
return ()
foreign import ccall safe "HGamer3D\\Bindings\\Ogre\\ClassConfigFile.chs.h ogre_cf_construct"
new'_ :: ((HG3DClassPtr) -> (IO ()))
foreign import ccall safe "HGamer3D\\Bindings\\Ogre\\ClassConfigFile.chs.h ogre_cf_destruct"
delete'_ :: ((HG3DClassPtr) -> (IO ()))
foreign import ccall safe "HGamer3D\\Bindings\\Ogre\\ClassConfigFile.chs.h ogre_cf_load"
load'_ :: ((HG3DClassPtr) -> ((Ptr CChar) -> ((Ptr CChar) -> (CInt -> (IO ())))))
foreign import ccall safe "HGamer3D\\Bindings\\Ogre\\ClassConfigFile.chs.h ogre_cf_load2"
load2'_ :: ((HG3DClassPtr) -> ((Ptr CChar) -> ((Ptr CChar) -> ((Ptr CChar) -> (CInt -> (IO ()))))))
foreign import ccall safe "HGamer3D\\Bindings\\Ogre\\ClassConfigFile.chs.h ogre_cf_loadDirect"
loadDirect'_ :: ((HG3DClassPtr) -> ((Ptr CChar) -> ((Ptr CChar) -> (CInt -> (IO ())))))
foreign import ccall safe "HGamer3D\\Bindings\\Ogre\\ClassConfigFile.chs.h ogre_cf_loadFromResourceSystem"
loadFromResourceSystem'_ :: ((HG3DClassPtr) -> ((Ptr CChar) -> ((Ptr CChar) -> ((Ptr CChar) -> (CInt -> (IO ()))))))
foreign import ccall safe "HGamer3D\\Bindings\\Ogre\\ClassConfigFile.chs.h ogre_cf_getSetting"
getSetting'_ :: ((HG3DClassPtr) -> ((Ptr CChar) -> ((Ptr CChar) -> ((Ptr CChar) -> ((Ptr CChar) -> (IO ()))))))
foreign import ccall safe "HGamer3D\\Bindings\\Ogre\\ClassConfigFile.chs.h ogre_cf_clear"
clear'_ :: ((HG3DClassPtr) -> (IO ()))