{-# LINE 1 "FreeType/Format/CID/Internal.hsc" #-}
{-# LANGUAGE ForeignFunctionInterface #-}
module FreeType.Format.CID.Internal
(
ft_Get_CID_Registry_Ordering_Supplement'
, ft_Get_CID_Is_Internally_CID_Keyed'
, ft_Get_CID_From_Glyph_Index'
) where
import FreeType.Core.Base
import FreeType.Core.Types.Types
import Data.Int
import Foreign.Ptr
foreign import ccall "FT_Get_CID_Registry_Ordering_Supplement"
ft_Get_CID_Registry_Ordering_Supplement'
:: FT_Face
-> Ptr (Ptr Int8)
{-# LINE 25 "FreeType/Format/CID/Internal.hsc" #-}
-> Ptr (Ptr Int8)
{-# LINE 26 "FreeType/Format/CID/Internal.hsc" #-}
-> Ptr FT_Int
-> IO FT_Error
foreign import ccall "FT_Get_CID_Is_Internally_CID_Keyed"
ft_Get_CID_Is_Internally_CID_Keyed'
:: FT_Face
-> Ptr FT_Bool
-> IO FT_Error
foreign import ccall "FT_Get_CID_From_Glyph_Index"
ft_Get_CID_From_Glyph_Index'
:: FT_Face
-> FT_UInt
-> Ptr FT_UInt
-> IO FT_Error