module Graphics.UI.Gtk.SourceView.SourceCompletionInfo (
SourceCompletionInfo,
SourceCompletionInfoClass,
sourceCompletionInfoNew,
sourceCompletionInfoMoveToIter,
sourceCompletionInfoSetWidget,
sourceCompletionInfoGetWidget,
sourceCompletionInfoMaxHeight,
sourceCompletionInfoMaxWidth,
sourceCompletionInfoShrinkHeight,
sourceCompletionInfoShrinkWidth,
sourceCompletionInfoBeforeShow,
) where
import Control.Monad (liftM)
import Data.Maybe (fromMaybe)
import Graphics.UI.Gtk.Abstract.Object (makeNewObject)
import System.Glib.Attributes
import System.Glib.FFI
import System.Glib.Properties
import System.Glib.UTFString
import Graphics.UI.Gtk.SourceView.Signals
import Graphics.UI.Gtk.SourceView.Types
sourceCompletionInfoNew :: IO SourceCompletionInfo
sourceCompletionInfoNew =
makeNewObject mkSourceCompletionInfo $
gtk_source_completion_info_new
sourceCompletionInfoMoveToIter :: SourceCompletionInfoClass info => info
-> TextView
-> Maybe TextIter
-> IO ()
sourceCompletionInfoMoveToIter info view iter =
(\(SourceCompletionInfo arg1) (TextView arg2) (TextIter arg3) -> withForeignPtr arg1 $ \argPtr1 ->withForeignPtr arg2 $ \argPtr2 ->withForeignPtr arg3 $ \argPtr3 ->gtk_source_completion_info_move_to_iter argPtr1 argPtr2 argPtr3)
(toSourceCompletionInfo info)
view
(fromMaybe (TextIter nullForeignPtr) iter)
sourceCompletionInfoSetWidget :: (SourceCompletionInfoClass info, WidgetClass widget) => info
-> widget
-> IO ()
sourceCompletionInfoSetWidget info widget =
(\(SourceCompletionInfo arg1) (Widget arg2) -> withForeignPtr arg1 $ \argPtr1 ->withForeignPtr arg2 $ \argPtr2 ->gtk_source_completion_info_set_widget argPtr1 argPtr2)
(toSourceCompletionInfo info)
(toWidget widget)
sourceCompletionInfoGetWidget :: SourceCompletionInfoClass info => info
-> IO Widget
sourceCompletionInfoGetWidget info =
makeNewObject mkWidget $
(\(SourceCompletionInfo arg1) -> withForeignPtr arg1 $ \argPtr1 ->gtk_source_completion_info_get_widget argPtr1)
(toSourceCompletionInfo info)
sourceCompletionInfoMaxHeight :: SourceCompletionInfoClass info => Attr info Int
sourceCompletionInfoMaxHeight = newAttrFromIntProperty "max-height"
sourceCompletionInfoMaxWidth :: SourceCompletionInfoClass info => Attr info Int
sourceCompletionInfoMaxWidth = newAttrFromIntProperty "max-width"
sourceCompletionInfoShrinkHeight :: SourceCompletionInfoClass info => Attr info Bool
sourceCompletionInfoShrinkHeight = newAttrFromBoolProperty "shrink-height"
sourceCompletionInfoShrinkWidth :: SourceCompletionInfoClass info => Attr info Bool
sourceCompletionInfoShrinkWidth = newAttrFromBoolProperty "shrink-width"
sourceCompletionInfoBeforeShow :: SourceCompletionInfoClass info => Signal info (IO ())
sourceCompletionInfoBeforeShow = Signal $ connect_NONE__NONE "before-show"
foreign import ccall safe "gtk_source_completion_info_new"
gtk_source_completion_info_new :: (IO (Ptr SourceCompletionInfo))
foreign import ccall safe "gtk_source_completion_info_move_to_iter"
gtk_source_completion_info_move_to_iter :: ((Ptr SourceCompletionInfo) -> ((Ptr TextView) -> ((Ptr TextIter) -> (IO ()))))
foreign import ccall safe "gtk_source_completion_info_set_widget"
gtk_source_completion_info_set_widget :: ((Ptr SourceCompletionInfo) -> ((Ptr Widget) -> (IO ())))
foreign import ccall safe "gtk_source_completion_info_get_widget"
gtk_source_completion_info_get_widget :: ((Ptr SourceCompletionInfo) -> (IO (Ptr Widget)))