{-# LINE 1 "FreeType/Format/Font/Internal.hsc" #-} {-# LANGUAGE ForeignFunctionInterface #-} module FreeType.Format.Font.Internal ( -- ** FT_Get_Font_Format ft_Get_Font_Format' ) where import FreeType.Core.Base.Types import Data.Int import Foreign.Ptr foreign import ccall "FT_Get_Font_Format" ft_Get_Font_Format' :: FT_Face -- ^ face -> IO (Ptr Int8) {-# LINE 20 "FreeType/Format/Font/Internal.hsc" #-}