{-# LANGUAGE FlexibleContexts, FlexibleInstances, ForeignFunctionInterface, GeneralizedNewtypeDeriving, MonoLocalBinds, MultiParamTypeClasses, ScopedTypeVariables, TypeSynonymInstances, UndecidableInstances #-}
{-# LANGUAGE NoMonomorphismRestriction #-}
module Graphics.UI.Qtah.Gui.QFont (
QFontValue (..),
QFontConstPtr (..),
QFontPtr (..),
QFontConst,
QFont,
castConst,
cast,
downCastConst,
downCast,
decode,
new,
newCopy,
aSSIGN,
bold,
eQ,
nE,
setBold,
setPixelSize,
setPointSize,
setWeight,
weight,
) where
import qualified Foreign.Hoppy.Runtime as QtahFHR
import Graphics.UI.Qtah.Generated.Gui.QFont
import qualified Graphics.UI.Qtah.Generated.Gui.QFont as M118
import Prelude ()
import qualified Prelude as QtahP
castConst = toQFontConst
cast = toQFont
downCastConst = downToQFontConst
downCast = downToQFont
decode :: (QFontConstPtr this) => this -> QtahP.IO M118.QFont
decode = QtahFHR.decode QtahP.. toQFontConst