@@ 6,7 6,7 @@ import Data.Text.Short
data Face = Face -- TODO Define
-- countFace :: ByteString -> Int
--- createFace :: ByteString -> Int -> Face
+-- createFace :: ByteString -> Int -> IO Face
-- ftCreateFace :: FT_Face -> Face
-- emptyFace :: Face
-- faceGlyphCount :: Face -> Int
@@ 24,7 24,7 @@ data FontOptions = FontOptions {
}
-- createFont :: Face -> FontOptions -> Font
--- ftCreateFont ::FT_Face -> FontOptions -> Font
+-- ftCreateFont ::FT_Face -> FontOptions -> IO Font
-- emptyFont :: Font
-- fontFace :: Font -> Face
-- fontGlyph :: Font -> Char -> Maybe Char -> Maybe Int