~alcinnz/fontconfig-pure

ref: 614373ce2efd58cb374a592f258923de016754ef fontconfig-pure/Graphics/Text/Font/Choose/Init.hs -rw-r--r-- 761 bytes
614373ce — Adrian Cochrane Compile and test Init routines. 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