module Graphics.UI.FLTK.LowLevel.TreePrefs
(
treePrefsNew
)
where
import C2HS hiding (cFromEnum, cFromBool, cToBool,cToEnum)
import Foreign.C.Types
import Graphics.UI.FLTK.LowLevel.Fl_Enumerations
import Graphics.UI.FLTK.LowLevel.Fl_Types
import Graphics.UI.FLTK.LowLevel.Utils
import Graphics.UI.FLTK.LowLevel.Dispatch
import Graphics.UI.FLTK.LowLevel.Hierarchy
treePrefsNew' :: IO ((Ptr ()))
treePrefsNew' =
treePrefsNew''_ >>= \res ->
let {res' = id res} in
return (res')
treePrefsNew :: IO (Ref TreePrefs)
treePrefsNew = treePrefsNew' >>= toRef
itemLabelfont' :: (Ptr ()) -> IO ((Font))
itemLabelfont' a1 =
let {a1' = id a1} in
itemLabelfont''_ a1' >>= \res ->
let {res' = cToFont res} in
return (res')
instance (impl ~ (IO (Font))) => Op (GetItemLabelfont ()) TreePrefs orig impl where
runOp _ _ tree_prefs = withRef tree_prefs $ \tree_prefsPtr -> itemLabelfont' tree_prefsPtr
itemLabelsize' :: (Ptr ()) -> IO ((CInt))
itemLabelsize' a1 =
let {a1' = id a1} in
itemLabelsize''_ a1' >>= \res ->
let {res' = id res} in
return (res')
instance (impl ~ (IO (FontSize))) => Op (GetItemLabelsize ()) TreePrefs orig impl where
runOp _ _ tree_prefs = withRef tree_prefs $ \tree_prefsPtr -> itemLabelsize' tree_prefsPtr >>= return . FontSize
setItemLabelsize' :: (Ptr ()) -> (CInt) -> IO ()
setItemLabelsize' a1 a2 =
let {a1' = id a1} in
let {a2' = id a2} in
setItemLabelsize''_ a1' a2' >>
return ()
instance (impl ~ (FontSize -> IO ())) => Op (SetItemLabelsize ()) TreePrefs orig impl where
runOp _ _ tree_prefs (FontSize val) = withRef tree_prefs $ \tree_prefsPtr -> setItemLabelsize' tree_prefsPtr val
setItemLabelfgcolor' :: (Ptr ()) -> (Color) -> IO ()
setItemLabelfgcolor' a1 a2 =
let {a1' = id a1} in
let {a2' = cFromColor a2} in
setItemLabelfgcolor''_ a1' a2' >>
return ()
instance (impl ~ (Color -> IO ())) => Op (SetItemLabelfgcolor ()) TreePrefs orig impl where
runOp _ _ tree_prefs val = withRef tree_prefs $ \tree_prefsPtr -> setItemLabelfgcolor' tree_prefsPtr val
itemLabelbgcolor' :: (Ptr ()) -> IO ((Color))
itemLabelbgcolor' a1 =
let {a1' = id a1} in
itemLabelbgcolor''_ a1' >>= \res ->
let {res' = cToColor res} in
return (res')
instance (impl ~ (IO (Color))) => Op (GetItemLabelbgcolor ()) TreePrefs orig impl where
runOp _ _ tree_prefs = withRef tree_prefs $ \tree_prefsPtr -> itemLabelbgcolor' tree_prefsPtr
setItemLabelbgcolor' :: (Ptr ()) -> (Color) -> IO ()
setItemLabelbgcolor' a1 a2 =
let {a1' = id a1} in
let {a2' = cFromColor a2} in
setItemLabelbgcolor''_ a1' a2' >>
return ()
instance (impl ~ (Color -> IO ())) => Op (SetItemLabelbgcolor ()) TreePrefs orig impl where
runOp _ _ tree_prefs val = withRef tree_prefs $ \tree_prefsPtr -> setItemLabelbgcolor' tree_prefsPtr val
labelfont' :: (Ptr ()) -> IO ((Font))
labelfont' a1 =
let {a1' = id a1} in
labelfont''_ a1' >>= \res ->
let {res' = cToFont res} in
return (res')
instance (impl ~ (IO (Font))) => Op (GetLabelfont ()) TreePrefs orig impl where
runOp _ _ tree_prefs = withRef tree_prefs $ \tree_prefsPtr -> labelfont' tree_prefsPtr
setLabelfont' :: (Ptr ()) -> (Font) -> IO ()
setLabelfont' a1 a2 =
let {a1' = id a1} in
let {a2' = cFromFont a2} in
setLabelfont''_ a1' a2' >>
return ()
instance (impl ~ (Font -> IO ())) => Op (SetLabelfont ()) TreePrefs orig impl where
runOp _ _ tree_prefs val = withRef tree_prefs $ \tree_prefsPtr -> setLabelfont' tree_prefsPtr val
labelsize' :: (Ptr ()) -> IO ((CInt))
labelsize' a1 =
let {a1' = id a1} in
labelsize''_ a1' >>= \res ->
let {res' = id res} in
return (res')
instance (impl ~ (IO (FontSize))) => Op (GetLabelsize ()) TreePrefs orig impl where
runOp _ _ tree_prefs = withRef tree_prefs $ \tree_prefsPtr -> labelsize' tree_prefsPtr >>= return . FontSize
setLabelsize' :: (Ptr ()) -> (CInt) -> IO ()
setLabelsize' a1 a2 =
let {a1' = id a1} in
let {a2' = id a2} in
setLabelsize''_ a1' a2' >>
return ()
instance (impl ~ (FontSize -> IO ())) => Op (SetLabelsize ()) TreePrefs orig impl where
runOp _ _ tree_prefs (FontSize val) = withRef tree_prefs $ \tree_prefsPtr -> setLabelsize' tree_prefsPtr val
labelfgcolor' :: (Ptr ()) -> IO ((Color))
labelfgcolor' a1 =
let {a1' = id a1} in
labelfgcolor''_ a1' >>= \res ->
let {res' = cToColor res} in
return (res')
instance (impl ~ (IO (Color))) => Op (GetLabelfgcolor ()) TreePrefs orig impl where
runOp _ _ tree_prefs = withRef tree_prefs $ \tree_prefsPtr -> labelfgcolor' tree_prefsPtr
setLabelfgcolor' :: (Ptr ()) -> (Color) -> IO ()
setLabelfgcolor' a1 a2 =
let {a1' = id a1} in
let {a2' = cFromColor a2} in
setLabelfgcolor''_ a1' a2' >>
return ()
instance (impl ~ (Color -> IO ())) => Op (SetLabelfgcolor ()) TreePrefs orig impl where
runOp _ _ tree_prefs val = withRef tree_prefs $ \tree_prefsPtr -> setLabelfgcolor' tree_prefsPtr val
labelbgcolor' :: (Ptr ()) -> IO ((Color))
labelbgcolor' a1 =
let {a1' = id a1} in
labelbgcolor''_ a1' >>= \res ->
let {res' = cToColor res} in
return (res')
instance (impl ~ (IO (Color))) => Op (GetLabelbgcolor ()) TreePrefs orig impl where
runOp _ _ tree_prefs = withRef tree_prefs $ \tree_prefsPtr -> labelbgcolor' tree_prefsPtr
setLabelbgcolor' :: (Ptr ()) -> (Color) -> IO ()
setLabelbgcolor' a1 a2 =
let {a1' = id a1} in
let {a2' = cFromColor a2} in
setLabelbgcolor''_ a1' a2' >>
return ()
instance (impl ~ (Color -> IO ())) => Op (SetLabelbgcolor ()) TreePrefs orig impl where
runOp _ _ tree_prefs val = withRef tree_prefs $ \tree_prefsPtr -> setLabelbgcolor' tree_prefsPtr val
marginleft' :: (Ptr ()) -> IO ((Int))
marginleft' a1 =
let {a1' = id a1} in
marginleft''_ a1' >>= \res ->
let {res' = fromIntegral res} in
return (res')
instance (impl ~ (IO (Int))) => Op (GetMarginleft ()) TreePrefs orig impl where
runOp _ _ tree_prefs = withRef tree_prefs $ \tree_prefsPtr -> marginleft' tree_prefsPtr
setMarginleft' :: (Ptr ()) -> (Int) -> IO ()
setMarginleft' a1 a2 =
let {a1' = id a1} in
let {a2' = fromIntegral a2} in
setMarginleft''_ a1' a2' >>
return ()
instance (impl ~ (Int -> IO ())) => Op (SetMarginleft ()) TreePrefs orig impl where
runOp _ _ tree_prefs val = withRef tree_prefs $ \tree_prefsPtr -> setMarginleft' tree_prefsPtr val
margintop' :: (Ptr ()) -> IO ((Int))
margintop' a1 =
let {a1' = id a1} in
margintop''_ a1' >>= \res ->
let {res' = fromIntegral res} in
return (res')
instance (impl ~ (IO (Int))) => Op (GetMargintop ()) TreePrefs orig impl where
runOp _ _ tree_prefs = withRef tree_prefs $ \tree_prefsPtr -> margintop' tree_prefsPtr
setMargintop' :: (Ptr ()) -> (Int) -> IO ()
setMargintop' a1 a2 =
let {a1' = id a1} in
let {a2' = fromIntegral a2} in
setMargintop''_ a1' a2' >>
return ()
instance (impl ~ (Int -> IO ())) => Op (SetMargintop ()) TreePrefs orig impl where
runOp _ _ tree_prefs val = withRef tree_prefs $ \tree_prefsPtr -> setMargintop' tree_prefsPtr val
openchildMarginbottom' :: (Ptr ()) -> IO ((Int))
openchildMarginbottom' a1 =
let {a1' = id a1} in
openchildMarginbottom''_ a1' >>= \res ->
let {res' = fromIntegral res} in
return (res')
instance (impl ~ (IO (Int))) => Op (GetOpenchildMarginbottom ()) TreePrefs orig impl where
runOp _ _ tree_prefs = withRef tree_prefs $ \tree_prefsPtr -> openchildMarginbottom' tree_prefsPtr
setOpenchildMarginbottom' :: (Ptr ()) -> (Int) -> IO ()
setOpenchildMarginbottom' a1 a2 =
let {a1' = id a1} in
let {a2' = fromIntegral a2} in
setOpenchildMarginbottom''_ a1' a2' >>
return ()
instance (impl ~ (Int -> IO ())) => Op (SetOpenchildMarginbottom ()) TreePrefs orig impl where
runOp _ _ tree_prefs val = withRef tree_prefs $ \tree_prefsPtr -> setOpenchildMarginbottom' tree_prefsPtr val
usericonmarginleft' :: (Ptr ()) -> IO ((Int))
usericonmarginleft' a1 =
let {a1' = id a1} in
usericonmarginleft''_ a1' >>= \res ->
let {res' = fromIntegral res} in
return (res')
instance (impl ~ (IO (Int))) => Op (GetUsericonmarginleft ()) TreePrefs orig impl where
runOp _ _ tree_prefs = withRef tree_prefs $ \tree_prefsPtr -> usericonmarginleft' tree_prefsPtr
setUsericonmarginleft' :: (Ptr ()) -> (Int) -> IO ()
setUsericonmarginleft' a1 a2 =
let {a1' = id a1} in
let {a2' = fromIntegral a2} in
setUsericonmarginleft''_ a1' a2' >>
return ()
instance (impl ~ (Int -> IO ())) => Op (SetUsericonmarginleft ()) TreePrefs orig impl where
runOp _ _ tree_prefs val = withRef tree_prefs $ \tree_prefsPtr -> setUsericonmarginleft' tree_prefsPtr val
labelmarginleft' :: (Ptr ()) -> IO ((Int))
labelmarginleft' a1 =
let {a1' = id a1} in
labelmarginleft''_ a1' >>= \res ->
let {res' = fromIntegral res} in
return (res')
instance (impl ~ (IO (Int))) => Op (GetLabelmarginleft ()) TreePrefs orig impl where
runOp _ _ tree_prefs = withRef tree_prefs $ \tree_prefsPtr -> labelmarginleft' tree_prefsPtr
setLabelmarginleft' :: (Ptr ()) -> (Int) -> IO ()
setLabelmarginleft' a1 a2 =
let {a1' = id a1} in
let {a2' = fromIntegral a2} in
setLabelmarginleft''_ a1' a2' >>
return ()
instance (impl ~ (Int -> IO ())) => Op (SetLabelmarginleft ()) TreePrefs orig impl where
runOp _ _ tree_prefs val = withRef tree_prefs $ \tree_prefsPtr -> setLabelmarginleft' tree_prefsPtr val
linespacing' :: (Ptr ()) -> IO ((Int))
linespacing' a1 =
let {a1' = id a1} in
linespacing''_ a1' >>= \res ->
let {res' = fromIntegral res} in
return (res')
instance (impl ~ (IO (Int))) => Op (GetLinespacing ()) TreePrefs orig impl where
runOp _ _ tree_prefs = withRef tree_prefs $ \tree_prefsPtr -> linespacing' tree_prefsPtr
setLinespacing' :: (Ptr ()) -> (Int) -> IO ()
setLinespacing' a1 a2 =
let {a1' = id a1} in
let {a2' = fromIntegral a2} in
setLinespacing''_ a1' a2' >>
return ()
instance (impl ~ (Int -> IO ())) => Op (SetLinespacing ()) TreePrefs orig impl where
runOp _ _ tree_prefs val = withRef tree_prefs $ \tree_prefsPtr -> setLinespacing' tree_prefsPtr val
connectorcolor' :: (Ptr ()) -> IO ((Color))
connectorcolor' a1 =
let {a1' = id a1} in
connectorcolor''_ a1' >>= \res ->
let {res' = cToColor res} in
return (res')
instance (impl ~ (IO (Color))) => Op (GetConnectorcolor ()) TreePrefs orig impl where
runOp _ _ tree_prefs = withRef tree_prefs $ \tree_prefsPtr -> connectorcolor' tree_prefsPtr
setConnectorcolor' :: (Ptr ()) -> (Color) -> IO ()
setConnectorcolor' a1 a2 =
let {a1' = id a1} in
let {a2' = cFromColor a2} in
setConnectorcolor''_ a1' a2' >>
return ()
instance (impl ~ (Color -> IO ())) => Op (SetConnectorcolor ()) TreePrefs orig impl where
runOp _ _ tree_prefs val = withRef tree_prefs $ \tree_prefsPtr -> setConnectorcolor' tree_prefsPtr val
connectorstyle' :: (Ptr ()) -> IO ((TreeConnector))
connectorstyle' a1 =
let {a1' = id a1} in
connectorstyle''_ a1' >>= \res ->
let {res' = cToEnum res} in
return (res')
instance (impl ~ (IO (TreeConnector))) => Op (GetConnectorstyle ()) TreePrefs orig impl where
runOp _ _ tree_prefs = withRef tree_prefs $ \tree_prefsPtr -> connectorstyle' tree_prefsPtr
setConnectorstyle' :: (Ptr ()) -> (TreeConnector) -> IO ()
setConnectorstyle' a1 a2 =
let {a1' = id a1} in
let {a2' = cFromEnum a2} in
setConnectorstyle''_ a1' a2' >>
return ()
instance (impl ~ (TreeConnector -> IO ())) => Op (SetConnectorstyle ()) TreePrefs orig impl where
runOp _ _ tree_prefs val = withRef tree_prefs $ \tree_prefsPtr -> setConnectorstyle' tree_prefsPtr val
connectorwidth' :: (Ptr ()) -> IO ((Int))
connectorwidth' a1 =
let {a1' = id a1} in
connectorwidth''_ a1' >>= \res ->
let {res' = fromIntegral res} in
return (res')
instance (impl ~ (IO (Int))) => Op (GetConnectorwidth ()) TreePrefs orig impl where
runOp _ _ tree_prefs = withRef tree_prefs $ \tree_prefsPtr -> connectorwidth' tree_prefsPtr
setConnectorwidth' :: (Ptr ()) -> (Int) -> IO ()
setConnectorwidth' a1 a2 =
let {a1' = id a1} in
let {a2' = fromIntegral a2} in
setConnectorwidth''_ a1' a2' >>
return ()
instance (impl ~ (Int -> IO ())) => Op (SetConnectorwidth ()) TreePrefs orig impl where
runOp _ _ tree_prefs val = withRef tree_prefs $ \tree_prefsPtr -> setConnectorwidth' tree_prefsPtr val
openicon' :: (Ptr ()) -> IO ((Ptr ()))
openicon' a1 =
let {a1' = id a1} in
openicon''_ a1' >>= \res ->
let {res' = id res} in
return (res')
instance (impl ~ (IO (Maybe (Ref Image)))) => Op (GetOpenicon ()) TreePrefs orig impl where
runOp _ _ tree_prefs = withRef tree_prefs $ \tree_prefsPtr -> openicon' tree_prefsPtr >>= toMaybeRef
setOpenicon' :: (Ptr ()) -> (Ptr ()) -> IO ()
setOpenicon' a1 a2 =
let {a1' = id a1} in
let {a2' = id a2} in
setOpenicon''_ a1' a2' >>
return ()
instance (Parent a Image, impl ~ (Ref a -> IO ())) => Op (SetOpenicon ()) TreePrefs orig impl where
runOp _ _ tree_prefs val = withRef tree_prefs $ \tree_prefsPtr -> withRef val $ \valPtr -> setOpenicon' tree_prefsPtr valPtr
closeicon' :: (Ptr ()) -> IO ((Ptr ()))
closeicon' a1 =
let {a1' = id a1} in
closeicon''_ a1' >>= \res ->
let {res' = id res} in
return (res')
instance (impl ~ (IO (Maybe (Ref Image)))) => Op (GetCloseicon ()) TreePrefs orig impl where
runOp _ _ tree_prefs = withRef tree_prefs $ \tree_prefsPtr -> closeicon' tree_prefsPtr >>= toMaybeRef
setCloseicon' :: (Ptr ()) -> (Ptr ()) -> IO ()
setCloseicon' a1 a2 =
let {a1' = id a1} in
let {a2' = id a2} in
setCloseicon''_ a1' a2' >>
return ()
instance (Parent a Image, impl ~ (Ref a -> IO ())) => Op (SetCloseicon ()) TreePrefs orig impl where
runOp _ _ tree_prefs val = withRef tree_prefs $ \tree_prefsPtr -> withRef val $ \valPtr -> setCloseicon' tree_prefsPtr valPtr
usericon' :: (Ptr ()) -> IO ((Ptr ()))
usericon' a1 =
let {a1' = id a1} in
usericon''_ a1' >>= \res ->
let {res' = id res} in
return (res')
instance (impl ~ (IO (Maybe (Ref Image)))) => Op (GetUsericon ()) TreePrefs orig impl where
runOp _ _ tree_prefs = withRef tree_prefs $ \tree_prefsPtr -> usericon' tree_prefsPtr >>= toMaybeRef
setUsericon' :: (Ptr ()) -> (Ptr ()) -> IO ()
setUsericon' a1 a2 =
let {a1' = id a1} in
let {a2' = id a2} in
setUsericon''_ a1' a2' >>
return ()
instance (Parent a Image, impl ~ (Ref a -> IO ())) => Op (SetUsericon ()) TreePrefs orig impl where
runOp _ _ tree_prefs val = withRef tree_prefs $ \tree_prefsPtr -> withRef val $ \valPtr -> setUsericon' tree_prefsPtr valPtr
showcollapse' :: (Ptr ()) -> IO ((Bool))
showcollapse' a1 =
let {a1' = id a1} in
showcollapse''_ a1' >>= \res ->
let {res' = cToBool res} in
return (res')
instance (impl ~ (IO (Bool))) => Op (GetShowcollapse ()) TreePrefs orig impl where
runOp _ _ tree_prefs = withRef tree_prefs $ \tree_prefsPtr -> showcollapse' tree_prefsPtr
setShowcollapse' :: (Ptr ()) -> (Bool) -> IO ()
setShowcollapse' a1 a2 =
let {a1' = id a1} in
let {a2' = cFromBool a2} in
setShowcollapse''_ a1' a2' >>
return ()
instance (impl ~ (Bool -> IO ())) => Op (SetShowcollapse ()) TreePrefs orig impl where
runOp _ _ tree_prefs val = withRef tree_prefs $ \tree_prefsPtr -> setShowcollapse' tree_prefsPtr val
sortorder' :: (Ptr ()) -> IO ((TreeSort))
sortorder' a1 =
let {a1' = id a1} in
sortorder''_ a1' >>= \res ->
let {res' = cToEnum res} in
return (res')
instance (impl ~ (IO (TreeSort))) => Op (GetSortorder ()) TreePrefs orig impl where
runOp _ _ tree_prefs = withRef tree_prefs $ \tree_prefsPtr -> sortorder' tree_prefsPtr
setSortorder' :: (Ptr ()) -> (TreeSort) -> IO ()
setSortorder' a1 a2 =
let {a1' = id a1} in
let {a2' = cFromEnum a2} in
setSortorder''_ a1' a2' >>
return ()
instance (impl ~ (TreeSort -> IO ())) => Op (SetSortorder ()) TreePrefs orig impl where
runOp _ _ tree_prefs val = withRef tree_prefs $ \tree_prefsPtr -> setSortorder' tree_prefsPtr val
selectbox' :: (Ptr ()) -> IO ((Boxtype))
selectbox' a1 =
let {a1' = id a1} in
selectbox''_ a1' >>= \res ->
let {res' = cToEnum res} in
return (res')
instance (impl ~ (IO (Boxtype))) => Op (GetSelectbox ()) TreePrefs orig impl where
runOp _ _ tree_prefs = withRef tree_prefs $ \tree_prefsPtr -> selectbox' tree_prefsPtr
setSelectbox' :: (Ptr ()) -> (Boxtype) -> IO ()
setSelectbox' a1 a2 =
let {a1' = id a1} in
let {a2' = cFromEnum a2} in
setSelectbox''_ a1' a2' >>
return ()
instance (impl ~ (Boxtype -> IO ())) => Op (SetSelectbox ()) TreePrefs orig impl where
runOp _ _ tree_prefs val = withRef tree_prefs $ \tree_prefsPtr -> setSelectbox' tree_prefsPtr val
showroot' :: (Ptr ()) -> IO ((Bool))
showroot' a1 =
let {a1' = id a1} in
showroot''_ a1' >>= \res ->
let {res' = cToBool res} in
return (res')
instance (impl ~ (IO (Bool))) => Op (GetShowroot ()) TreePrefs orig impl where
runOp _ _ tree_prefs = withRef tree_prefs $ \tree_prefsPtr -> showroot' tree_prefsPtr
setShowroot' :: (Ptr ()) -> (Bool) -> IO ()
setShowroot' a1 a2 =
let {a1' = id a1} in
let {a2' = cFromBool a2} in
setShowroot''_ a1' a2' >>
return ()
instance (impl ~ (Bool -> IO ())) => Op (SetShowroot ()) TreePrefs orig impl where
runOp _ _ tree_prefs val = withRef tree_prefs $ \tree_prefsPtr -> setShowroot' tree_prefsPtr val
selectmode' :: (Ptr ()) -> IO ((TreeSelect))
selectmode' a1 =
let {a1' = id a1} in
selectmode''_ a1' >>= \res ->
let {res' = cToEnum res} in
return (res')
instance (impl ~ (IO (TreeSelect))) => Op (GetSelectmode ()) TreePrefs orig impl where
runOp _ _ tree_prefs = withRef tree_prefs $ \tree_prefsPtr -> selectmode' tree_prefsPtr
setSelectmode' :: (Ptr ()) -> (TreeSelect) -> IO ()
setSelectmode' a1 a2 =
let {a1' = id a1} in
let {a2' = cFromEnum a2} in
setSelectmode''_ a1' a2' >>
return ()
instance (impl ~ (TreeSelect -> IO ())) => Op (SetSelectmode ()) TreePrefs orig impl where
runOp _ _ tree_prefs val = withRef tree_prefs $ \tree_prefsPtr -> setSelectmode' tree_prefsPtr val
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_New"
treePrefsNew''_ :: (IO (Ptr ()))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_item_labelfont"
itemLabelfont''_ :: ((Ptr ()) -> (IO CInt))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_item_labelsize"
itemLabelsize''_ :: ((Ptr ()) -> (IO CInt))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_set_item_labelsize"
setItemLabelsize''_ :: ((Ptr ()) -> (CInt -> (IO ())))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_set_item_labelfgcolor"
setItemLabelfgcolor''_ :: ((Ptr ()) -> (CUInt -> (IO ())))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_item_labelbgcolor"
itemLabelbgcolor''_ :: ((Ptr ()) -> (IO CUInt))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_set_item_labelbgcolor"
setItemLabelbgcolor''_ :: ((Ptr ()) -> (CUInt -> (IO ())))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_labelfont"
labelfont''_ :: ((Ptr ()) -> (IO CInt))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_set_labelfont"
setLabelfont''_ :: ((Ptr ()) -> (CInt -> (IO ())))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_labelsize"
labelsize''_ :: ((Ptr ()) -> (IO CInt))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_set_labelsize"
setLabelsize''_ :: ((Ptr ()) -> (CInt -> (IO ())))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_labelfgcolor"
labelfgcolor''_ :: ((Ptr ()) -> (IO CUInt))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_set_labelfgcolor"
setLabelfgcolor''_ :: ((Ptr ()) -> (CUInt -> (IO ())))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_labelbgcolor"
labelbgcolor''_ :: ((Ptr ()) -> (IO CUInt))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_set_labelbgcolor"
setLabelbgcolor''_ :: ((Ptr ()) -> (CUInt -> (IO ())))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_marginleft"
marginleft''_ :: ((Ptr ()) -> (IO CInt))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_set_marginleft"
setMarginleft''_ :: ((Ptr ()) -> (CInt -> (IO ())))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_margintop"
margintop''_ :: ((Ptr ()) -> (IO CInt))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_set_margintop"
setMargintop''_ :: ((Ptr ()) -> (CInt -> (IO ())))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_openchild_marginbottom"
openchildMarginbottom''_ :: ((Ptr ()) -> (IO CInt))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_set_openchild_marginbottom"
setOpenchildMarginbottom''_ :: ((Ptr ()) -> (CInt -> (IO ())))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_usericonmarginleft"
usericonmarginleft''_ :: ((Ptr ()) -> (IO CInt))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_set_usericonmarginleft"
setUsericonmarginleft''_ :: ((Ptr ()) -> (CInt -> (IO ())))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_labelmarginleft"
labelmarginleft''_ :: ((Ptr ()) -> (IO CInt))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_set_labelmarginleft"
setLabelmarginleft''_ :: ((Ptr ()) -> (CInt -> (IO ())))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_linespacing"
linespacing''_ :: ((Ptr ()) -> (IO CInt))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_set_linespacing"
setLinespacing''_ :: ((Ptr ()) -> (CInt -> (IO ())))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_connectorcolor"
connectorcolor''_ :: ((Ptr ()) -> (IO CUInt))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_set_connectorcolor"
setConnectorcolor''_ :: ((Ptr ()) -> (CUInt -> (IO ())))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_connectorstyle"
connectorstyle''_ :: ((Ptr ()) -> (IO CInt))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_set_connectorstyle_with_tree_connector"
setConnectorstyle''_ :: ((Ptr ()) -> (CInt -> (IO ())))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_connectorwidth"
connectorwidth''_ :: ((Ptr ()) -> (IO CInt))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_set_connectorwidth"
setConnectorwidth''_ :: ((Ptr ()) -> (CInt -> (IO ())))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_openicon"
openicon''_ :: ((Ptr ()) -> (IO (Ptr ())))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_set_openicon"
setOpenicon''_ :: ((Ptr ()) -> ((Ptr ()) -> (IO ())))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_closeicon"
closeicon''_ :: ((Ptr ()) -> (IO (Ptr ())))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_set_closeicon"
setCloseicon''_ :: ((Ptr ()) -> ((Ptr ()) -> (IO ())))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_usericon"
usericon''_ :: ((Ptr ()) -> (IO (Ptr ())))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_set_usericon"
setUsericon''_ :: ((Ptr ()) -> ((Ptr ()) -> (IO ())))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_showcollapse"
showcollapse''_ :: ((Ptr ()) -> (IO CChar))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_set_showcollapse"
setShowcollapse''_ :: ((Ptr ()) -> (CInt -> (IO ())))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_sortorder"
sortorder''_ :: ((Ptr ()) -> (IO CInt))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_set_sortorder"
setSortorder''_ :: ((Ptr ()) -> (CInt -> (IO ())))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_selectbox"
selectbox''_ :: ((Ptr ()) -> (IO CInt))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_set_selectbox"
setSelectbox''_ :: ((Ptr ()) -> (CInt -> (IO ())))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_showroot"
showroot''_ :: ((Ptr ()) -> (IO CInt))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_set_showroot"
setShowroot''_ :: ((Ptr ()) -> (CInt -> (IO ())))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_selectmode"
selectmode''_ :: ((Ptr ()) -> (IO CInt))
foreign import ccall unsafe "Graphics/UI/FLTK/LowLevel/TreePrefs.chs.h Fl_Tree_Prefs_set_selectmode"
setSelectmode''_ :: ((Ptr ()) -> (CInt -> (IO ())))