~alcinnz/fontconfig-pure

ref: c75f865cd15de2443e55ca2189add717c01d4cef fontconfig-pure/Graphics/Text/Font/Choose/Init.hs -rw-r--r-- 756 bytes
c75f865c — Adrian Cochrane Correct FcType (and in turn FcValue) decoding. 2 years ago
                                                                                
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
module Graphics.Text.Font.Choose.Init (Config, initLoadConfig, initLoadConfigAndFonts,
    init, fini, reinit, bringUptoDate, version) where

import Prelude hiding (init)

import Graphics.Text.Font.Choose.Config

initLoadConfig = fcInitLoadConfig >>= ptr2config
foreign import ccall "FcInitLoadConfig" fcInitLoadConfig :: IO Config_
initLoadConfigAndFonts = fcInitLoadConfigAndFonts >>= ptr2config
foreign import ccall "FcInitLoadConfigAndFonts" fcInitLoadConfigAndFonts :: IO Config_

foreign import ccall "FcInit" init :: IO Bool
foreign import ccall "FcFini" fini :: IO ()
foreign import ccall "FcInitReinitialize" reinit :: IO Bool
foreign import ccall "FcInitBringUptoDate" bringUptoDate :: IO Bool

foreign import ccall "FcGetVersion" version :: Int