{-# LINE 1 "FreeType/Support/Module/Internal.hsc" #-}
{-# LANGUAGE ForeignFunctionInterface #-}
module FreeType.Support.Module.Internal
(
ft_Add_Module'
, ft_Get_Module'
, ft_Remove_Module'
, ft_Property_Set'
, ft_Property_Get'
, ft_New_Library'
, ft_Done_Library'
, ft_Reference_Library'
, ft_Get_Renderer'
, ft_Set_Renderer'
, ft_Set_Debug_Hook'
) where
import FreeType.Core.Base.Types
import FreeType.Core.Types.Types
import FreeType.Support.Module.Types
import FreeType.Support.System.Types
import Data.Int
import Foreign.Ptr
foreign import ccall "FT_Add_Module"
ft_Add_Module'
:: FT_Library
-> Ptr FT_Module_Class
-> IO FT_Error
foreign import ccall "FT_Get_Module"
ft_Get_Module'
:: FT_Library
-> Ptr Int8
{-# LINE 52 "FreeType/Support/Module/Internal.hsc" #-}
-> IO FT_Module
foreign import ccall "FT_Remove_Module"
ft_Remove_Module'
:: FT_Library
-> FT_Module
-> IO FT_Error
foreign import ccall "FT_Property_Set"
ft_Property_Set'
:: FT_Library
-> Ptr FT_String
-> Ptr FT_String
-> Ptr ()
-> IO FT_Error
foreign import ccall "FT_Property_Get"
ft_Property_Get'
:: FT_Library
-> Ptr FT_String
-> Ptr FT_String
-> Ptr ()
-> IO FT_Error
foreign import ccall "FT_New_Library"
ft_New_Library'
:: FT_Memory
-> Ptr FT_Library
-> IO FT_Error
foreign import ccall "FT_Done_Library"
ft_Done_Library'
:: FT_Library
-> IO FT_Error
foreign import ccall "FT_Reference_Library"
ft_Reference_Library'
:: FT_Library
-> IO FT_Error
foreign import ccall "FT_Get_Renderer"
ft_Get_Renderer'
:: FT_Library
-> FT_Glyph_Format
-> IO FT_Renderer
foreign import ccall "FT_Set_Renderer"
ft_Set_Renderer'
:: FT_Library
-> FT_Renderer
-> FT_UInt
-> Ptr FT_Parameter
-> IO FT_Error
foreign import ccall "FT_Set_Debug_Hook"
ft_Set_Debug_Hook'
:: FT_Library
-> FT_UInt
-> FunPtr FT_DebugHook_Func
-> IO ()