-- 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\\ClassHardwareBufferManagerBase.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 -- -- Copyright 2011 Dr. 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. -- -- ClassHardwareBufferManagerBase.chs -- -- -- -- -- File for type, method, enum or function stubs -- in: "..\OgreSDK_vc10_v1-7-4\include\OGRE\OgreHardwareBufferManager.h" -- -- each stub combines the following files: -- a C++ implementation file, transforming cpp calls into C-functions -- a C-header file, making this C-functions available for the C2HS parser -- a chs file, give instructions to the C2HS parser. -- -- module HGamer3D.Bindings.Ogre.ClassHardwareBufferManagerBase where import C2HS import Foreign import Foreign.Ptr import Foreign.C import Monad (liftM, liftM2) import HGamer3D.Data.HG3DClass import HGamer3D.Data.Vector2 import HGamer3D.Data.Vector3 import HGamer3D.Data.Vector4 import HGamer3D.Data.Quaternion import HGamer3D.Data.Colour import HGamer3D.Data.Angle import HGamer3D.Bindings.Ogre.TypeHG3DClass {-# LINE 52 "HGamer3D\\Bindings\\Ogre\\ClassHardwareBufferManagerBase.chs" #-} import HGamer3D.Bindings.Ogre.ClassPtr {-# LINE 53 "HGamer3D\\Bindings\\Ogre\\ClassHardwareBufferManagerBase.chs" #-} import HGamer3D.Bindings.Ogre.Utils {-# LINE 54 "HGamer3D\\Bindings\\Ogre\\ClassHardwareBufferManagerBase.chs" #-} cHbmbFreeUnusedBufferCopies :: HG3DClass -> IO () cHbmbFreeUnusedBufferCopies a1 = withHG3DClass a1 $ \a1' -> cHbmbFreeUnusedBufferCopies'_ a1' >>= \res -> return () {-# LINE 59 "HGamer3D\\Bindings\\Ogre\\ClassHardwareBufferManagerBase.chs" #-} ; cHbmbReleaseBufferCopies :: HG3DClass -> Bool -> IO () cHbmbReleaseBufferCopies a1 a2 = withHG3DClass a1 $ \a1' -> let {a2' = fromBool a2} in cHbmbReleaseBufferCopies'_ a1' a2' >>= \res -> return () {-# LINE 63 "HGamer3D\\Bindings\\Ogre\\ClassHardwareBufferManagerBase.chs" #-} ; cHbmbNotifyIndexBufferDestroyed :: HG3DClass -> HG3DClass -> IO () cHbmbNotifyIndexBufferDestroyed a1 a2 = withHG3DClass a1 $ \a1' -> withHG3DClass a2 $ \a2' -> cHbmbNotifyIndexBufferDestroyed'_ a1' a2' >>= \res -> return () {-# LINE 67 "HGamer3D\\Bindings\\Ogre\\ClassHardwareBufferManagerBase.chs" #-} ; foreign import ccall safe "HGamer3D\\Bindings\\Ogre\\ClassHardwareBufferManagerBase.chs.h cHbmb__freeUnusedBufferCopies_c" cHbmbFreeUnusedBufferCopies'_ :: ((HG3DClassPtr) -> (IO ())) foreign import ccall safe "HGamer3D\\Bindings\\Ogre\\ClassHardwareBufferManagerBase.chs.h cHbmb__releaseBufferCopies_c" cHbmbReleaseBufferCopies'_ :: ((HG3DClassPtr) -> (CInt -> (IO ()))) foreign import ccall safe "HGamer3D\\Bindings\\Ogre\\ClassHardwareBufferManagerBase.chs.h cHbmb__notifyIndexBufferDestroyed_c" cHbmbNotifyIndexBufferDestroyed'_ :: ((HG3DClassPtr) -> ((HG3DClassPtr) -> (IO ())))