-- GENERATED by C->Haskell Compiler, version 0.16.3 Crystal Seed, 24 Jan 2009 (Haskell) -- Edit the ORIGNAL .chs file instead! {-# LINE 1 ".\\HGamer3D\\Bindings\\Ogre\\ClassSceneManagerFactory.chs" #-}{-# LANGUAGE ForeignFunctionInterface #-} {-# LANGUAGE TypeSynonymInstances #-} -- This source file is part of HGamer3D -- (A project to enable 3D game development in Haskell) -- For the latest info, see http://www.althainz.de/HGamer3D.html -- -- (c) 2011, 2012 Peter Althainz -- -- Licensed under the Apache License, Version 2.0 (the "License"); -- you may not use this file except in compliance with the License. -- You may obtain a copy of the License at -- -- http://www.apache.org/licenses/LICENSE-2.0 -- -- Unless required by applicable law or agreed to in writing, software -- distributed under the License is distributed on an "AS IS" BASIS, -- WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. -- See the License for the specific language governing permissions and -- limitations under the License. -- -- ClassSceneManagerFactory.chs -- module HGamer3D.Bindings.Ogre.ClassSceneManagerFactory 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 {-# LINE 40 ".\\HGamer3D\\Bindings\\Ogre\\ClassSceneManagerFactory.chs" #-} import HGamer3D.Bindings.Ogre.ClassPtr {-# LINE 41 ".\\HGamer3D\\Bindings\\Ogre\\ClassSceneManagerFactory.chs" #-} import HGamer3D.Bindings.Ogre.StructHG3DClass {-# LINE 42 ".\\HGamer3D\\Bindings\\Ogre\\ClassSceneManagerFactory.chs" #-} -- | delete :: HG3DClass -- ^ classpointer - pointer of Class instance which is going to be deleted. -> IO () -- ^ delete a1 = withHG3DClass a1 $ \a1' -> delete'_ a1' >>= \res -> return () {-# LINE 47 ".\\HGamer3D\\Bindings\\Ogre\\ClassSceneManagerFactory.chs" #-} -- | Create a new instance of a SceneManagerDon't call directly, use SceneManagerEnumerator::createSceneManager. createInstance :: HG3DClass -- ^ classpointer - pointer of Class instance from which this methods is called. -> String -- ^ instanceName -> IO (HG3DClass) -- ^ createInstance a1 a2 = withHG3DClass a1 $ \a1' -> withCString a2 $ \a2' -> alloca $ \a3' -> createInstance'_ a1' a2' a3' >>= \res -> peek a3'>>= \a3'' -> return (a3'') {-# LINE 53 ".\\HGamer3D\\Bindings\\Ogre\\ClassSceneManagerFactory.chs" #-} -- | Destroy an instance of a SceneManager destroyInstance :: HG3DClass -- ^ classpointer - pointer of Class instance from which this methods is called. -> HG3DClass -- ^ instance -> IO () -- ^ destroyInstance a1 a2 = withHG3DClass a1 $ \a1' -> withHG3DClass a2 $ \a2' -> destroyInstance'_ a1' a2' >>= \res -> return () {-# LINE 58 ".\\HGamer3D\\Bindings\\Ogre\\ClassSceneManagerFactory.chs" #-} foreign import ccall safe "HGamer3D\\Bindings\\Ogre\\ClassSceneManagerFactory.chs.h ogre_smf_destruct" delete'_ :: ((HG3DClassPtr) -> (IO ())) foreign import ccall safe "HGamer3D\\Bindings\\Ogre\\ClassSceneManagerFactory.chs.h ogre_smf_createInstance" createInstance'_ :: ((HG3DClassPtr) -> ((Ptr CChar) -> ((HG3DClassPtr) -> (IO ())))) foreign import ccall safe "HGamer3D\\Bindings\\Ogre\\ClassSceneManagerFactory.chs.h ogre_smf_destroyInstance" destroyInstance'_ :: ((HG3DClassPtr) -> ((HG3DClassPtr) -> (IO ())))