#define ENABLE_OVERLOADING (MIN_VERSION_haskell_gi_overloading(1,0,0) \
&& !defined(__HADDOCK_VERSION__))
module GI.Gtk.Objects.TextView
(
TextView(..) ,
IsTextView ,
toTextView ,
noTextView ,
#if ENABLE_OVERLOADING
TextViewAddChildAtAnchorMethodInfo ,
#endif
textViewAddChildAtAnchor ,
#if ENABLE_OVERLOADING
TextViewAddChildInWindowMethodInfo ,
#endif
textViewAddChildInWindow ,
#if ENABLE_OVERLOADING
TextViewBackwardDisplayLineMethodInfo ,
#endif
textViewBackwardDisplayLine ,
#if ENABLE_OVERLOADING
TextViewBackwardDisplayLineStartMethodInfo,
#endif
textViewBackwardDisplayLineStart ,
#if ENABLE_OVERLOADING
TextViewBufferToWindowCoordsMethodInfo ,
#endif
textViewBufferToWindowCoords ,
#if ENABLE_OVERLOADING
TextViewForwardDisplayLineMethodInfo ,
#endif
textViewForwardDisplayLine ,
#if ENABLE_OVERLOADING
TextViewForwardDisplayLineEndMethodInfo ,
#endif
textViewForwardDisplayLineEnd ,
#if ENABLE_OVERLOADING
TextViewGetAcceptsTabMethodInfo ,
#endif
textViewGetAcceptsTab ,
#if ENABLE_OVERLOADING
TextViewGetBorderWindowSizeMethodInfo ,
#endif
textViewGetBorderWindowSize ,
#if ENABLE_OVERLOADING
TextViewGetBottomMarginMethodInfo ,
#endif
textViewGetBottomMargin ,
#if ENABLE_OVERLOADING
TextViewGetBufferMethodInfo ,
#endif
textViewGetBuffer ,
#if ENABLE_OVERLOADING
TextViewGetCursorLocationsMethodInfo ,
#endif
textViewGetCursorLocations ,
#if ENABLE_OVERLOADING
TextViewGetCursorVisibleMethodInfo ,
#endif
textViewGetCursorVisible ,
#if ENABLE_OVERLOADING
TextViewGetDefaultAttributesMethodInfo ,
#endif
textViewGetDefaultAttributes ,
#if ENABLE_OVERLOADING
TextViewGetEditableMethodInfo ,
#endif
textViewGetEditable ,
#if ENABLE_OVERLOADING
TextViewGetHadjustmentMethodInfo ,
#endif
textViewGetHadjustment ,
#if ENABLE_OVERLOADING
TextViewGetIndentMethodInfo ,
#endif
textViewGetIndent ,
#if ENABLE_OVERLOADING
TextViewGetInputHintsMethodInfo ,
#endif
textViewGetInputHints ,
#if ENABLE_OVERLOADING
TextViewGetInputPurposeMethodInfo ,
#endif
textViewGetInputPurpose ,
#if ENABLE_OVERLOADING
TextViewGetIterAtLocationMethodInfo ,
#endif
textViewGetIterAtLocation ,
#if ENABLE_OVERLOADING
TextViewGetIterAtPositionMethodInfo ,
#endif
textViewGetIterAtPosition ,
#if ENABLE_OVERLOADING
TextViewGetIterLocationMethodInfo ,
#endif
textViewGetIterLocation ,
#if ENABLE_OVERLOADING
TextViewGetJustificationMethodInfo ,
#endif
textViewGetJustification ,
#if ENABLE_OVERLOADING
TextViewGetLeftMarginMethodInfo ,
#endif
textViewGetLeftMargin ,
#if ENABLE_OVERLOADING
TextViewGetLineAtYMethodInfo ,
#endif
textViewGetLineAtY ,
#if ENABLE_OVERLOADING
TextViewGetLineYrangeMethodInfo ,
#endif
textViewGetLineYrange ,
#if ENABLE_OVERLOADING
TextViewGetMonospaceMethodInfo ,
#endif
textViewGetMonospace ,
#if ENABLE_OVERLOADING
TextViewGetOverwriteMethodInfo ,
#endif
textViewGetOverwrite ,
#if ENABLE_OVERLOADING
TextViewGetPixelsAboveLinesMethodInfo ,
#endif
textViewGetPixelsAboveLines ,
#if ENABLE_OVERLOADING
TextViewGetPixelsBelowLinesMethodInfo ,
#endif
textViewGetPixelsBelowLines ,
#if ENABLE_OVERLOADING
TextViewGetPixelsInsideWrapMethodInfo ,
#endif
textViewGetPixelsInsideWrap ,
#if ENABLE_OVERLOADING
TextViewGetRightMarginMethodInfo ,
#endif
textViewGetRightMargin ,
#if ENABLE_OVERLOADING
TextViewGetTabsMethodInfo ,
#endif
textViewGetTabs ,
#if ENABLE_OVERLOADING
TextViewGetTopMarginMethodInfo ,
#endif
textViewGetTopMargin ,
#if ENABLE_OVERLOADING
TextViewGetVadjustmentMethodInfo ,
#endif
textViewGetVadjustment ,
#if ENABLE_OVERLOADING
TextViewGetVisibleRectMethodInfo ,
#endif
textViewGetVisibleRect ,
#if ENABLE_OVERLOADING
TextViewGetWindowMethodInfo ,
#endif
textViewGetWindow ,
#if ENABLE_OVERLOADING
TextViewGetWindowTypeMethodInfo ,
#endif
textViewGetWindowType ,
#if ENABLE_OVERLOADING
TextViewGetWrapModeMethodInfo ,
#endif
textViewGetWrapMode ,
#if ENABLE_OVERLOADING
TextViewImContextFilterKeypressMethodInfo,
#endif
textViewImContextFilterKeypress ,
#if ENABLE_OVERLOADING
TextViewMoveChildMethodInfo ,
#endif
textViewMoveChild ,
#if ENABLE_OVERLOADING
TextViewMoveMarkOnscreenMethodInfo ,
#endif
textViewMoveMarkOnscreen ,
#if ENABLE_OVERLOADING
TextViewMoveVisuallyMethodInfo ,
#endif
textViewMoveVisually ,
textViewNew ,
textViewNewWithBuffer ,
#if ENABLE_OVERLOADING
TextViewPlaceCursorOnscreenMethodInfo ,
#endif
textViewPlaceCursorOnscreen ,
#if ENABLE_OVERLOADING
TextViewResetCursorBlinkMethodInfo ,
#endif
textViewResetCursorBlink ,
#if ENABLE_OVERLOADING
TextViewResetImContextMethodInfo ,
#endif
textViewResetImContext ,
#if ENABLE_OVERLOADING
TextViewScrollMarkOnscreenMethodInfo ,
#endif
textViewScrollMarkOnscreen ,
#if ENABLE_OVERLOADING
TextViewScrollToIterMethodInfo ,
#endif
textViewScrollToIter ,
#if ENABLE_OVERLOADING
TextViewScrollToMarkMethodInfo ,
#endif
textViewScrollToMark ,
#if ENABLE_OVERLOADING
TextViewSetAcceptsTabMethodInfo ,
#endif
textViewSetAcceptsTab ,
#if ENABLE_OVERLOADING
TextViewSetBorderWindowSizeMethodInfo ,
#endif
textViewSetBorderWindowSize ,
#if ENABLE_OVERLOADING
TextViewSetBottomMarginMethodInfo ,
#endif
textViewSetBottomMargin ,
#if ENABLE_OVERLOADING
TextViewSetBufferMethodInfo ,
#endif
textViewSetBuffer ,
#if ENABLE_OVERLOADING
TextViewSetCursorVisibleMethodInfo ,
#endif
textViewSetCursorVisible ,
#if ENABLE_OVERLOADING
TextViewSetEditableMethodInfo ,
#endif
textViewSetEditable ,
#if ENABLE_OVERLOADING
TextViewSetIndentMethodInfo ,
#endif
textViewSetIndent ,
#if ENABLE_OVERLOADING
TextViewSetInputHintsMethodInfo ,
#endif
textViewSetInputHints ,
#if ENABLE_OVERLOADING
TextViewSetInputPurposeMethodInfo ,
#endif
textViewSetInputPurpose ,
#if ENABLE_OVERLOADING
TextViewSetJustificationMethodInfo ,
#endif
textViewSetJustification ,
#if ENABLE_OVERLOADING
TextViewSetLeftMarginMethodInfo ,
#endif
textViewSetLeftMargin ,
#if ENABLE_OVERLOADING
TextViewSetMonospaceMethodInfo ,
#endif
textViewSetMonospace ,
#if ENABLE_OVERLOADING
TextViewSetOverwriteMethodInfo ,
#endif
textViewSetOverwrite ,
#if ENABLE_OVERLOADING
TextViewSetPixelsAboveLinesMethodInfo ,
#endif
textViewSetPixelsAboveLines ,
#if ENABLE_OVERLOADING
TextViewSetPixelsBelowLinesMethodInfo ,
#endif
textViewSetPixelsBelowLines ,
#if ENABLE_OVERLOADING
TextViewSetPixelsInsideWrapMethodInfo ,
#endif
textViewSetPixelsInsideWrap ,
#if ENABLE_OVERLOADING
TextViewSetRightMarginMethodInfo ,
#endif
textViewSetRightMargin ,
#if ENABLE_OVERLOADING
TextViewSetTabsMethodInfo ,
#endif
textViewSetTabs ,
#if ENABLE_OVERLOADING
TextViewSetTopMarginMethodInfo ,
#endif
textViewSetTopMargin ,
#if ENABLE_OVERLOADING
TextViewSetWrapModeMethodInfo ,
#endif
textViewSetWrapMode ,
#if ENABLE_OVERLOADING
TextViewStartsDisplayLineMethodInfo ,
#endif
textViewStartsDisplayLine ,
#if ENABLE_OVERLOADING
TextViewWindowToBufferCoordsMethodInfo ,
#endif
textViewWindowToBufferCoords ,
#if ENABLE_OVERLOADING
TextViewAcceptsTabPropertyInfo ,
#endif
constructTextViewAcceptsTab ,
getTextViewAcceptsTab ,
setTextViewAcceptsTab ,
#if ENABLE_OVERLOADING
textViewAcceptsTab ,
#endif
#if ENABLE_OVERLOADING
TextViewBottomMarginPropertyInfo ,
#endif
constructTextViewBottomMargin ,
getTextViewBottomMargin ,
setTextViewBottomMargin ,
#if ENABLE_OVERLOADING
textViewBottomMargin ,
#endif
#if ENABLE_OVERLOADING
TextViewBufferPropertyInfo ,
#endif
clearTextViewBuffer ,
constructTextViewBuffer ,
getTextViewBuffer ,
setTextViewBuffer ,
#if ENABLE_OVERLOADING
textViewBuffer ,
#endif
#if ENABLE_OVERLOADING
TextViewCursorVisiblePropertyInfo ,
#endif
constructTextViewCursorVisible ,
getTextViewCursorVisible ,
setTextViewCursorVisible ,
#if ENABLE_OVERLOADING
textViewCursorVisible ,
#endif
#if ENABLE_OVERLOADING
TextViewEditablePropertyInfo ,
#endif
constructTextViewEditable ,
getTextViewEditable ,
setTextViewEditable ,
#if ENABLE_OVERLOADING
textViewEditable ,
#endif
#if ENABLE_OVERLOADING
TextViewImModulePropertyInfo ,
#endif
clearTextViewImModule ,
constructTextViewImModule ,
getTextViewImModule ,
setTextViewImModule ,
#if ENABLE_OVERLOADING
textViewImModule ,
#endif
#if ENABLE_OVERLOADING
TextViewIndentPropertyInfo ,
#endif
constructTextViewIndent ,
getTextViewIndent ,
setTextViewIndent ,
#if ENABLE_OVERLOADING
textViewIndent ,
#endif
#if ENABLE_OVERLOADING
TextViewInputHintsPropertyInfo ,
#endif
constructTextViewInputHints ,
getTextViewInputHints ,
setTextViewInputHints ,
#if ENABLE_OVERLOADING
textViewInputHints ,
#endif
#if ENABLE_OVERLOADING
TextViewInputPurposePropertyInfo ,
#endif
constructTextViewInputPurpose ,
getTextViewInputPurpose ,
setTextViewInputPurpose ,
#if ENABLE_OVERLOADING
textViewInputPurpose ,
#endif
#if ENABLE_OVERLOADING
TextViewJustificationPropertyInfo ,
#endif
constructTextViewJustification ,
getTextViewJustification ,
setTextViewJustification ,
#if ENABLE_OVERLOADING
textViewJustification ,
#endif
#if ENABLE_OVERLOADING
TextViewLeftMarginPropertyInfo ,
#endif
constructTextViewLeftMargin ,
getTextViewLeftMargin ,
setTextViewLeftMargin ,
#if ENABLE_OVERLOADING
textViewLeftMargin ,
#endif
#if ENABLE_OVERLOADING
TextViewMonospacePropertyInfo ,
#endif
constructTextViewMonospace ,
getTextViewMonospace ,
setTextViewMonospace ,
#if ENABLE_OVERLOADING
textViewMonospace ,
#endif
#if ENABLE_OVERLOADING
TextViewOverwritePropertyInfo ,
#endif
constructTextViewOverwrite ,
getTextViewOverwrite ,
setTextViewOverwrite ,
#if ENABLE_OVERLOADING
textViewOverwrite ,
#endif
#if ENABLE_OVERLOADING
TextViewPixelsAboveLinesPropertyInfo ,
#endif
constructTextViewPixelsAboveLines ,
getTextViewPixelsAboveLines ,
setTextViewPixelsAboveLines ,
#if ENABLE_OVERLOADING
textViewPixelsAboveLines ,
#endif
#if ENABLE_OVERLOADING
TextViewPixelsBelowLinesPropertyInfo ,
#endif
constructTextViewPixelsBelowLines ,
getTextViewPixelsBelowLines ,
setTextViewPixelsBelowLines ,
#if ENABLE_OVERLOADING
textViewPixelsBelowLines ,
#endif
#if ENABLE_OVERLOADING
TextViewPixelsInsideWrapPropertyInfo ,
#endif
constructTextViewPixelsInsideWrap ,
getTextViewPixelsInsideWrap ,
setTextViewPixelsInsideWrap ,
#if ENABLE_OVERLOADING
textViewPixelsInsideWrap ,
#endif
#if ENABLE_OVERLOADING
TextViewPopulateAllPropertyInfo ,
#endif
constructTextViewPopulateAll ,
getTextViewPopulateAll ,
setTextViewPopulateAll ,
#if ENABLE_OVERLOADING
textViewPopulateAll ,
#endif
#if ENABLE_OVERLOADING
TextViewRightMarginPropertyInfo ,
#endif
constructTextViewRightMargin ,
getTextViewRightMargin ,
setTextViewRightMargin ,
#if ENABLE_OVERLOADING
textViewRightMargin ,
#endif
#if ENABLE_OVERLOADING
TextViewTabsPropertyInfo ,
#endif
constructTextViewTabs ,
getTextViewTabs ,
setTextViewTabs ,
#if ENABLE_OVERLOADING
textViewTabs ,
#endif
#if ENABLE_OVERLOADING
TextViewTopMarginPropertyInfo ,
#endif
constructTextViewTopMargin ,
getTextViewTopMargin ,
setTextViewTopMargin ,
#if ENABLE_OVERLOADING
textViewTopMargin ,
#endif
#if ENABLE_OVERLOADING
TextViewWrapModePropertyInfo ,
#endif
constructTextViewWrapMode ,
getTextViewWrapMode ,
setTextViewWrapMode ,
#if ENABLE_OVERLOADING
textViewWrapMode ,
#endif
C_TextViewBackspaceCallback ,
TextViewBackspaceCallback ,
#if ENABLE_OVERLOADING
TextViewBackspaceSignalInfo ,
#endif
afterTextViewBackspace ,
genClosure_TextViewBackspace ,
mk_TextViewBackspaceCallback ,
noTextViewBackspaceCallback ,
onTextViewBackspace ,
wrap_TextViewBackspaceCallback ,
C_TextViewCopyClipboardCallback ,
TextViewCopyClipboardCallback ,
#if ENABLE_OVERLOADING
TextViewCopyClipboardSignalInfo ,
#endif
afterTextViewCopyClipboard ,
genClosure_TextViewCopyClipboard ,
mk_TextViewCopyClipboardCallback ,
noTextViewCopyClipboardCallback ,
onTextViewCopyClipboard ,
wrap_TextViewCopyClipboardCallback ,
C_TextViewCutClipboardCallback ,
TextViewCutClipboardCallback ,
#if ENABLE_OVERLOADING
TextViewCutClipboardSignalInfo ,
#endif
afterTextViewCutClipboard ,
genClosure_TextViewCutClipboard ,
mk_TextViewCutClipboardCallback ,
noTextViewCutClipboardCallback ,
onTextViewCutClipboard ,
wrap_TextViewCutClipboardCallback ,
C_TextViewDeleteFromCursorCallback ,
TextViewDeleteFromCursorCallback ,
#if ENABLE_OVERLOADING
TextViewDeleteFromCursorSignalInfo ,
#endif
afterTextViewDeleteFromCursor ,
genClosure_TextViewDeleteFromCursor ,
mk_TextViewDeleteFromCursorCallback ,
noTextViewDeleteFromCursorCallback ,
onTextViewDeleteFromCursor ,
wrap_TextViewDeleteFromCursorCallback ,
C_TextViewExtendSelectionCallback ,
TextViewExtendSelectionCallback ,
#if ENABLE_OVERLOADING
TextViewExtendSelectionSignalInfo ,
#endif
afterTextViewExtendSelection ,
genClosure_TextViewExtendSelection ,
mk_TextViewExtendSelectionCallback ,
noTextViewExtendSelectionCallback ,
onTextViewExtendSelection ,
wrap_TextViewExtendSelectionCallback ,
C_TextViewInsertAtCursorCallback ,
TextViewInsertAtCursorCallback ,
#if ENABLE_OVERLOADING
TextViewInsertAtCursorSignalInfo ,
#endif
afterTextViewInsertAtCursor ,
genClosure_TextViewInsertAtCursor ,
mk_TextViewInsertAtCursorCallback ,
noTextViewInsertAtCursorCallback ,
onTextViewInsertAtCursor ,
wrap_TextViewInsertAtCursorCallback ,
C_TextViewInsertEmojiCallback ,
TextViewInsertEmojiCallback ,
#if ENABLE_OVERLOADING
TextViewInsertEmojiSignalInfo ,
#endif
afterTextViewInsertEmoji ,
genClosure_TextViewInsertEmoji ,
mk_TextViewInsertEmojiCallback ,
noTextViewInsertEmojiCallback ,
onTextViewInsertEmoji ,
wrap_TextViewInsertEmojiCallback ,
C_TextViewMoveCursorCallback ,
TextViewMoveCursorCallback ,
#if ENABLE_OVERLOADING
TextViewMoveCursorSignalInfo ,
#endif
afterTextViewMoveCursor ,
genClosure_TextViewMoveCursor ,
mk_TextViewMoveCursorCallback ,
noTextViewMoveCursorCallback ,
onTextViewMoveCursor ,
wrap_TextViewMoveCursorCallback ,
C_TextViewMoveViewportCallback ,
TextViewMoveViewportCallback ,
#if ENABLE_OVERLOADING
TextViewMoveViewportSignalInfo ,
#endif
afterTextViewMoveViewport ,
genClosure_TextViewMoveViewport ,
mk_TextViewMoveViewportCallback ,
noTextViewMoveViewportCallback ,
onTextViewMoveViewport ,
wrap_TextViewMoveViewportCallback ,
C_TextViewPasteClipboardCallback ,
TextViewPasteClipboardCallback ,
#if ENABLE_OVERLOADING
TextViewPasteClipboardSignalInfo ,
#endif
afterTextViewPasteClipboard ,
genClosure_TextViewPasteClipboard ,
mk_TextViewPasteClipboardCallback ,
noTextViewPasteClipboardCallback ,
onTextViewPasteClipboard ,
wrap_TextViewPasteClipboardCallback ,
C_TextViewPopulatePopupCallback ,
TextViewPopulatePopupCallback ,
#if ENABLE_OVERLOADING
TextViewPopulatePopupSignalInfo ,
#endif
afterTextViewPopulatePopup ,
genClosure_TextViewPopulatePopup ,
mk_TextViewPopulatePopupCallback ,
noTextViewPopulatePopupCallback ,
onTextViewPopulatePopup ,
wrap_TextViewPopulatePopupCallback ,
C_TextViewPreeditChangedCallback ,
TextViewPreeditChangedCallback ,
#if ENABLE_OVERLOADING
TextViewPreeditChangedSignalInfo ,
#endif
afterTextViewPreeditChanged ,
genClosure_TextViewPreeditChanged ,
mk_TextViewPreeditChangedCallback ,
noTextViewPreeditChangedCallback ,
onTextViewPreeditChanged ,
wrap_TextViewPreeditChangedCallback ,
C_TextViewSelectAllCallback ,
TextViewSelectAllCallback ,
#if ENABLE_OVERLOADING
TextViewSelectAllSignalInfo ,
#endif
afterTextViewSelectAll ,
genClosure_TextViewSelectAll ,
mk_TextViewSelectAllCallback ,
noTextViewSelectAllCallback ,
onTextViewSelectAll ,
wrap_TextViewSelectAllCallback ,
C_TextViewSetAnchorCallback ,
TextViewSetAnchorCallback ,
#if ENABLE_OVERLOADING
TextViewSetAnchorSignalInfo ,
#endif
afterTextViewSetAnchor ,
genClosure_TextViewSetAnchor ,
mk_TextViewSetAnchorCallback ,
noTextViewSetAnchorCallback ,
onTextViewSetAnchor ,
wrap_TextViewSetAnchorCallback ,
C_TextViewToggleCursorVisibleCallback ,
TextViewToggleCursorVisibleCallback ,
#if ENABLE_OVERLOADING
TextViewToggleCursorVisibleSignalInfo ,
#endif
afterTextViewToggleCursorVisible ,
genClosure_TextViewToggleCursorVisible ,
mk_TextViewToggleCursorVisibleCallback ,
noTextViewToggleCursorVisibleCallback ,
onTextViewToggleCursorVisible ,
wrap_TextViewToggleCursorVisibleCallback,
C_TextViewToggleOverwriteCallback ,
TextViewToggleOverwriteCallback ,
#if ENABLE_OVERLOADING
TextViewToggleOverwriteSignalInfo ,
#endif
afterTextViewToggleOverwrite ,
genClosure_TextViewToggleOverwrite ,
mk_TextViewToggleOverwriteCallback ,
noTextViewToggleOverwriteCallback ,
onTextViewToggleOverwrite ,
wrap_TextViewToggleOverwriteCallback ,
) where
import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P
import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GHC.OverloadedLabels as OL
import qualified GI.Atk.Interfaces.ImplementorIface as Atk.ImplementorIface
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.Gdk.Objects.Window as Gdk.Window
import qualified GI.Gdk.Structs.EventKey as Gdk.EventKey
import qualified GI.Gdk.Structs.Rectangle as Gdk.Rectangle
import {-# SOURCE #-} qualified GI.Gtk.Enums as Gtk.Enums
import {-# SOURCE #-} qualified GI.Gtk.Flags as Gtk.Flags
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Buildable as Gtk.Buildable
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Scrollable as Gtk.Scrollable
import {-# SOURCE #-} qualified GI.Gtk.Objects.Adjustment as Gtk.Adjustment
import {-# SOURCE #-} qualified GI.Gtk.Objects.Container as Gtk.Container
import {-# SOURCE #-} qualified GI.Gtk.Objects.TextBuffer as Gtk.TextBuffer
import {-# SOURCE #-} qualified GI.Gtk.Objects.TextChildAnchor as Gtk.TextChildAnchor
import {-# SOURCE #-} qualified GI.Gtk.Objects.TextMark as Gtk.TextMark
import {-# SOURCE #-} qualified GI.Gtk.Objects.Widget as Gtk.Widget
import {-# SOURCE #-} qualified GI.Gtk.Structs.TextAttributes as Gtk.TextAttributes
import {-# SOURCE #-} qualified GI.Gtk.Structs.TextIter as Gtk.TextIter
import qualified GI.Pango.Structs.TabArray as Pango.TabArray
newtype TextView = TextView (ManagedPtr TextView)
foreign import ccall "gtk_text_view_get_type"
c_gtk_text_view_get_type :: IO GType
instance GObject TextView where
gobjectType = c_gtk_text_view_get_type
class (GObject o, O.IsDescendantOf TextView o) => IsTextView o
instance (GObject o, O.IsDescendantOf TextView o) => IsTextView o
instance O.HasParentTypes TextView
type instance O.ParentTypes TextView = '[Gtk.Container.Container, Gtk.Widget.Widget, GObject.Object.Object, Atk.ImplementorIface.ImplementorIface, Gtk.Buildable.Buildable, Gtk.Scrollable.Scrollable]
toTextView :: (MonadIO m, IsTextView o) => o -> m TextView
toTextView = liftIO . unsafeCastTo TextView
noTextView :: Maybe TextView
noTextView = Nothing
#if ENABLE_OVERLOADING
type family ResolveTextViewMethod (t :: Symbol) (o :: *) :: * where
ResolveTextViewMethod "activate" o = Gtk.Widget.WidgetActivateMethodInfo
ResolveTextViewMethod "add" o = Gtk.Container.ContainerAddMethodInfo
ResolveTextViewMethod "addAccelerator" o = Gtk.Widget.WidgetAddAcceleratorMethodInfo
ResolveTextViewMethod "addChild" o = Gtk.Buildable.BuildableAddChildMethodInfo
ResolveTextViewMethod "addChildAtAnchor" o = TextViewAddChildAtAnchorMethodInfo
ResolveTextViewMethod "addChildInWindow" o = TextViewAddChildInWindowMethodInfo
ResolveTextViewMethod "addDeviceEvents" o = Gtk.Widget.WidgetAddDeviceEventsMethodInfo
ResolveTextViewMethod "addEvents" o = Gtk.Widget.WidgetAddEventsMethodInfo
ResolveTextViewMethod "addMnemonicLabel" o = Gtk.Widget.WidgetAddMnemonicLabelMethodInfo
ResolveTextViewMethod "addTickCallback" o = Gtk.Widget.WidgetAddTickCallbackMethodInfo
ResolveTextViewMethod "backwardDisplayLine" o = TextViewBackwardDisplayLineMethodInfo
ResolveTextViewMethod "backwardDisplayLineStart" o = TextViewBackwardDisplayLineStartMethodInfo
ResolveTextViewMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveTextViewMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveTextViewMethod "bufferToWindowCoords" o = TextViewBufferToWindowCoordsMethodInfo
ResolveTextViewMethod "canActivateAccel" o = Gtk.Widget.WidgetCanActivateAccelMethodInfo
ResolveTextViewMethod "checkResize" o = Gtk.Container.ContainerCheckResizeMethodInfo
ResolveTextViewMethod "childFocus" o = Gtk.Widget.WidgetChildFocusMethodInfo
ResolveTextViewMethod "childGetProperty" o = Gtk.Container.ContainerChildGetPropertyMethodInfo
ResolveTextViewMethod "childNotify" o = Gtk.Container.ContainerChildNotifyMethodInfo
ResolveTextViewMethod "childNotifyByPspec" o = Gtk.Container.ContainerChildNotifyByPspecMethodInfo
ResolveTextViewMethod "childSetProperty" o = Gtk.Container.ContainerChildSetPropertyMethodInfo
ResolveTextViewMethod "childType" o = Gtk.Container.ContainerChildTypeMethodInfo
ResolveTextViewMethod "classPath" o = Gtk.Widget.WidgetClassPathMethodInfo
ResolveTextViewMethod "computeExpand" o = Gtk.Widget.WidgetComputeExpandMethodInfo
ResolveTextViewMethod "constructChild" o = Gtk.Buildable.BuildableConstructChildMethodInfo
ResolveTextViewMethod "createPangoContext" o = Gtk.Widget.WidgetCreatePangoContextMethodInfo
ResolveTextViewMethod "createPangoLayout" o = Gtk.Widget.WidgetCreatePangoLayoutMethodInfo
ResolveTextViewMethod "customFinished" o = Gtk.Buildable.BuildableCustomFinishedMethodInfo
ResolveTextViewMethod "customTagEnd" o = Gtk.Buildable.BuildableCustomTagEndMethodInfo
ResolveTextViewMethod "customTagStart" o = Gtk.Buildable.BuildableCustomTagStartMethodInfo
ResolveTextViewMethod "destroy" o = Gtk.Widget.WidgetDestroyMethodInfo
ResolveTextViewMethod "destroyed" o = Gtk.Widget.WidgetDestroyedMethodInfo
ResolveTextViewMethod "deviceIsShadowed" o = Gtk.Widget.WidgetDeviceIsShadowedMethodInfo
ResolveTextViewMethod "dragBegin" o = Gtk.Widget.WidgetDragBeginMethodInfo
ResolveTextViewMethod "dragBeginWithCoordinates" o = Gtk.Widget.WidgetDragBeginWithCoordinatesMethodInfo
ResolveTextViewMethod "dragCheckThreshold" o = Gtk.Widget.WidgetDragCheckThresholdMethodInfo
ResolveTextViewMethod "dragDestAddImageTargets" o = Gtk.Widget.WidgetDragDestAddImageTargetsMethodInfo
ResolveTextViewMethod "dragDestAddTextTargets" o = Gtk.Widget.WidgetDragDestAddTextTargetsMethodInfo
ResolveTextViewMethod "dragDestAddUriTargets" o = Gtk.Widget.WidgetDragDestAddUriTargetsMethodInfo
ResolveTextViewMethod "dragDestFindTarget" o = Gtk.Widget.WidgetDragDestFindTargetMethodInfo
ResolveTextViewMethod "dragDestGetTargetList" o = Gtk.Widget.WidgetDragDestGetTargetListMethodInfo
ResolveTextViewMethod "dragDestGetTrackMotion" o = Gtk.Widget.WidgetDragDestGetTrackMotionMethodInfo
ResolveTextViewMethod "dragDestSet" o = Gtk.Widget.WidgetDragDestSetMethodInfo
ResolveTextViewMethod "dragDestSetProxy" o = Gtk.Widget.WidgetDragDestSetProxyMethodInfo
ResolveTextViewMethod "dragDestSetTargetList" o = Gtk.Widget.WidgetDragDestSetTargetListMethodInfo
ResolveTextViewMethod "dragDestSetTrackMotion" o = Gtk.Widget.WidgetDragDestSetTrackMotionMethodInfo
ResolveTextViewMethod "dragDestUnset" o = Gtk.Widget.WidgetDragDestUnsetMethodInfo
ResolveTextViewMethod "dragGetData" o = Gtk.Widget.WidgetDragGetDataMethodInfo
ResolveTextViewMethod "dragHighlight" o = Gtk.Widget.WidgetDragHighlightMethodInfo
ResolveTextViewMethod "dragSourceAddImageTargets" o = Gtk.Widget.WidgetDragSourceAddImageTargetsMethodInfo
ResolveTextViewMethod "dragSourceAddTextTargets" o = Gtk.Widget.WidgetDragSourceAddTextTargetsMethodInfo
ResolveTextViewMethod "dragSourceAddUriTargets" o = Gtk.Widget.WidgetDragSourceAddUriTargetsMethodInfo
ResolveTextViewMethod "dragSourceGetTargetList" o = Gtk.Widget.WidgetDragSourceGetTargetListMethodInfo
ResolveTextViewMethod "dragSourceSet" o = Gtk.Widget.WidgetDragSourceSetMethodInfo
ResolveTextViewMethod "dragSourceSetIconGicon" o = Gtk.Widget.WidgetDragSourceSetIconGiconMethodInfo
ResolveTextViewMethod "dragSourceSetIconName" o = Gtk.Widget.WidgetDragSourceSetIconNameMethodInfo
ResolveTextViewMethod "dragSourceSetIconPixbuf" o = Gtk.Widget.WidgetDragSourceSetIconPixbufMethodInfo
ResolveTextViewMethod "dragSourceSetIconStock" o = Gtk.Widget.WidgetDragSourceSetIconStockMethodInfo
ResolveTextViewMethod "dragSourceSetTargetList" o = Gtk.Widget.WidgetDragSourceSetTargetListMethodInfo
ResolveTextViewMethod "dragSourceUnset" o = Gtk.Widget.WidgetDragSourceUnsetMethodInfo
ResolveTextViewMethod "dragUnhighlight" o = Gtk.Widget.WidgetDragUnhighlightMethodInfo
ResolveTextViewMethod "draw" o = Gtk.Widget.WidgetDrawMethodInfo
ResolveTextViewMethod "ensureStyle" o = Gtk.Widget.WidgetEnsureStyleMethodInfo
ResolveTextViewMethod "errorBell" o = Gtk.Widget.WidgetErrorBellMethodInfo
ResolveTextViewMethod "event" o = Gtk.Widget.WidgetEventMethodInfo
ResolveTextViewMethod "forall" o = Gtk.Container.ContainerForallMethodInfo
ResolveTextViewMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveTextViewMethod "foreach" o = Gtk.Container.ContainerForeachMethodInfo
ResolveTextViewMethod "forwardDisplayLine" o = TextViewForwardDisplayLineMethodInfo
ResolveTextViewMethod "forwardDisplayLineEnd" o = TextViewForwardDisplayLineEndMethodInfo
ResolveTextViewMethod "freezeChildNotify" o = Gtk.Widget.WidgetFreezeChildNotifyMethodInfo
ResolveTextViewMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveTextViewMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveTextViewMethod "grabAdd" o = Gtk.Widget.WidgetGrabAddMethodInfo
ResolveTextViewMethod "grabDefault" o = Gtk.Widget.WidgetGrabDefaultMethodInfo
ResolveTextViewMethod "grabFocus" o = Gtk.Widget.WidgetGrabFocusMethodInfo
ResolveTextViewMethod "grabRemove" o = Gtk.Widget.WidgetGrabRemoveMethodInfo
ResolveTextViewMethod "hasDefault" o = Gtk.Widget.WidgetHasDefaultMethodInfo
ResolveTextViewMethod "hasFocus" o = Gtk.Widget.WidgetHasFocusMethodInfo
ResolveTextViewMethod "hasGrab" o = Gtk.Widget.WidgetHasGrabMethodInfo
ResolveTextViewMethod "hasRcStyle" o = Gtk.Widget.WidgetHasRcStyleMethodInfo
ResolveTextViewMethod "hasScreen" o = Gtk.Widget.WidgetHasScreenMethodInfo
ResolveTextViewMethod "hasVisibleFocus" o = Gtk.Widget.WidgetHasVisibleFocusMethodInfo
ResolveTextViewMethod "hide" o = Gtk.Widget.WidgetHideMethodInfo
ResolveTextViewMethod "hideOnDelete" o = Gtk.Widget.WidgetHideOnDeleteMethodInfo
ResolveTextViewMethod "imContextFilterKeypress" o = TextViewImContextFilterKeypressMethodInfo
ResolveTextViewMethod "inDestruction" o = Gtk.Widget.WidgetInDestructionMethodInfo
ResolveTextViewMethod "initTemplate" o = Gtk.Widget.WidgetInitTemplateMethodInfo
ResolveTextViewMethod "inputShapeCombineRegion" o = Gtk.Widget.WidgetInputShapeCombineRegionMethodInfo
ResolveTextViewMethod "insertActionGroup" o = Gtk.Widget.WidgetInsertActionGroupMethodInfo
ResolveTextViewMethod "intersect" o = Gtk.Widget.WidgetIntersectMethodInfo
ResolveTextViewMethod "isAncestor" o = Gtk.Widget.WidgetIsAncestorMethodInfo
ResolveTextViewMethod "isComposited" o = Gtk.Widget.WidgetIsCompositedMethodInfo
ResolveTextViewMethod "isDrawable" o = Gtk.Widget.WidgetIsDrawableMethodInfo
ResolveTextViewMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveTextViewMethod "isFocus" o = Gtk.Widget.WidgetIsFocusMethodInfo
ResolveTextViewMethod "isSensitive" o = Gtk.Widget.WidgetIsSensitiveMethodInfo
ResolveTextViewMethod "isToplevel" o = Gtk.Widget.WidgetIsToplevelMethodInfo
ResolveTextViewMethod "isVisible" o = Gtk.Widget.WidgetIsVisibleMethodInfo
ResolveTextViewMethod "keynavFailed" o = Gtk.Widget.WidgetKeynavFailedMethodInfo
ResolveTextViewMethod "listAccelClosures" o = Gtk.Widget.WidgetListAccelClosuresMethodInfo
ResolveTextViewMethod "listActionPrefixes" o = Gtk.Widget.WidgetListActionPrefixesMethodInfo
ResolveTextViewMethod "listMnemonicLabels" o = Gtk.Widget.WidgetListMnemonicLabelsMethodInfo
ResolveTextViewMethod "map" o = Gtk.Widget.WidgetMapMethodInfo
ResolveTextViewMethod "mnemonicActivate" o = Gtk.Widget.WidgetMnemonicActivateMethodInfo
ResolveTextViewMethod "modifyBase" o = Gtk.Widget.WidgetModifyBaseMethodInfo
ResolveTextViewMethod "modifyBg" o = Gtk.Widget.WidgetModifyBgMethodInfo
ResolveTextViewMethod "modifyCursor" o = Gtk.Widget.WidgetModifyCursorMethodInfo
ResolveTextViewMethod "modifyFg" o = Gtk.Widget.WidgetModifyFgMethodInfo
ResolveTextViewMethod "modifyFont" o = Gtk.Widget.WidgetModifyFontMethodInfo
ResolveTextViewMethod "modifyStyle" o = Gtk.Widget.WidgetModifyStyleMethodInfo
ResolveTextViewMethod "modifyText" o = Gtk.Widget.WidgetModifyTextMethodInfo
ResolveTextViewMethod "moveChild" o = TextViewMoveChildMethodInfo
ResolveTextViewMethod "moveMarkOnscreen" o = TextViewMoveMarkOnscreenMethodInfo
ResolveTextViewMethod "moveVisually" o = TextViewMoveVisuallyMethodInfo
ResolveTextViewMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveTextViewMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveTextViewMethod "overrideBackgroundColor" o = Gtk.Widget.WidgetOverrideBackgroundColorMethodInfo
ResolveTextViewMethod "overrideColor" o = Gtk.Widget.WidgetOverrideColorMethodInfo
ResolveTextViewMethod "overrideCursor" o = Gtk.Widget.WidgetOverrideCursorMethodInfo
ResolveTextViewMethod "overrideFont" o = Gtk.Widget.WidgetOverrideFontMethodInfo
ResolveTextViewMethod "overrideSymbolicColor" o = Gtk.Widget.WidgetOverrideSymbolicColorMethodInfo
ResolveTextViewMethod "parserFinished" o = Gtk.Buildable.BuildableParserFinishedMethodInfo
ResolveTextViewMethod "path" o = Gtk.Widget.WidgetPathMethodInfo
ResolveTextViewMethod "placeCursorOnscreen" o = TextViewPlaceCursorOnscreenMethodInfo
ResolveTextViewMethod "propagateDraw" o = Gtk.Container.ContainerPropagateDrawMethodInfo
ResolveTextViewMethod "queueAllocate" o = Gtk.Widget.WidgetQueueAllocateMethodInfo
ResolveTextViewMethod "queueComputeExpand" o = Gtk.Widget.WidgetQueueComputeExpandMethodInfo
ResolveTextViewMethod "queueDraw" o = Gtk.Widget.WidgetQueueDrawMethodInfo
ResolveTextViewMethod "queueDrawArea" o = Gtk.Widget.WidgetQueueDrawAreaMethodInfo
ResolveTextViewMethod "queueDrawRegion" o = Gtk.Widget.WidgetQueueDrawRegionMethodInfo
ResolveTextViewMethod "queueResize" o = Gtk.Widget.WidgetQueueResizeMethodInfo
ResolveTextViewMethod "queueResizeNoRedraw" o = Gtk.Widget.WidgetQueueResizeNoRedrawMethodInfo
ResolveTextViewMethod "realize" o = Gtk.Widget.WidgetRealizeMethodInfo
ResolveTextViewMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveTextViewMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveTextViewMethod "regionIntersect" o = Gtk.Widget.WidgetRegionIntersectMethodInfo
ResolveTextViewMethod "registerWindow" o = Gtk.Widget.WidgetRegisterWindowMethodInfo
ResolveTextViewMethod "remove" o = Gtk.Container.ContainerRemoveMethodInfo
ResolveTextViewMethod "removeAccelerator" o = Gtk.Widget.WidgetRemoveAcceleratorMethodInfo
ResolveTextViewMethod "removeMnemonicLabel" o = Gtk.Widget.WidgetRemoveMnemonicLabelMethodInfo
ResolveTextViewMethod "removeTickCallback" o = Gtk.Widget.WidgetRemoveTickCallbackMethodInfo
ResolveTextViewMethod "renderIcon" o = Gtk.Widget.WidgetRenderIconMethodInfo
ResolveTextViewMethod "renderIconPixbuf" o = Gtk.Widget.WidgetRenderIconPixbufMethodInfo
ResolveTextViewMethod "reparent" o = Gtk.Widget.WidgetReparentMethodInfo
ResolveTextViewMethod "resetCursorBlink" o = TextViewResetCursorBlinkMethodInfo
ResolveTextViewMethod "resetImContext" o = TextViewResetImContextMethodInfo
ResolveTextViewMethod "resetRcStyles" o = Gtk.Widget.WidgetResetRcStylesMethodInfo
ResolveTextViewMethod "resetStyle" o = Gtk.Widget.WidgetResetStyleMethodInfo
ResolveTextViewMethod "resizeChildren" o = Gtk.Container.ContainerResizeChildrenMethodInfo
ResolveTextViewMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveTextViewMethod "scrollMarkOnscreen" o = TextViewScrollMarkOnscreenMethodInfo
ResolveTextViewMethod "scrollToIter" o = TextViewScrollToIterMethodInfo
ResolveTextViewMethod "scrollToMark" o = TextViewScrollToMarkMethodInfo
ResolveTextViewMethod "sendExpose" o = Gtk.Widget.WidgetSendExposeMethodInfo
ResolveTextViewMethod "sendFocusChange" o = Gtk.Widget.WidgetSendFocusChangeMethodInfo
ResolveTextViewMethod "shapeCombineRegion" o = Gtk.Widget.WidgetShapeCombineRegionMethodInfo
ResolveTextViewMethod "show" o = Gtk.Widget.WidgetShowMethodInfo
ResolveTextViewMethod "showAll" o = Gtk.Widget.WidgetShowAllMethodInfo
ResolveTextViewMethod "showNow" o = Gtk.Widget.WidgetShowNowMethodInfo
ResolveTextViewMethod "sizeAllocate" o = Gtk.Widget.WidgetSizeAllocateMethodInfo
ResolveTextViewMethod "sizeAllocateWithBaseline" o = Gtk.Widget.WidgetSizeAllocateWithBaselineMethodInfo
ResolveTextViewMethod "sizeRequest" o = Gtk.Widget.WidgetSizeRequestMethodInfo
ResolveTextViewMethod "startsDisplayLine" o = TextViewStartsDisplayLineMethodInfo
ResolveTextViewMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveTextViewMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveTextViewMethod "styleAttach" o = Gtk.Widget.WidgetStyleAttachMethodInfo
ResolveTextViewMethod "styleGetProperty" o = Gtk.Widget.WidgetStyleGetPropertyMethodInfo
ResolveTextViewMethod "thawChildNotify" o = Gtk.Widget.WidgetThawChildNotifyMethodInfo
ResolveTextViewMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveTextViewMethod "translateCoordinates" o = Gtk.Widget.WidgetTranslateCoordinatesMethodInfo
ResolveTextViewMethod "triggerTooltipQuery" o = Gtk.Widget.WidgetTriggerTooltipQueryMethodInfo
ResolveTextViewMethod "unmap" o = Gtk.Widget.WidgetUnmapMethodInfo
ResolveTextViewMethod "unparent" o = Gtk.Widget.WidgetUnparentMethodInfo
ResolveTextViewMethod "unrealize" o = Gtk.Widget.WidgetUnrealizeMethodInfo
ResolveTextViewMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveTextViewMethod "unregisterWindow" o = Gtk.Widget.WidgetUnregisterWindowMethodInfo
ResolveTextViewMethod "unsetFocusChain" o = Gtk.Container.ContainerUnsetFocusChainMethodInfo
ResolveTextViewMethod "unsetStateFlags" o = Gtk.Widget.WidgetUnsetStateFlagsMethodInfo
ResolveTextViewMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveTextViewMethod "windowToBufferCoords" o = TextViewWindowToBufferCoordsMethodInfo
ResolveTextViewMethod "getAcceptsTab" o = TextViewGetAcceptsTabMethodInfo
ResolveTextViewMethod "getAccessible" o = Gtk.Widget.WidgetGetAccessibleMethodInfo
ResolveTextViewMethod "getActionGroup" o = Gtk.Widget.WidgetGetActionGroupMethodInfo
ResolveTextViewMethod "getAllocatedBaseline" o = Gtk.Widget.WidgetGetAllocatedBaselineMethodInfo
ResolveTextViewMethod "getAllocatedHeight" o = Gtk.Widget.WidgetGetAllocatedHeightMethodInfo
ResolveTextViewMethod "getAllocatedSize" o = Gtk.Widget.WidgetGetAllocatedSizeMethodInfo
ResolveTextViewMethod "getAllocatedWidth" o = Gtk.Widget.WidgetGetAllocatedWidthMethodInfo
ResolveTextViewMethod "getAllocation" o = Gtk.Widget.WidgetGetAllocationMethodInfo
ResolveTextViewMethod "getAncestor" o = Gtk.Widget.WidgetGetAncestorMethodInfo
ResolveTextViewMethod "getAppPaintable" o = Gtk.Widget.WidgetGetAppPaintableMethodInfo
ResolveTextViewMethod "getBorder" o = Gtk.Scrollable.ScrollableGetBorderMethodInfo
ResolveTextViewMethod "getBorderWidth" o = Gtk.Container.ContainerGetBorderWidthMethodInfo
ResolveTextViewMethod "getBorderWindowSize" o = TextViewGetBorderWindowSizeMethodInfo
ResolveTextViewMethod "getBottomMargin" o = TextViewGetBottomMarginMethodInfo
ResolveTextViewMethod "getBuffer" o = TextViewGetBufferMethodInfo
ResolveTextViewMethod "getCanDefault" o = Gtk.Widget.WidgetGetCanDefaultMethodInfo
ResolveTextViewMethod "getCanFocus" o = Gtk.Widget.WidgetGetCanFocusMethodInfo
ResolveTextViewMethod "getChildRequisition" o = Gtk.Widget.WidgetGetChildRequisitionMethodInfo
ResolveTextViewMethod "getChildVisible" o = Gtk.Widget.WidgetGetChildVisibleMethodInfo
ResolveTextViewMethod "getChildren" o = Gtk.Container.ContainerGetChildrenMethodInfo
ResolveTextViewMethod "getClip" o = Gtk.Widget.WidgetGetClipMethodInfo
ResolveTextViewMethod "getClipboard" o = Gtk.Widget.WidgetGetClipboardMethodInfo
ResolveTextViewMethod "getCompositeName" o = Gtk.Widget.WidgetGetCompositeNameMethodInfo
ResolveTextViewMethod "getCursorLocations" o = TextViewGetCursorLocationsMethodInfo
ResolveTextViewMethod "getCursorVisible" o = TextViewGetCursorVisibleMethodInfo
ResolveTextViewMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveTextViewMethod "getDefaultAttributes" o = TextViewGetDefaultAttributesMethodInfo
ResolveTextViewMethod "getDeviceEnabled" o = Gtk.Widget.WidgetGetDeviceEnabledMethodInfo
ResolveTextViewMethod "getDeviceEvents" o = Gtk.Widget.WidgetGetDeviceEventsMethodInfo
ResolveTextViewMethod "getDirection" o = Gtk.Widget.WidgetGetDirectionMethodInfo
ResolveTextViewMethod "getDisplay" o = Gtk.Widget.WidgetGetDisplayMethodInfo
ResolveTextViewMethod "getDoubleBuffered" o = Gtk.Widget.WidgetGetDoubleBufferedMethodInfo
ResolveTextViewMethod "getEditable" o = TextViewGetEditableMethodInfo
ResolveTextViewMethod "getEvents" o = Gtk.Widget.WidgetGetEventsMethodInfo
ResolveTextViewMethod "getFocusChain" o = Gtk.Container.ContainerGetFocusChainMethodInfo
ResolveTextViewMethod "getFocusChild" o = Gtk.Container.ContainerGetFocusChildMethodInfo
ResolveTextViewMethod "getFocusHadjustment" o = Gtk.Container.ContainerGetFocusHadjustmentMethodInfo
ResolveTextViewMethod "getFocusOnClick" o = Gtk.Widget.WidgetGetFocusOnClickMethodInfo
ResolveTextViewMethod "getFocusVadjustment" o = Gtk.Container.ContainerGetFocusVadjustmentMethodInfo
ResolveTextViewMethod "getFontMap" o = Gtk.Widget.WidgetGetFontMapMethodInfo
ResolveTextViewMethod "getFontOptions" o = Gtk.Widget.WidgetGetFontOptionsMethodInfo
ResolveTextViewMethod "getFrameClock" o = Gtk.Widget.WidgetGetFrameClockMethodInfo
ResolveTextViewMethod "getHadjustment" o = TextViewGetHadjustmentMethodInfo
ResolveTextViewMethod "getHalign" o = Gtk.Widget.WidgetGetHalignMethodInfo
ResolveTextViewMethod "getHasTooltip" o = Gtk.Widget.WidgetGetHasTooltipMethodInfo
ResolveTextViewMethod "getHasWindow" o = Gtk.Widget.WidgetGetHasWindowMethodInfo
ResolveTextViewMethod "getHexpand" o = Gtk.Widget.WidgetGetHexpandMethodInfo
ResolveTextViewMethod "getHexpandSet" o = Gtk.Widget.WidgetGetHexpandSetMethodInfo
ResolveTextViewMethod "getHscrollPolicy" o = Gtk.Scrollable.ScrollableGetHscrollPolicyMethodInfo
ResolveTextViewMethod "getIndent" o = TextViewGetIndentMethodInfo
ResolveTextViewMethod "getInputHints" o = TextViewGetInputHintsMethodInfo
ResolveTextViewMethod "getInputPurpose" o = TextViewGetInputPurposeMethodInfo
ResolveTextViewMethod "getInternalChild" o = Gtk.Buildable.BuildableGetInternalChildMethodInfo
ResolveTextViewMethod "getIterAtLocation" o = TextViewGetIterAtLocationMethodInfo
ResolveTextViewMethod "getIterAtPosition" o = TextViewGetIterAtPositionMethodInfo
ResolveTextViewMethod "getIterLocation" o = TextViewGetIterLocationMethodInfo
ResolveTextViewMethod "getJustification" o = TextViewGetJustificationMethodInfo
ResolveTextViewMethod "getLeftMargin" o = TextViewGetLeftMarginMethodInfo
ResolveTextViewMethod "getLineAtY" o = TextViewGetLineAtYMethodInfo
ResolveTextViewMethod "getLineYrange" o = TextViewGetLineYrangeMethodInfo
ResolveTextViewMethod "getMapped" o = Gtk.Widget.WidgetGetMappedMethodInfo
ResolveTextViewMethod "getMarginBottom" o = Gtk.Widget.WidgetGetMarginBottomMethodInfo
ResolveTextViewMethod "getMarginEnd" o = Gtk.Widget.WidgetGetMarginEndMethodInfo
ResolveTextViewMethod "getMarginLeft" o = Gtk.Widget.WidgetGetMarginLeftMethodInfo
ResolveTextViewMethod "getMarginRight" o = Gtk.Widget.WidgetGetMarginRightMethodInfo
ResolveTextViewMethod "getMarginStart" o = Gtk.Widget.WidgetGetMarginStartMethodInfo
ResolveTextViewMethod "getMarginTop" o = Gtk.Widget.WidgetGetMarginTopMethodInfo
ResolveTextViewMethod "getModifierMask" o = Gtk.Widget.WidgetGetModifierMaskMethodInfo
ResolveTextViewMethod "getModifierStyle" o = Gtk.Widget.WidgetGetModifierStyleMethodInfo
ResolveTextViewMethod "getMonospace" o = TextViewGetMonospaceMethodInfo
ResolveTextViewMethod "getName" o = Gtk.Widget.WidgetGetNameMethodInfo
ResolveTextViewMethod "getNoShowAll" o = Gtk.Widget.WidgetGetNoShowAllMethodInfo
ResolveTextViewMethod "getOpacity" o = Gtk.Widget.WidgetGetOpacityMethodInfo
ResolveTextViewMethod "getOverwrite" o = TextViewGetOverwriteMethodInfo
ResolveTextViewMethod "getPangoContext" o = Gtk.Widget.WidgetGetPangoContextMethodInfo
ResolveTextViewMethod "getParent" o = Gtk.Widget.WidgetGetParentMethodInfo
ResolveTextViewMethod "getParentWindow" o = Gtk.Widget.WidgetGetParentWindowMethodInfo
ResolveTextViewMethod "getPath" o = Gtk.Widget.WidgetGetPathMethodInfo
ResolveTextViewMethod "getPathForChild" o = Gtk.Container.ContainerGetPathForChildMethodInfo
ResolveTextViewMethod "getPixelsAboveLines" o = TextViewGetPixelsAboveLinesMethodInfo
ResolveTextViewMethod "getPixelsBelowLines" o = TextViewGetPixelsBelowLinesMethodInfo
ResolveTextViewMethod "getPixelsInsideWrap" o = TextViewGetPixelsInsideWrapMethodInfo
ResolveTextViewMethod "getPointer" o = Gtk.Widget.WidgetGetPointerMethodInfo
ResolveTextViewMethod "getPreferredHeight" o = Gtk.Widget.WidgetGetPreferredHeightMethodInfo
ResolveTextViewMethod "getPreferredHeightAndBaselineForWidth" o = Gtk.Widget.WidgetGetPreferredHeightAndBaselineForWidthMethodInfo
ResolveTextViewMethod "getPreferredHeightForWidth" o = Gtk.Widget.WidgetGetPreferredHeightForWidthMethodInfo
ResolveTextViewMethod "getPreferredSize" o = Gtk.Widget.WidgetGetPreferredSizeMethodInfo
ResolveTextViewMethod "getPreferredWidth" o = Gtk.Widget.WidgetGetPreferredWidthMethodInfo
ResolveTextViewMethod "getPreferredWidthForHeight" o = Gtk.Widget.WidgetGetPreferredWidthForHeightMethodInfo
ResolveTextViewMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveTextViewMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveTextViewMethod "getRealized" o = Gtk.Widget.WidgetGetRealizedMethodInfo
ResolveTextViewMethod "getReceivesDefault" o = Gtk.Widget.WidgetGetReceivesDefaultMethodInfo
ResolveTextViewMethod "getRequestMode" o = Gtk.Widget.WidgetGetRequestModeMethodInfo
ResolveTextViewMethod "getRequisition" o = Gtk.Widget.WidgetGetRequisitionMethodInfo
ResolveTextViewMethod "getResizeMode" o = Gtk.Container.ContainerGetResizeModeMethodInfo
ResolveTextViewMethod "getRightMargin" o = TextViewGetRightMarginMethodInfo
ResolveTextViewMethod "getRootWindow" o = Gtk.Widget.WidgetGetRootWindowMethodInfo
ResolveTextViewMethod "getScaleFactor" o = Gtk.Widget.WidgetGetScaleFactorMethodInfo
ResolveTextViewMethod "getScreen" o = Gtk.Widget.WidgetGetScreenMethodInfo
ResolveTextViewMethod "getSensitive" o = Gtk.Widget.WidgetGetSensitiveMethodInfo
ResolveTextViewMethod "getSettings" o = Gtk.Widget.WidgetGetSettingsMethodInfo
ResolveTextViewMethod "getSizeRequest" o = Gtk.Widget.WidgetGetSizeRequestMethodInfo
ResolveTextViewMethod "getState" o = Gtk.Widget.WidgetGetStateMethodInfo
ResolveTextViewMethod "getStateFlags" o = Gtk.Widget.WidgetGetStateFlagsMethodInfo
ResolveTextViewMethod "getStyle" o = Gtk.Widget.WidgetGetStyleMethodInfo
ResolveTextViewMethod "getStyleContext" o = Gtk.Widget.WidgetGetStyleContextMethodInfo
ResolveTextViewMethod "getSupportMultidevice" o = Gtk.Widget.WidgetGetSupportMultideviceMethodInfo
ResolveTextViewMethod "getTabs" o = TextViewGetTabsMethodInfo
ResolveTextViewMethod "getTemplateChild" o = Gtk.Widget.WidgetGetTemplateChildMethodInfo
ResolveTextViewMethod "getTooltipMarkup" o = Gtk.Widget.WidgetGetTooltipMarkupMethodInfo
ResolveTextViewMethod "getTooltipText" o = Gtk.Widget.WidgetGetTooltipTextMethodInfo
ResolveTextViewMethod "getTooltipWindow" o = Gtk.Widget.WidgetGetTooltipWindowMethodInfo
ResolveTextViewMethod "getTopMargin" o = TextViewGetTopMarginMethodInfo
ResolveTextViewMethod "getToplevel" o = Gtk.Widget.WidgetGetToplevelMethodInfo
ResolveTextViewMethod "getVadjustment" o = TextViewGetVadjustmentMethodInfo
ResolveTextViewMethod "getValign" o = Gtk.Widget.WidgetGetValignMethodInfo
ResolveTextViewMethod "getValignWithBaseline" o = Gtk.Widget.WidgetGetValignWithBaselineMethodInfo
ResolveTextViewMethod "getVexpand" o = Gtk.Widget.WidgetGetVexpandMethodInfo
ResolveTextViewMethod "getVexpandSet" o = Gtk.Widget.WidgetGetVexpandSetMethodInfo
ResolveTextViewMethod "getVisible" o = Gtk.Widget.WidgetGetVisibleMethodInfo
ResolveTextViewMethod "getVisibleRect" o = TextViewGetVisibleRectMethodInfo
ResolveTextViewMethod "getVisual" o = Gtk.Widget.WidgetGetVisualMethodInfo
ResolveTextViewMethod "getVscrollPolicy" o = Gtk.Scrollable.ScrollableGetVscrollPolicyMethodInfo
ResolveTextViewMethod "getWindow" o = TextViewGetWindowMethodInfo
ResolveTextViewMethod "getWindowType" o = TextViewGetWindowTypeMethodInfo
ResolveTextViewMethod "getWrapMode" o = TextViewGetWrapModeMethodInfo
ResolveTextViewMethod "setAccelPath" o = Gtk.Widget.WidgetSetAccelPathMethodInfo
ResolveTextViewMethod "setAcceptsTab" o = TextViewSetAcceptsTabMethodInfo
ResolveTextViewMethod "setAllocation" o = Gtk.Widget.WidgetSetAllocationMethodInfo
ResolveTextViewMethod "setAppPaintable" o = Gtk.Widget.WidgetSetAppPaintableMethodInfo
ResolveTextViewMethod "setBorderWidth" o = Gtk.Container.ContainerSetBorderWidthMethodInfo
ResolveTextViewMethod "setBorderWindowSize" o = TextViewSetBorderWindowSizeMethodInfo
ResolveTextViewMethod "setBottomMargin" o = TextViewSetBottomMarginMethodInfo
ResolveTextViewMethod "setBuffer" o = TextViewSetBufferMethodInfo
ResolveTextViewMethod "setBuildableProperty" o = Gtk.Buildable.BuildableSetBuildablePropertyMethodInfo
ResolveTextViewMethod "setCanDefault" o = Gtk.Widget.WidgetSetCanDefaultMethodInfo
ResolveTextViewMethod "setCanFocus" o = Gtk.Widget.WidgetSetCanFocusMethodInfo
ResolveTextViewMethod "setChildVisible" o = Gtk.Widget.WidgetSetChildVisibleMethodInfo
ResolveTextViewMethod "setClip" o = Gtk.Widget.WidgetSetClipMethodInfo
ResolveTextViewMethod "setCompositeName" o = Gtk.Widget.WidgetSetCompositeNameMethodInfo
ResolveTextViewMethod "setCursorVisible" o = TextViewSetCursorVisibleMethodInfo
ResolveTextViewMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveTextViewMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveTextViewMethod "setDeviceEnabled" o = Gtk.Widget.WidgetSetDeviceEnabledMethodInfo
ResolveTextViewMethod "setDeviceEvents" o = Gtk.Widget.WidgetSetDeviceEventsMethodInfo
ResolveTextViewMethod "setDirection" o = Gtk.Widget.WidgetSetDirectionMethodInfo
ResolveTextViewMethod "setDoubleBuffered" o = Gtk.Widget.WidgetSetDoubleBufferedMethodInfo
ResolveTextViewMethod "setEditable" o = TextViewSetEditableMethodInfo
ResolveTextViewMethod "setEvents" o = Gtk.Widget.WidgetSetEventsMethodInfo
ResolveTextViewMethod "setFocusChain" o = Gtk.Container.ContainerSetFocusChainMethodInfo
ResolveTextViewMethod "setFocusChild" o = Gtk.Container.ContainerSetFocusChildMethodInfo
ResolveTextViewMethod "setFocusHadjustment" o = Gtk.Container.ContainerSetFocusHadjustmentMethodInfo
ResolveTextViewMethod "setFocusOnClick" o = Gtk.Widget.WidgetSetFocusOnClickMethodInfo
ResolveTextViewMethod "setFocusVadjustment" o = Gtk.Container.ContainerSetFocusVadjustmentMethodInfo
ResolveTextViewMethod "setFontMap" o = Gtk.Widget.WidgetSetFontMapMethodInfo
ResolveTextViewMethod "setFontOptions" o = Gtk.Widget.WidgetSetFontOptionsMethodInfo
ResolveTextViewMethod "setHadjustment" o = Gtk.Scrollable.ScrollableSetHadjustmentMethodInfo
ResolveTextViewMethod "setHalign" o = Gtk.Widget.WidgetSetHalignMethodInfo
ResolveTextViewMethod "setHasTooltip" o = Gtk.Widget.WidgetSetHasTooltipMethodInfo
ResolveTextViewMethod "setHasWindow" o = Gtk.Widget.WidgetSetHasWindowMethodInfo
ResolveTextViewMethod "setHexpand" o = Gtk.Widget.WidgetSetHexpandMethodInfo
ResolveTextViewMethod "setHexpandSet" o = Gtk.Widget.WidgetSetHexpandSetMethodInfo
ResolveTextViewMethod "setHscrollPolicy" o = Gtk.Scrollable.ScrollableSetHscrollPolicyMethodInfo
ResolveTextViewMethod "setIndent" o = TextViewSetIndentMethodInfo
ResolveTextViewMethod "setInputHints" o = TextViewSetInputHintsMethodInfo
ResolveTextViewMethod "setInputPurpose" o = TextViewSetInputPurposeMethodInfo
ResolveTextViewMethod "setJustification" o = TextViewSetJustificationMethodInfo
ResolveTextViewMethod "setLeftMargin" o = TextViewSetLeftMarginMethodInfo
ResolveTextViewMethod "setMapped" o = Gtk.Widget.WidgetSetMappedMethodInfo
ResolveTextViewMethod "setMarginBottom" o = Gtk.Widget.WidgetSetMarginBottomMethodInfo
ResolveTextViewMethod "setMarginEnd" o = Gtk.Widget.WidgetSetMarginEndMethodInfo
ResolveTextViewMethod "setMarginLeft" o = Gtk.Widget.WidgetSetMarginLeftMethodInfo
ResolveTextViewMethod "setMarginRight" o = Gtk.Widget.WidgetSetMarginRightMethodInfo
ResolveTextViewMethod "setMarginStart" o = Gtk.Widget.WidgetSetMarginStartMethodInfo
ResolveTextViewMethod "setMarginTop" o = Gtk.Widget.WidgetSetMarginTopMethodInfo
ResolveTextViewMethod "setMonospace" o = TextViewSetMonospaceMethodInfo
ResolveTextViewMethod "setName" o = Gtk.Widget.WidgetSetNameMethodInfo
ResolveTextViewMethod "setNoShowAll" o = Gtk.Widget.WidgetSetNoShowAllMethodInfo
ResolveTextViewMethod "setOpacity" o = Gtk.Widget.WidgetSetOpacityMethodInfo
ResolveTextViewMethod "setOverwrite" o = TextViewSetOverwriteMethodInfo
ResolveTextViewMethod "setParent" o = Gtk.Widget.WidgetSetParentMethodInfo
ResolveTextViewMethod "setParentWindow" o = Gtk.Widget.WidgetSetParentWindowMethodInfo
ResolveTextViewMethod "setPixelsAboveLines" o = TextViewSetPixelsAboveLinesMethodInfo
ResolveTextViewMethod "setPixelsBelowLines" o = TextViewSetPixelsBelowLinesMethodInfo
ResolveTextViewMethod "setPixelsInsideWrap" o = TextViewSetPixelsInsideWrapMethodInfo
ResolveTextViewMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveTextViewMethod "setRealized" o = Gtk.Widget.WidgetSetRealizedMethodInfo
ResolveTextViewMethod "setReallocateRedraws" o = Gtk.Container.ContainerSetReallocateRedrawsMethodInfo
ResolveTextViewMethod "setReceivesDefault" o = Gtk.Widget.WidgetSetReceivesDefaultMethodInfo
ResolveTextViewMethod "setRedrawOnAllocate" o = Gtk.Widget.WidgetSetRedrawOnAllocateMethodInfo
ResolveTextViewMethod "setResizeMode" o = Gtk.Container.ContainerSetResizeModeMethodInfo
ResolveTextViewMethod "setRightMargin" o = TextViewSetRightMarginMethodInfo
ResolveTextViewMethod "setSensitive" o = Gtk.Widget.WidgetSetSensitiveMethodInfo
ResolveTextViewMethod "setSizeRequest" o = Gtk.Widget.WidgetSetSizeRequestMethodInfo
ResolveTextViewMethod "setState" o = Gtk.Widget.WidgetSetStateMethodInfo
ResolveTextViewMethod "setStateFlags" o = Gtk.Widget.WidgetSetStateFlagsMethodInfo
ResolveTextViewMethod "setStyle" o = Gtk.Widget.WidgetSetStyleMethodInfo
ResolveTextViewMethod "setSupportMultidevice" o = Gtk.Widget.WidgetSetSupportMultideviceMethodInfo
ResolveTextViewMethod "setTabs" o = TextViewSetTabsMethodInfo
ResolveTextViewMethod "setTooltipMarkup" o = Gtk.Widget.WidgetSetTooltipMarkupMethodInfo
ResolveTextViewMethod "setTooltipText" o = Gtk.Widget.WidgetSetTooltipTextMethodInfo
ResolveTextViewMethod "setTooltipWindow" o = Gtk.Widget.WidgetSetTooltipWindowMethodInfo
ResolveTextViewMethod "setTopMargin" o = TextViewSetTopMarginMethodInfo
ResolveTextViewMethod "setVadjustment" o = Gtk.Scrollable.ScrollableSetVadjustmentMethodInfo
ResolveTextViewMethod "setValign" o = Gtk.Widget.WidgetSetValignMethodInfo
ResolveTextViewMethod "setVexpand" o = Gtk.Widget.WidgetSetVexpandMethodInfo
ResolveTextViewMethod "setVexpandSet" o = Gtk.Widget.WidgetSetVexpandSetMethodInfo
ResolveTextViewMethod "setVisible" o = Gtk.Widget.WidgetSetVisibleMethodInfo
ResolveTextViewMethod "setVisual" o = Gtk.Widget.WidgetSetVisualMethodInfo
ResolveTextViewMethod "setVscrollPolicy" o = Gtk.Scrollable.ScrollableSetVscrollPolicyMethodInfo
ResolveTextViewMethod "setWindow" o = Gtk.Widget.WidgetSetWindowMethodInfo
ResolveTextViewMethod "setWrapMode" o = TextViewSetWrapModeMethodInfo
ResolveTextViewMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveTextViewMethod t TextView, O.MethodInfo info TextView p) => OL.IsLabel t (TextView -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#else
fromLabel _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#endif
#endif
type TextViewBackspaceCallback =
IO ()
noTextViewBackspaceCallback :: Maybe TextViewBackspaceCallback
noTextViewBackspaceCallback = Nothing
type C_TextViewBackspaceCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_TextViewBackspaceCallback :: C_TextViewBackspaceCallback -> IO (FunPtr C_TextViewBackspaceCallback)
genClosure_TextViewBackspace :: MonadIO m => TextViewBackspaceCallback -> m (GClosure C_TextViewBackspaceCallback)
genClosure_TextViewBackspace cb = liftIO $ do
let cb' = wrap_TextViewBackspaceCallback cb
mk_TextViewBackspaceCallback cb' >>= B.GClosure.newGClosure
wrap_TextViewBackspaceCallback ::
TextViewBackspaceCallback ->
C_TextViewBackspaceCallback
wrap_TextViewBackspaceCallback _cb _ _ = do
_cb
onTextViewBackspace :: (IsTextView a, MonadIO m) => a -> TextViewBackspaceCallback -> m SignalHandlerId
onTextViewBackspace obj cb = liftIO $ do
let cb' = wrap_TextViewBackspaceCallback cb
cb'' <- mk_TextViewBackspaceCallback cb'
connectSignalFunPtr obj "backspace" cb'' SignalConnectBefore
afterTextViewBackspace :: (IsTextView a, MonadIO m) => a -> TextViewBackspaceCallback -> m SignalHandlerId
afterTextViewBackspace obj cb = liftIO $ do
let cb' = wrap_TextViewBackspaceCallback cb
cb'' <- mk_TextViewBackspaceCallback cb'
connectSignalFunPtr obj "backspace" cb'' SignalConnectAfter
type TextViewCopyClipboardCallback =
IO ()
noTextViewCopyClipboardCallback :: Maybe TextViewCopyClipboardCallback
noTextViewCopyClipboardCallback = Nothing
type C_TextViewCopyClipboardCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_TextViewCopyClipboardCallback :: C_TextViewCopyClipboardCallback -> IO (FunPtr C_TextViewCopyClipboardCallback)
genClosure_TextViewCopyClipboard :: MonadIO m => TextViewCopyClipboardCallback -> m (GClosure C_TextViewCopyClipboardCallback)
genClosure_TextViewCopyClipboard cb = liftIO $ do
let cb' = wrap_TextViewCopyClipboardCallback cb
mk_TextViewCopyClipboardCallback cb' >>= B.GClosure.newGClosure
wrap_TextViewCopyClipboardCallback ::
TextViewCopyClipboardCallback ->
C_TextViewCopyClipboardCallback
wrap_TextViewCopyClipboardCallback _cb _ _ = do
_cb
onTextViewCopyClipboard :: (IsTextView a, MonadIO m) => a -> TextViewCopyClipboardCallback -> m SignalHandlerId
onTextViewCopyClipboard obj cb = liftIO $ do
let cb' = wrap_TextViewCopyClipboardCallback cb
cb'' <- mk_TextViewCopyClipboardCallback cb'
connectSignalFunPtr obj "copy-clipboard" cb'' SignalConnectBefore
afterTextViewCopyClipboard :: (IsTextView a, MonadIO m) => a -> TextViewCopyClipboardCallback -> m SignalHandlerId
afterTextViewCopyClipboard obj cb = liftIO $ do
let cb' = wrap_TextViewCopyClipboardCallback cb
cb'' <- mk_TextViewCopyClipboardCallback cb'
connectSignalFunPtr obj "copy-clipboard" cb'' SignalConnectAfter
type TextViewCutClipboardCallback =
IO ()
noTextViewCutClipboardCallback :: Maybe TextViewCutClipboardCallback
noTextViewCutClipboardCallback = Nothing
type C_TextViewCutClipboardCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_TextViewCutClipboardCallback :: C_TextViewCutClipboardCallback -> IO (FunPtr C_TextViewCutClipboardCallback)
genClosure_TextViewCutClipboard :: MonadIO m => TextViewCutClipboardCallback -> m (GClosure C_TextViewCutClipboardCallback)
genClosure_TextViewCutClipboard cb = liftIO $ do
let cb' = wrap_TextViewCutClipboardCallback cb
mk_TextViewCutClipboardCallback cb' >>= B.GClosure.newGClosure
wrap_TextViewCutClipboardCallback ::
TextViewCutClipboardCallback ->
C_TextViewCutClipboardCallback
wrap_TextViewCutClipboardCallback _cb _ _ = do
_cb
onTextViewCutClipboard :: (IsTextView a, MonadIO m) => a -> TextViewCutClipboardCallback -> m SignalHandlerId
onTextViewCutClipboard obj cb = liftIO $ do
let cb' = wrap_TextViewCutClipboardCallback cb
cb'' <- mk_TextViewCutClipboardCallback cb'
connectSignalFunPtr obj "cut-clipboard" cb'' SignalConnectBefore
afterTextViewCutClipboard :: (IsTextView a, MonadIO m) => a -> TextViewCutClipboardCallback -> m SignalHandlerId
afterTextViewCutClipboard obj cb = liftIO $ do
let cb' = wrap_TextViewCutClipboardCallback cb
cb'' <- mk_TextViewCutClipboardCallback cb'
connectSignalFunPtr obj "cut-clipboard" cb'' SignalConnectAfter
type TextViewDeleteFromCursorCallback =
Gtk.Enums.DeleteType
-> Int32
-> IO ()
noTextViewDeleteFromCursorCallback :: Maybe TextViewDeleteFromCursorCallback
noTextViewDeleteFromCursorCallback = Nothing
type C_TextViewDeleteFromCursorCallback =
Ptr () ->
CUInt ->
Int32 ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_TextViewDeleteFromCursorCallback :: C_TextViewDeleteFromCursorCallback -> IO (FunPtr C_TextViewDeleteFromCursorCallback)
genClosure_TextViewDeleteFromCursor :: MonadIO m => TextViewDeleteFromCursorCallback -> m (GClosure C_TextViewDeleteFromCursorCallback)
genClosure_TextViewDeleteFromCursor cb = liftIO $ do
let cb' = wrap_TextViewDeleteFromCursorCallback cb
mk_TextViewDeleteFromCursorCallback cb' >>= B.GClosure.newGClosure
wrap_TextViewDeleteFromCursorCallback ::
TextViewDeleteFromCursorCallback ->
C_TextViewDeleteFromCursorCallback
wrap_TextViewDeleteFromCursorCallback _cb _ type_ count _ = do
let type_' = (toEnum . fromIntegral) type_
_cb type_' count
onTextViewDeleteFromCursor :: (IsTextView a, MonadIO m) => a -> TextViewDeleteFromCursorCallback -> m SignalHandlerId
onTextViewDeleteFromCursor obj cb = liftIO $ do
let cb' = wrap_TextViewDeleteFromCursorCallback cb
cb'' <- mk_TextViewDeleteFromCursorCallback cb'
connectSignalFunPtr obj "delete-from-cursor" cb'' SignalConnectBefore
afterTextViewDeleteFromCursor :: (IsTextView a, MonadIO m) => a -> TextViewDeleteFromCursorCallback -> m SignalHandlerId
afterTextViewDeleteFromCursor obj cb = liftIO $ do
let cb' = wrap_TextViewDeleteFromCursorCallback cb
cb'' <- mk_TextViewDeleteFromCursorCallback cb'
connectSignalFunPtr obj "delete-from-cursor" cb'' SignalConnectAfter
type TextViewExtendSelectionCallback =
Gtk.Enums.TextExtendSelection
-> Gtk.TextIter.TextIter
-> Gtk.TextIter.TextIter
-> Gtk.TextIter.TextIter
-> IO Bool
noTextViewExtendSelectionCallback :: Maybe TextViewExtendSelectionCallback
noTextViewExtendSelectionCallback = Nothing
type C_TextViewExtendSelectionCallback =
Ptr () ->
CUInt ->
Ptr Gtk.TextIter.TextIter ->
Ptr Gtk.TextIter.TextIter ->
Ptr Gtk.TextIter.TextIter ->
Ptr () ->
IO CInt
foreign import ccall "wrapper"
mk_TextViewExtendSelectionCallback :: C_TextViewExtendSelectionCallback -> IO (FunPtr C_TextViewExtendSelectionCallback)
genClosure_TextViewExtendSelection :: MonadIO m => TextViewExtendSelectionCallback -> m (GClosure C_TextViewExtendSelectionCallback)
genClosure_TextViewExtendSelection cb = liftIO $ do
let cb' = wrap_TextViewExtendSelectionCallback cb
mk_TextViewExtendSelectionCallback cb' >>= B.GClosure.newGClosure
wrap_TextViewExtendSelectionCallback ::
TextViewExtendSelectionCallback ->
C_TextViewExtendSelectionCallback
wrap_TextViewExtendSelectionCallback _cb _ granularity location start end _ = do
let granularity' = (toEnum . fromIntegral) granularity
B.ManagedPtr.withTransient Gtk.TextIter.TextIter location $ \location' -> do
B.ManagedPtr.withTransient Gtk.TextIter.TextIter start $ \start' -> do
B.ManagedPtr.withTransient Gtk.TextIter.TextIter end $ \end' -> do
result <- _cb granularity' location' start' end'
let result' = (fromIntegral . fromEnum) result
return result'
onTextViewExtendSelection :: (IsTextView a, MonadIO m) => a -> TextViewExtendSelectionCallback -> m SignalHandlerId
onTextViewExtendSelection obj cb = liftIO $ do
let cb' = wrap_TextViewExtendSelectionCallback cb
cb'' <- mk_TextViewExtendSelectionCallback cb'
connectSignalFunPtr obj "extend-selection" cb'' SignalConnectBefore
afterTextViewExtendSelection :: (IsTextView a, MonadIO m) => a -> TextViewExtendSelectionCallback -> m SignalHandlerId
afterTextViewExtendSelection obj cb = liftIO $ do
let cb' = wrap_TextViewExtendSelectionCallback cb
cb'' <- mk_TextViewExtendSelectionCallback cb'
connectSignalFunPtr obj "extend-selection" cb'' SignalConnectAfter
type TextViewInsertAtCursorCallback =
T.Text
-> IO ()
noTextViewInsertAtCursorCallback :: Maybe TextViewInsertAtCursorCallback
noTextViewInsertAtCursorCallback = Nothing
type C_TextViewInsertAtCursorCallback =
Ptr () ->
CString ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_TextViewInsertAtCursorCallback :: C_TextViewInsertAtCursorCallback -> IO (FunPtr C_TextViewInsertAtCursorCallback)
genClosure_TextViewInsertAtCursor :: MonadIO m => TextViewInsertAtCursorCallback -> m (GClosure C_TextViewInsertAtCursorCallback)
genClosure_TextViewInsertAtCursor cb = liftIO $ do
let cb' = wrap_TextViewInsertAtCursorCallback cb
mk_TextViewInsertAtCursorCallback cb' >>= B.GClosure.newGClosure
wrap_TextViewInsertAtCursorCallback ::
TextViewInsertAtCursorCallback ->
C_TextViewInsertAtCursorCallback
wrap_TextViewInsertAtCursorCallback _cb _ string _ = do
string' <- cstringToText string
_cb string'
onTextViewInsertAtCursor :: (IsTextView a, MonadIO m) => a -> TextViewInsertAtCursorCallback -> m SignalHandlerId
onTextViewInsertAtCursor obj cb = liftIO $ do
let cb' = wrap_TextViewInsertAtCursorCallback cb
cb'' <- mk_TextViewInsertAtCursorCallback cb'
connectSignalFunPtr obj "insert-at-cursor" cb'' SignalConnectBefore
afterTextViewInsertAtCursor :: (IsTextView a, MonadIO m) => a -> TextViewInsertAtCursorCallback -> m SignalHandlerId
afterTextViewInsertAtCursor obj cb = liftIO $ do
let cb' = wrap_TextViewInsertAtCursorCallback cb
cb'' <- mk_TextViewInsertAtCursorCallback cb'
connectSignalFunPtr obj "insert-at-cursor" cb'' SignalConnectAfter
type TextViewInsertEmojiCallback =
IO ()
noTextViewInsertEmojiCallback :: Maybe TextViewInsertEmojiCallback
noTextViewInsertEmojiCallback = Nothing
type C_TextViewInsertEmojiCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_TextViewInsertEmojiCallback :: C_TextViewInsertEmojiCallback -> IO (FunPtr C_TextViewInsertEmojiCallback)
genClosure_TextViewInsertEmoji :: MonadIO m => TextViewInsertEmojiCallback -> m (GClosure C_TextViewInsertEmojiCallback)
genClosure_TextViewInsertEmoji cb = liftIO $ do
let cb' = wrap_TextViewInsertEmojiCallback cb
mk_TextViewInsertEmojiCallback cb' >>= B.GClosure.newGClosure
wrap_TextViewInsertEmojiCallback ::
TextViewInsertEmojiCallback ->
C_TextViewInsertEmojiCallback
wrap_TextViewInsertEmojiCallback _cb _ _ = do
_cb
onTextViewInsertEmoji :: (IsTextView a, MonadIO m) => a -> TextViewInsertEmojiCallback -> m SignalHandlerId
onTextViewInsertEmoji obj cb = liftIO $ do
let cb' = wrap_TextViewInsertEmojiCallback cb
cb'' <- mk_TextViewInsertEmojiCallback cb'
connectSignalFunPtr obj "insert-emoji" cb'' SignalConnectBefore
afterTextViewInsertEmoji :: (IsTextView a, MonadIO m) => a -> TextViewInsertEmojiCallback -> m SignalHandlerId
afterTextViewInsertEmoji obj cb = liftIO $ do
let cb' = wrap_TextViewInsertEmojiCallback cb
cb'' <- mk_TextViewInsertEmojiCallback cb'
connectSignalFunPtr obj "insert-emoji" cb'' SignalConnectAfter
type TextViewMoveCursorCallback =
Gtk.Enums.MovementStep
-> Int32
-> Bool
-> IO ()
noTextViewMoveCursorCallback :: Maybe TextViewMoveCursorCallback
noTextViewMoveCursorCallback = Nothing
type C_TextViewMoveCursorCallback =
Ptr () ->
CUInt ->
Int32 ->
CInt ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_TextViewMoveCursorCallback :: C_TextViewMoveCursorCallback -> IO (FunPtr C_TextViewMoveCursorCallback)
genClosure_TextViewMoveCursor :: MonadIO m => TextViewMoveCursorCallback -> m (GClosure C_TextViewMoveCursorCallback)
genClosure_TextViewMoveCursor cb = liftIO $ do
let cb' = wrap_TextViewMoveCursorCallback cb
mk_TextViewMoveCursorCallback cb' >>= B.GClosure.newGClosure
wrap_TextViewMoveCursorCallback ::
TextViewMoveCursorCallback ->
C_TextViewMoveCursorCallback
wrap_TextViewMoveCursorCallback _cb _ step count extendSelection _ = do
let step' = (toEnum . fromIntegral) step
let extendSelection' = (/= 0) extendSelection
_cb step' count extendSelection'
onTextViewMoveCursor :: (IsTextView a, MonadIO m) => a -> TextViewMoveCursorCallback -> m SignalHandlerId
onTextViewMoveCursor obj cb = liftIO $ do
let cb' = wrap_TextViewMoveCursorCallback cb
cb'' <- mk_TextViewMoveCursorCallback cb'
connectSignalFunPtr obj "move-cursor" cb'' SignalConnectBefore
afterTextViewMoveCursor :: (IsTextView a, MonadIO m) => a -> TextViewMoveCursorCallback -> m SignalHandlerId
afterTextViewMoveCursor obj cb = liftIO $ do
let cb' = wrap_TextViewMoveCursorCallback cb
cb'' <- mk_TextViewMoveCursorCallback cb'
connectSignalFunPtr obj "move-cursor" cb'' SignalConnectAfter
type TextViewMoveViewportCallback =
Gtk.Enums.ScrollStep
-> Int32
-> IO ()
noTextViewMoveViewportCallback :: Maybe TextViewMoveViewportCallback
noTextViewMoveViewportCallback = Nothing
type C_TextViewMoveViewportCallback =
Ptr () ->
CUInt ->
Int32 ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_TextViewMoveViewportCallback :: C_TextViewMoveViewportCallback -> IO (FunPtr C_TextViewMoveViewportCallback)
genClosure_TextViewMoveViewport :: MonadIO m => TextViewMoveViewportCallback -> m (GClosure C_TextViewMoveViewportCallback)
genClosure_TextViewMoveViewport cb = liftIO $ do
let cb' = wrap_TextViewMoveViewportCallback cb
mk_TextViewMoveViewportCallback cb' >>= B.GClosure.newGClosure
wrap_TextViewMoveViewportCallback ::
TextViewMoveViewportCallback ->
C_TextViewMoveViewportCallback
wrap_TextViewMoveViewportCallback _cb _ step count _ = do
let step' = (toEnum . fromIntegral) step
_cb step' count
onTextViewMoveViewport :: (IsTextView a, MonadIO m) => a -> TextViewMoveViewportCallback -> m SignalHandlerId
onTextViewMoveViewport obj cb = liftIO $ do
let cb' = wrap_TextViewMoveViewportCallback cb
cb'' <- mk_TextViewMoveViewportCallback cb'
connectSignalFunPtr obj "move-viewport" cb'' SignalConnectBefore
afterTextViewMoveViewport :: (IsTextView a, MonadIO m) => a -> TextViewMoveViewportCallback -> m SignalHandlerId
afterTextViewMoveViewport obj cb = liftIO $ do
let cb' = wrap_TextViewMoveViewportCallback cb
cb'' <- mk_TextViewMoveViewportCallback cb'
connectSignalFunPtr obj "move-viewport" cb'' SignalConnectAfter
type TextViewPasteClipboardCallback =
IO ()
noTextViewPasteClipboardCallback :: Maybe TextViewPasteClipboardCallback
noTextViewPasteClipboardCallback = Nothing
type C_TextViewPasteClipboardCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_TextViewPasteClipboardCallback :: C_TextViewPasteClipboardCallback -> IO (FunPtr C_TextViewPasteClipboardCallback)
genClosure_TextViewPasteClipboard :: MonadIO m => TextViewPasteClipboardCallback -> m (GClosure C_TextViewPasteClipboardCallback)
genClosure_TextViewPasteClipboard cb = liftIO $ do
let cb' = wrap_TextViewPasteClipboardCallback cb
mk_TextViewPasteClipboardCallback cb' >>= B.GClosure.newGClosure
wrap_TextViewPasteClipboardCallback ::
TextViewPasteClipboardCallback ->
C_TextViewPasteClipboardCallback
wrap_TextViewPasteClipboardCallback _cb _ _ = do
_cb
onTextViewPasteClipboard :: (IsTextView a, MonadIO m) => a -> TextViewPasteClipboardCallback -> m SignalHandlerId
onTextViewPasteClipboard obj cb = liftIO $ do
let cb' = wrap_TextViewPasteClipboardCallback cb
cb'' <- mk_TextViewPasteClipboardCallback cb'
connectSignalFunPtr obj "paste-clipboard" cb'' SignalConnectBefore
afterTextViewPasteClipboard :: (IsTextView a, MonadIO m) => a -> TextViewPasteClipboardCallback -> m SignalHandlerId
afterTextViewPasteClipboard obj cb = liftIO $ do
let cb' = wrap_TextViewPasteClipboardCallback cb
cb'' <- mk_TextViewPasteClipboardCallback cb'
connectSignalFunPtr obj "paste-clipboard" cb'' SignalConnectAfter
type TextViewPopulatePopupCallback =
Gtk.Widget.Widget
-> IO ()
noTextViewPopulatePopupCallback :: Maybe TextViewPopulatePopupCallback
noTextViewPopulatePopupCallback = Nothing
type C_TextViewPopulatePopupCallback =
Ptr () ->
Ptr Gtk.Widget.Widget ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_TextViewPopulatePopupCallback :: C_TextViewPopulatePopupCallback -> IO (FunPtr C_TextViewPopulatePopupCallback)
genClosure_TextViewPopulatePopup :: MonadIO m => TextViewPopulatePopupCallback -> m (GClosure C_TextViewPopulatePopupCallback)
genClosure_TextViewPopulatePopup cb = liftIO $ do
let cb' = wrap_TextViewPopulatePopupCallback cb
mk_TextViewPopulatePopupCallback cb' >>= B.GClosure.newGClosure
wrap_TextViewPopulatePopupCallback ::
TextViewPopulatePopupCallback ->
C_TextViewPopulatePopupCallback
wrap_TextViewPopulatePopupCallback _cb _ popup _ = do
popup' <- (newObject Gtk.Widget.Widget) popup
_cb popup'
onTextViewPopulatePopup :: (IsTextView a, MonadIO m) => a -> TextViewPopulatePopupCallback -> m SignalHandlerId
onTextViewPopulatePopup obj cb = liftIO $ do
let cb' = wrap_TextViewPopulatePopupCallback cb
cb'' <- mk_TextViewPopulatePopupCallback cb'
connectSignalFunPtr obj "populate-popup" cb'' SignalConnectBefore
afterTextViewPopulatePopup :: (IsTextView a, MonadIO m) => a -> TextViewPopulatePopupCallback -> m SignalHandlerId
afterTextViewPopulatePopup obj cb = liftIO $ do
let cb' = wrap_TextViewPopulatePopupCallback cb
cb'' <- mk_TextViewPopulatePopupCallback cb'
connectSignalFunPtr obj "populate-popup" cb'' SignalConnectAfter
type TextViewPreeditChangedCallback =
T.Text
-> IO ()
noTextViewPreeditChangedCallback :: Maybe TextViewPreeditChangedCallback
noTextViewPreeditChangedCallback = Nothing
type C_TextViewPreeditChangedCallback =
Ptr () ->
CString ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_TextViewPreeditChangedCallback :: C_TextViewPreeditChangedCallback -> IO (FunPtr C_TextViewPreeditChangedCallback)
genClosure_TextViewPreeditChanged :: MonadIO m => TextViewPreeditChangedCallback -> m (GClosure C_TextViewPreeditChangedCallback)
genClosure_TextViewPreeditChanged cb = liftIO $ do
let cb' = wrap_TextViewPreeditChangedCallback cb
mk_TextViewPreeditChangedCallback cb' >>= B.GClosure.newGClosure
wrap_TextViewPreeditChangedCallback ::
TextViewPreeditChangedCallback ->
C_TextViewPreeditChangedCallback
wrap_TextViewPreeditChangedCallback _cb _ preedit _ = do
preedit' <- cstringToText preedit
_cb preedit'
onTextViewPreeditChanged :: (IsTextView a, MonadIO m) => a -> TextViewPreeditChangedCallback -> m SignalHandlerId
onTextViewPreeditChanged obj cb = liftIO $ do
let cb' = wrap_TextViewPreeditChangedCallback cb
cb'' <- mk_TextViewPreeditChangedCallback cb'
connectSignalFunPtr obj "preedit-changed" cb'' SignalConnectBefore
afterTextViewPreeditChanged :: (IsTextView a, MonadIO m) => a -> TextViewPreeditChangedCallback -> m SignalHandlerId
afterTextViewPreeditChanged obj cb = liftIO $ do
let cb' = wrap_TextViewPreeditChangedCallback cb
cb'' <- mk_TextViewPreeditChangedCallback cb'
connectSignalFunPtr obj "preedit-changed" cb'' SignalConnectAfter
type TextViewSelectAllCallback =
Bool
-> IO ()
noTextViewSelectAllCallback :: Maybe TextViewSelectAllCallback
noTextViewSelectAllCallback = Nothing
type C_TextViewSelectAllCallback =
Ptr () ->
CInt ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_TextViewSelectAllCallback :: C_TextViewSelectAllCallback -> IO (FunPtr C_TextViewSelectAllCallback)
genClosure_TextViewSelectAll :: MonadIO m => TextViewSelectAllCallback -> m (GClosure C_TextViewSelectAllCallback)
genClosure_TextViewSelectAll cb = liftIO $ do
let cb' = wrap_TextViewSelectAllCallback cb
mk_TextViewSelectAllCallback cb' >>= B.GClosure.newGClosure
wrap_TextViewSelectAllCallback ::
TextViewSelectAllCallback ->
C_TextViewSelectAllCallback
wrap_TextViewSelectAllCallback _cb _ select _ = do
let select' = (/= 0) select
_cb select'
onTextViewSelectAll :: (IsTextView a, MonadIO m) => a -> TextViewSelectAllCallback -> m SignalHandlerId
onTextViewSelectAll obj cb = liftIO $ do
let cb' = wrap_TextViewSelectAllCallback cb
cb'' <- mk_TextViewSelectAllCallback cb'
connectSignalFunPtr obj "select-all" cb'' SignalConnectBefore
afterTextViewSelectAll :: (IsTextView a, MonadIO m) => a -> TextViewSelectAllCallback -> m SignalHandlerId
afterTextViewSelectAll obj cb = liftIO $ do
let cb' = wrap_TextViewSelectAllCallback cb
cb'' <- mk_TextViewSelectAllCallback cb'
connectSignalFunPtr obj "select-all" cb'' SignalConnectAfter
type TextViewSetAnchorCallback =
IO ()
noTextViewSetAnchorCallback :: Maybe TextViewSetAnchorCallback
noTextViewSetAnchorCallback = Nothing
type C_TextViewSetAnchorCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_TextViewSetAnchorCallback :: C_TextViewSetAnchorCallback -> IO (FunPtr C_TextViewSetAnchorCallback)
genClosure_TextViewSetAnchor :: MonadIO m => TextViewSetAnchorCallback -> m (GClosure C_TextViewSetAnchorCallback)
genClosure_TextViewSetAnchor cb = liftIO $ do
let cb' = wrap_TextViewSetAnchorCallback cb
mk_TextViewSetAnchorCallback cb' >>= B.GClosure.newGClosure
wrap_TextViewSetAnchorCallback ::
TextViewSetAnchorCallback ->
C_TextViewSetAnchorCallback
wrap_TextViewSetAnchorCallback _cb _ _ = do
_cb
onTextViewSetAnchor :: (IsTextView a, MonadIO m) => a -> TextViewSetAnchorCallback -> m SignalHandlerId
onTextViewSetAnchor obj cb = liftIO $ do
let cb' = wrap_TextViewSetAnchorCallback cb
cb'' <- mk_TextViewSetAnchorCallback cb'
connectSignalFunPtr obj "set-anchor" cb'' SignalConnectBefore
afterTextViewSetAnchor :: (IsTextView a, MonadIO m) => a -> TextViewSetAnchorCallback -> m SignalHandlerId
afterTextViewSetAnchor obj cb = liftIO $ do
let cb' = wrap_TextViewSetAnchorCallback cb
cb'' <- mk_TextViewSetAnchorCallback cb'
connectSignalFunPtr obj "set-anchor" cb'' SignalConnectAfter
type TextViewToggleCursorVisibleCallback =
IO ()
noTextViewToggleCursorVisibleCallback :: Maybe TextViewToggleCursorVisibleCallback
noTextViewToggleCursorVisibleCallback = Nothing
type C_TextViewToggleCursorVisibleCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_TextViewToggleCursorVisibleCallback :: C_TextViewToggleCursorVisibleCallback -> IO (FunPtr C_TextViewToggleCursorVisibleCallback)
genClosure_TextViewToggleCursorVisible :: MonadIO m => TextViewToggleCursorVisibleCallback -> m (GClosure C_TextViewToggleCursorVisibleCallback)
genClosure_TextViewToggleCursorVisible cb = liftIO $ do
let cb' = wrap_TextViewToggleCursorVisibleCallback cb
mk_TextViewToggleCursorVisibleCallback cb' >>= B.GClosure.newGClosure
wrap_TextViewToggleCursorVisibleCallback ::
TextViewToggleCursorVisibleCallback ->
C_TextViewToggleCursorVisibleCallback
wrap_TextViewToggleCursorVisibleCallback _cb _ _ = do
_cb
onTextViewToggleCursorVisible :: (IsTextView a, MonadIO m) => a -> TextViewToggleCursorVisibleCallback -> m SignalHandlerId
onTextViewToggleCursorVisible obj cb = liftIO $ do
let cb' = wrap_TextViewToggleCursorVisibleCallback cb
cb'' <- mk_TextViewToggleCursorVisibleCallback cb'
connectSignalFunPtr obj "toggle-cursor-visible" cb'' SignalConnectBefore
afterTextViewToggleCursorVisible :: (IsTextView a, MonadIO m) => a -> TextViewToggleCursorVisibleCallback -> m SignalHandlerId
afterTextViewToggleCursorVisible obj cb = liftIO $ do
let cb' = wrap_TextViewToggleCursorVisibleCallback cb
cb'' <- mk_TextViewToggleCursorVisibleCallback cb'
connectSignalFunPtr obj "toggle-cursor-visible" cb'' SignalConnectAfter
type TextViewToggleOverwriteCallback =
IO ()
noTextViewToggleOverwriteCallback :: Maybe TextViewToggleOverwriteCallback
noTextViewToggleOverwriteCallback = Nothing
type C_TextViewToggleOverwriteCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_TextViewToggleOverwriteCallback :: C_TextViewToggleOverwriteCallback -> IO (FunPtr C_TextViewToggleOverwriteCallback)
genClosure_TextViewToggleOverwrite :: MonadIO m => TextViewToggleOverwriteCallback -> m (GClosure C_TextViewToggleOverwriteCallback)
genClosure_TextViewToggleOverwrite cb = liftIO $ do
let cb' = wrap_TextViewToggleOverwriteCallback cb
mk_TextViewToggleOverwriteCallback cb' >>= B.GClosure.newGClosure
wrap_TextViewToggleOverwriteCallback ::
TextViewToggleOverwriteCallback ->
C_TextViewToggleOverwriteCallback
wrap_TextViewToggleOverwriteCallback _cb _ _ = do
_cb
onTextViewToggleOverwrite :: (IsTextView a, MonadIO m) => a -> TextViewToggleOverwriteCallback -> m SignalHandlerId
onTextViewToggleOverwrite obj cb = liftIO $ do
let cb' = wrap_TextViewToggleOverwriteCallback cb
cb'' <- mk_TextViewToggleOverwriteCallback cb'
connectSignalFunPtr obj "toggle-overwrite" cb'' SignalConnectBefore
afterTextViewToggleOverwrite :: (IsTextView a, MonadIO m) => a -> TextViewToggleOverwriteCallback -> m SignalHandlerId
afterTextViewToggleOverwrite obj cb = liftIO $ do
let cb' = wrap_TextViewToggleOverwriteCallback cb
cb'' <- mk_TextViewToggleOverwriteCallback cb'
connectSignalFunPtr obj "toggle-overwrite" cb'' SignalConnectAfter
getTextViewAcceptsTab :: (MonadIO m, IsTextView o) => o -> m Bool
getTextViewAcceptsTab obj = liftIO $ B.Properties.getObjectPropertyBool obj "accepts-tab"
setTextViewAcceptsTab :: (MonadIO m, IsTextView o) => o -> Bool -> m ()
setTextViewAcceptsTab obj val = liftIO $ B.Properties.setObjectPropertyBool obj "accepts-tab" val
constructTextViewAcceptsTab :: (IsTextView o) => Bool -> IO (GValueConstruct o)
constructTextViewAcceptsTab val = B.Properties.constructObjectPropertyBool "accepts-tab" val
#if ENABLE_OVERLOADING
data TextViewAcceptsTabPropertyInfo
instance AttrInfo TextViewAcceptsTabPropertyInfo where
type AttrAllowedOps TextViewAcceptsTabPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint TextViewAcceptsTabPropertyInfo = (~) Bool
type AttrBaseTypeConstraint TextViewAcceptsTabPropertyInfo = IsTextView
type AttrGetType TextViewAcceptsTabPropertyInfo = Bool
type AttrLabel TextViewAcceptsTabPropertyInfo = "accepts-tab"
type AttrOrigin TextViewAcceptsTabPropertyInfo = TextView
attrGet _ = getTextViewAcceptsTab
attrSet _ = setTextViewAcceptsTab
attrConstruct _ = constructTextViewAcceptsTab
attrClear _ = undefined
#endif
getTextViewBottomMargin :: (MonadIO m, IsTextView o) => o -> m Int32
getTextViewBottomMargin obj = liftIO $ B.Properties.getObjectPropertyInt32 obj "bottom-margin"
setTextViewBottomMargin :: (MonadIO m, IsTextView o) => o -> Int32 -> m ()
setTextViewBottomMargin obj val = liftIO $ B.Properties.setObjectPropertyInt32 obj "bottom-margin" val
constructTextViewBottomMargin :: (IsTextView o) => Int32 -> IO (GValueConstruct o)
constructTextViewBottomMargin val = B.Properties.constructObjectPropertyInt32 "bottom-margin" val
#if ENABLE_OVERLOADING
data TextViewBottomMarginPropertyInfo
instance AttrInfo TextViewBottomMarginPropertyInfo where
type AttrAllowedOps TextViewBottomMarginPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint TextViewBottomMarginPropertyInfo = (~) Int32
type AttrBaseTypeConstraint TextViewBottomMarginPropertyInfo = IsTextView
type AttrGetType TextViewBottomMarginPropertyInfo = Int32
type AttrLabel TextViewBottomMarginPropertyInfo = "bottom-margin"
type AttrOrigin TextViewBottomMarginPropertyInfo = TextView
attrGet _ = getTextViewBottomMargin
attrSet _ = setTextViewBottomMargin
attrConstruct _ = constructTextViewBottomMargin
attrClear _ = undefined
#endif
getTextViewBuffer :: (MonadIO m, IsTextView o) => o -> m Gtk.TextBuffer.TextBuffer
getTextViewBuffer obj = liftIO $ checkUnexpectedNothing "getTextViewBuffer" $ B.Properties.getObjectPropertyObject obj "buffer" Gtk.TextBuffer.TextBuffer
setTextViewBuffer :: (MonadIO m, IsTextView o, Gtk.TextBuffer.IsTextBuffer a) => o -> a -> m ()
setTextViewBuffer obj val = liftIO $ B.Properties.setObjectPropertyObject obj "buffer" (Just val)
constructTextViewBuffer :: (IsTextView o, Gtk.TextBuffer.IsTextBuffer a) => a -> IO (GValueConstruct o)
constructTextViewBuffer val = B.Properties.constructObjectPropertyObject "buffer" (Just val)
clearTextViewBuffer :: (MonadIO m, IsTextView o) => o -> m ()
clearTextViewBuffer obj = liftIO $ B.Properties.setObjectPropertyObject obj "buffer" (Nothing :: Maybe Gtk.TextBuffer.TextBuffer)
#if ENABLE_OVERLOADING
data TextViewBufferPropertyInfo
instance AttrInfo TextViewBufferPropertyInfo where
type AttrAllowedOps TextViewBufferPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint TextViewBufferPropertyInfo = Gtk.TextBuffer.IsTextBuffer
type AttrBaseTypeConstraint TextViewBufferPropertyInfo = IsTextView
type AttrGetType TextViewBufferPropertyInfo = Gtk.TextBuffer.TextBuffer
type AttrLabel TextViewBufferPropertyInfo = "buffer"
type AttrOrigin TextViewBufferPropertyInfo = TextView
attrGet _ = getTextViewBuffer
attrSet _ = setTextViewBuffer
attrConstruct _ = constructTextViewBuffer
attrClear _ = clearTextViewBuffer
#endif
getTextViewCursorVisible :: (MonadIO m, IsTextView o) => o -> m Bool
getTextViewCursorVisible obj = liftIO $ B.Properties.getObjectPropertyBool obj "cursor-visible"
setTextViewCursorVisible :: (MonadIO m, IsTextView o) => o -> Bool -> m ()
setTextViewCursorVisible obj val = liftIO $ B.Properties.setObjectPropertyBool obj "cursor-visible" val
constructTextViewCursorVisible :: (IsTextView o) => Bool -> IO (GValueConstruct o)
constructTextViewCursorVisible val = B.Properties.constructObjectPropertyBool "cursor-visible" val
#if ENABLE_OVERLOADING
data TextViewCursorVisiblePropertyInfo
instance AttrInfo TextViewCursorVisiblePropertyInfo where
type AttrAllowedOps TextViewCursorVisiblePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint TextViewCursorVisiblePropertyInfo = (~) Bool
type AttrBaseTypeConstraint TextViewCursorVisiblePropertyInfo = IsTextView
type AttrGetType TextViewCursorVisiblePropertyInfo = Bool
type AttrLabel TextViewCursorVisiblePropertyInfo = "cursor-visible"
type AttrOrigin TextViewCursorVisiblePropertyInfo = TextView
attrGet _ = getTextViewCursorVisible
attrSet _ = setTextViewCursorVisible
attrConstruct _ = constructTextViewCursorVisible
attrClear _ = undefined
#endif
getTextViewEditable :: (MonadIO m, IsTextView o) => o -> m Bool
getTextViewEditable obj = liftIO $ B.Properties.getObjectPropertyBool obj "editable"
setTextViewEditable :: (MonadIO m, IsTextView o) => o -> Bool -> m ()
setTextViewEditable obj val = liftIO $ B.Properties.setObjectPropertyBool obj "editable" val
constructTextViewEditable :: (IsTextView o) => Bool -> IO (GValueConstruct o)
constructTextViewEditable val = B.Properties.constructObjectPropertyBool "editable" val
#if ENABLE_OVERLOADING
data TextViewEditablePropertyInfo
instance AttrInfo TextViewEditablePropertyInfo where
type AttrAllowedOps TextViewEditablePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint TextViewEditablePropertyInfo = (~) Bool
type AttrBaseTypeConstraint TextViewEditablePropertyInfo = IsTextView
type AttrGetType TextViewEditablePropertyInfo = Bool
type AttrLabel TextViewEditablePropertyInfo = "editable"
type AttrOrigin TextViewEditablePropertyInfo = TextView
attrGet _ = getTextViewEditable
attrSet _ = setTextViewEditable
attrConstruct _ = constructTextViewEditable
attrClear _ = undefined
#endif
getTextViewImModule :: (MonadIO m, IsTextView o) => o -> m (Maybe T.Text)
getTextViewImModule obj = liftIO $ B.Properties.getObjectPropertyString obj "im-module"
setTextViewImModule :: (MonadIO m, IsTextView o) => o -> T.Text -> m ()
setTextViewImModule obj val = liftIO $ B.Properties.setObjectPropertyString obj "im-module" (Just val)
constructTextViewImModule :: (IsTextView o) => T.Text -> IO (GValueConstruct o)
constructTextViewImModule val = B.Properties.constructObjectPropertyString "im-module" (Just val)
clearTextViewImModule :: (MonadIO m, IsTextView o) => o -> m ()
clearTextViewImModule obj = liftIO $ B.Properties.setObjectPropertyString obj "im-module" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data TextViewImModulePropertyInfo
instance AttrInfo TextViewImModulePropertyInfo where
type AttrAllowedOps TextViewImModulePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint TextViewImModulePropertyInfo = (~) T.Text
type AttrBaseTypeConstraint TextViewImModulePropertyInfo = IsTextView
type AttrGetType TextViewImModulePropertyInfo = (Maybe T.Text)
type AttrLabel TextViewImModulePropertyInfo = "im-module"
type AttrOrigin TextViewImModulePropertyInfo = TextView
attrGet _ = getTextViewImModule
attrSet _ = setTextViewImModule
attrConstruct _ = constructTextViewImModule
attrClear _ = clearTextViewImModule
#endif
getTextViewIndent :: (MonadIO m, IsTextView o) => o -> m Int32
getTextViewIndent obj = liftIO $ B.Properties.getObjectPropertyInt32 obj "indent"
setTextViewIndent :: (MonadIO m, IsTextView o) => o -> Int32 -> m ()
setTextViewIndent obj val = liftIO $ B.Properties.setObjectPropertyInt32 obj "indent" val
constructTextViewIndent :: (IsTextView o) => Int32 -> IO (GValueConstruct o)
constructTextViewIndent val = B.Properties.constructObjectPropertyInt32 "indent" val
#if ENABLE_OVERLOADING
data TextViewIndentPropertyInfo
instance AttrInfo TextViewIndentPropertyInfo where
type AttrAllowedOps TextViewIndentPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint TextViewIndentPropertyInfo = (~) Int32
type AttrBaseTypeConstraint TextViewIndentPropertyInfo = IsTextView
type AttrGetType TextViewIndentPropertyInfo = Int32
type AttrLabel TextViewIndentPropertyInfo = "indent"
type AttrOrigin TextViewIndentPropertyInfo = TextView
attrGet _ = getTextViewIndent
attrSet _ = setTextViewIndent
attrConstruct _ = constructTextViewIndent
attrClear _ = undefined
#endif
getTextViewInputHints :: (MonadIO m, IsTextView o) => o -> m [Gtk.Flags.InputHints]
getTextViewInputHints obj = liftIO $ B.Properties.getObjectPropertyFlags obj "input-hints"
setTextViewInputHints :: (MonadIO m, IsTextView o) => o -> [Gtk.Flags.InputHints] -> m ()
setTextViewInputHints obj val = liftIO $ B.Properties.setObjectPropertyFlags obj "input-hints" val
constructTextViewInputHints :: (IsTextView o) => [Gtk.Flags.InputHints] -> IO (GValueConstruct o)
constructTextViewInputHints val = B.Properties.constructObjectPropertyFlags "input-hints" val
#if ENABLE_OVERLOADING
data TextViewInputHintsPropertyInfo
instance AttrInfo TextViewInputHintsPropertyInfo where
type AttrAllowedOps TextViewInputHintsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint TextViewInputHintsPropertyInfo = (~) [Gtk.Flags.InputHints]
type AttrBaseTypeConstraint TextViewInputHintsPropertyInfo = IsTextView
type AttrGetType TextViewInputHintsPropertyInfo = [Gtk.Flags.InputHints]
type AttrLabel TextViewInputHintsPropertyInfo = "input-hints"
type AttrOrigin TextViewInputHintsPropertyInfo = TextView
attrGet _ = getTextViewInputHints
attrSet _ = setTextViewInputHints
attrConstruct _ = constructTextViewInputHints
attrClear _ = undefined
#endif
getTextViewInputPurpose :: (MonadIO m, IsTextView o) => o -> m Gtk.Enums.InputPurpose
getTextViewInputPurpose obj = liftIO $ B.Properties.getObjectPropertyEnum obj "input-purpose"
setTextViewInputPurpose :: (MonadIO m, IsTextView o) => o -> Gtk.Enums.InputPurpose -> m ()
setTextViewInputPurpose obj val = liftIO $ B.Properties.setObjectPropertyEnum obj "input-purpose" val
constructTextViewInputPurpose :: (IsTextView o) => Gtk.Enums.InputPurpose -> IO (GValueConstruct o)
constructTextViewInputPurpose val = B.Properties.constructObjectPropertyEnum "input-purpose" val
#if ENABLE_OVERLOADING
data TextViewInputPurposePropertyInfo
instance AttrInfo TextViewInputPurposePropertyInfo where
type AttrAllowedOps TextViewInputPurposePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint TextViewInputPurposePropertyInfo = (~) Gtk.Enums.InputPurpose
type AttrBaseTypeConstraint TextViewInputPurposePropertyInfo = IsTextView
type AttrGetType TextViewInputPurposePropertyInfo = Gtk.Enums.InputPurpose
type AttrLabel TextViewInputPurposePropertyInfo = "input-purpose"
type AttrOrigin TextViewInputPurposePropertyInfo = TextView
attrGet _ = getTextViewInputPurpose
attrSet _ = setTextViewInputPurpose
attrConstruct _ = constructTextViewInputPurpose
attrClear _ = undefined
#endif
getTextViewJustification :: (MonadIO m, IsTextView o) => o -> m Gtk.Enums.Justification
getTextViewJustification obj = liftIO $ B.Properties.getObjectPropertyEnum obj "justification"
setTextViewJustification :: (MonadIO m, IsTextView o) => o -> Gtk.Enums.Justification -> m ()
setTextViewJustification obj val = liftIO $ B.Properties.setObjectPropertyEnum obj "justification" val
constructTextViewJustification :: (IsTextView o) => Gtk.Enums.Justification -> IO (GValueConstruct o)
constructTextViewJustification val = B.Properties.constructObjectPropertyEnum "justification" val
#if ENABLE_OVERLOADING
data TextViewJustificationPropertyInfo
instance AttrInfo TextViewJustificationPropertyInfo where
type AttrAllowedOps TextViewJustificationPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint TextViewJustificationPropertyInfo = (~) Gtk.Enums.Justification
type AttrBaseTypeConstraint TextViewJustificationPropertyInfo = IsTextView
type AttrGetType TextViewJustificationPropertyInfo = Gtk.Enums.Justification
type AttrLabel TextViewJustificationPropertyInfo = "justification"
type AttrOrigin TextViewJustificationPropertyInfo = TextView
attrGet _ = getTextViewJustification
attrSet _ = setTextViewJustification
attrConstruct _ = constructTextViewJustification
attrClear _ = undefined
#endif
getTextViewLeftMargin :: (MonadIO m, IsTextView o) => o -> m Int32
getTextViewLeftMargin obj = liftIO $ B.Properties.getObjectPropertyInt32 obj "left-margin"
setTextViewLeftMargin :: (MonadIO m, IsTextView o) => o -> Int32 -> m ()
setTextViewLeftMargin obj val = liftIO $ B.Properties.setObjectPropertyInt32 obj "left-margin" val
constructTextViewLeftMargin :: (IsTextView o) => Int32 -> IO (GValueConstruct o)
constructTextViewLeftMargin val = B.Properties.constructObjectPropertyInt32 "left-margin" val
#if ENABLE_OVERLOADING
data TextViewLeftMarginPropertyInfo
instance AttrInfo TextViewLeftMarginPropertyInfo where
type AttrAllowedOps TextViewLeftMarginPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint TextViewLeftMarginPropertyInfo = (~) Int32
type AttrBaseTypeConstraint TextViewLeftMarginPropertyInfo = IsTextView
type AttrGetType TextViewLeftMarginPropertyInfo = Int32
type AttrLabel TextViewLeftMarginPropertyInfo = "left-margin"
type AttrOrigin TextViewLeftMarginPropertyInfo = TextView
attrGet _ = getTextViewLeftMargin
attrSet _ = setTextViewLeftMargin
attrConstruct _ = constructTextViewLeftMargin
attrClear _ = undefined
#endif
getTextViewMonospace :: (MonadIO m, IsTextView o) => o -> m Bool
getTextViewMonospace obj = liftIO $ B.Properties.getObjectPropertyBool obj "monospace"
setTextViewMonospace :: (MonadIO m, IsTextView o) => o -> Bool -> m ()
setTextViewMonospace obj val = liftIO $ B.Properties.setObjectPropertyBool obj "monospace" val
constructTextViewMonospace :: (IsTextView o) => Bool -> IO (GValueConstruct o)
constructTextViewMonospace val = B.Properties.constructObjectPropertyBool "monospace" val
#if ENABLE_OVERLOADING
data TextViewMonospacePropertyInfo
instance AttrInfo TextViewMonospacePropertyInfo where
type AttrAllowedOps TextViewMonospacePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint TextViewMonospacePropertyInfo = (~) Bool
type AttrBaseTypeConstraint TextViewMonospacePropertyInfo = IsTextView
type AttrGetType TextViewMonospacePropertyInfo = Bool
type AttrLabel TextViewMonospacePropertyInfo = "monospace"
type AttrOrigin TextViewMonospacePropertyInfo = TextView
attrGet _ = getTextViewMonospace
attrSet _ = setTextViewMonospace
attrConstruct _ = constructTextViewMonospace
attrClear _ = undefined
#endif
getTextViewOverwrite :: (MonadIO m, IsTextView o) => o -> m Bool
getTextViewOverwrite obj = liftIO $ B.Properties.getObjectPropertyBool obj "overwrite"
setTextViewOverwrite :: (MonadIO m, IsTextView o) => o -> Bool -> m ()
setTextViewOverwrite obj val = liftIO $ B.Properties.setObjectPropertyBool obj "overwrite" val
constructTextViewOverwrite :: (IsTextView o) => Bool -> IO (GValueConstruct o)
constructTextViewOverwrite val = B.Properties.constructObjectPropertyBool "overwrite" val
#if ENABLE_OVERLOADING
data TextViewOverwritePropertyInfo
instance AttrInfo TextViewOverwritePropertyInfo where
type AttrAllowedOps TextViewOverwritePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint TextViewOverwritePropertyInfo = (~) Bool
type AttrBaseTypeConstraint TextViewOverwritePropertyInfo = IsTextView
type AttrGetType TextViewOverwritePropertyInfo = Bool
type AttrLabel TextViewOverwritePropertyInfo = "overwrite"
type AttrOrigin TextViewOverwritePropertyInfo = TextView
attrGet _ = getTextViewOverwrite
attrSet _ = setTextViewOverwrite
attrConstruct _ = constructTextViewOverwrite
attrClear _ = undefined
#endif
getTextViewPixelsAboveLines :: (MonadIO m, IsTextView o) => o -> m Int32
getTextViewPixelsAboveLines obj = liftIO $ B.Properties.getObjectPropertyInt32 obj "pixels-above-lines"
setTextViewPixelsAboveLines :: (MonadIO m, IsTextView o) => o -> Int32 -> m ()
setTextViewPixelsAboveLines obj val = liftIO $ B.Properties.setObjectPropertyInt32 obj "pixels-above-lines" val
constructTextViewPixelsAboveLines :: (IsTextView o) => Int32 -> IO (GValueConstruct o)
constructTextViewPixelsAboveLines val = B.Properties.constructObjectPropertyInt32 "pixels-above-lines" val
#if ENABLE_OVERLOADING
data TextViewPixelsAboveLinesPropertyInfo
instance AttrInfo TextViewPixelsAboveLinesPropertyInfo where
type AttrAllowedOps TextViewPixelsAboveLinesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint TextViewPixelsAboveLinesPropertyInfo = (~) Int32
type AttrBaseTypeConstraint TextViewPixelsAboveLinesPropertyInfo = IsTextView
type AttrGetType TextViewPixelsAboveLinesPropertyInfo = Int32
type AttrLabel TextViewPixelsAboveLinesPropertyInfo = "pixels-above-lines"
type AttrOrigin TextViewPixelsAboveLinesPropertyInfo = TextView
attrGet _ = getTextViewPixelsAboveLines
attrSet _ = setTextViewPixelsAboveLines
attrConstruct _ = constructTextViewPixelsAboveLines
attrClear _ = undefined
#endif
getTextViewPixelsBelowLines :: (MonadIO m, IsTextView o) => o -> m Int32
getTextViewPixelsBelowLines obj = liftIO $ B.Properties.getObjectPropertyInt32 obj "pixels-below-lines"
setTextViewPixelsBelowLines :: (MonadIO m, IsTextView o) => o -> Int32 -> m ()
setTextViewPixelsBelowLines obj val = liftIO $ B.Properties.setObjectPropertyInt32 obj "pixels-below-lines" val
constructTextViewPixelsBelowLines :: (IsTextView o) => Int32 -> IO (GValueConstruct o)
constructTextViewPixelsBelowLines val = B.Properties.constructObjectPropertyInt32 "pixels-below-lines" val
#if ENABLE_OVERLOADING
data TextViewPixelsBelowLinesPropertyInfo
instance AttrInfo TextViewPixelsBelowLinesPropertyInfo where
type AttrAllowedOps TextViewPixelsBelowLinesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint TextViewPixelsBelowLinesPropertyInfo = (~) Int32
type AttrBaseTypeConstraint TextViewPixelsBelowLinesPropertyInfo = IsTextView
type AttrGetType TextViewPixelsBelowLinesPropertyInfo = Int32
type AttrLabel TextViewPixelsBelowLinesPropertyInfo = "pixels-below-lines"
type AttrOrigin TextViewPixelsBelowLinesPropertyInfo = TextView
attrGet _ = getTextViewPixelsBelowLines
attrSet _ = setTextViewPixelsBelowLines
attrConstruct _ = constructTextViewPixelsBelowLines
attrClear _ = undefined
#endif
getTextViewPixelsInsideWrap :: (MonadIO m, IsTextView o) => o -> m Int32
getTextViewPixelsInsideWrap obj = liftIO $ B.Properties.getObjectPropertyInt32 obj "pixels-inside-wrap"
setTextViewPixelsInsideWrap :: (MonadIO m, IsTextView o) => o -> Int32 -> m ()
setTextViewPixelsInsideWrap obj val = liftIO $ B.Properties.setObjectPropertyInt32 obj "pixels-inside-wrap" val
constructTextViewPixelsInsideWrap :: (IsTextView o) => Int32 -> IO (GValueConstruct o)
constructTextViewPixelsInsideWrap val = B.Properties.constructObjectPropertyInt32 "pixels-inside-wrap" val
#if ENABLE_OVERLOADING
data TextViewPixelsInsideWrapPropertyInfo
instance AttrInfo TextViewPixelsInsideWrapPropertyInfo where
type AttrAllowedOps TextViewPixelsInsideWrapPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint TextViewPixelsInsideWrapPropertyInfo = (~) Int32
type AttrBaseTypeConstraint TextViewPixelsInsideWrapPropertyInfo = IsTextView
type AttrGetType TextViewPixelsInsideWrapPropertyInfo = Int32
type AttrLabel TextViewPixelsInsideWrapPropertyInfo = "pixels-inside-wrap"
type AttrOrigin TextViewPixelsInsideWrapPropertyInfo = TextView
attrGet _ = getTextViewPixelsInsideWrap
attrSet _ = setTextViewPixelsInsideWrap
attrConstruct _ = constructTextViewPixelsInsideWrap
attrClear _ = undefined
#endif
getTextViewPopulateAll :: (MonadIO m, IsTextView o) => o -> m Bool
getTextViewPopulateAll obj = liftIO $ B.Properties.getObjectPropertyBool obj "populate-all"
setTextViewPopulateAll :: (MonadIO m, IsTextView o) => o -> Bool -> m ()
setTextViewPopulateAll obj val = liftIO $ B.Properties.setObjectPropertyBool obj "populate-all" val
constructTextViewPopulateAll :: (IsTextView o) => Bool -> IO (GValueConstruct o)
constructTextViewPopulateAll val = B.Properties.constructObjectPropertyBool "populate-all" val
#if ENABLE_OVERLOADING
data TextViewPopulateAllPropertyInfo
instance AttrInfo TextViewPopulateAllPropertyInfo where
type AttrAllowedOps TextViewPopulateAllPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint TextViewPopulateAllPropertyInfo = (~) Bool
type AttrBaseTypeConstraint TextViewPopulateAllPropertyInfo = IsTextView
type AttrGetType TextViewPopulateAllPropertyInfo = Bool
type AttrLabel TextViewPopulateAllPropertyInfo = "populate-all"
type AttrOrigin TextViewPopulateAllPropertyInfo = TextView
attrGet _ = getTextViewPopulateAll
attrSet _ = setTextViewPopulateAll
attrConstruct _ = constructTextViewPopulateAll
attrClear _ = undefined
#endif
getTextViewRightMargin :: (MonadIO m, IsTextView o) => o -> m Int32
getTextViewRightMargin obj = liftIO $ B.Properties.getObjectPropertyInt32 obj "right-margin"
setTextViewRightMargin :: (MonadIO m, IsTextView o) => o -> Int32 -> m ()
setTextViewRightMargin obj val = liftIO $ B.Properties.setObjectPropertyInt32 obj "right-margin" val
constructTextViewRightMargin :: (IsTextView o) => Int32 -> IO (GValueConstruct o)
constructTextViewRightMargin val = B.Properties.constructObjectPropertyInt32 "right-margin" val
#if ENABLE_OVERLOADING
data TextViewRightMarginPropertyInfo
instance AttrInfo TextViewRightMarginPropertyInfo where
type AttrAllowedOps TextViewRightMarginPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint TextViewRightMarginPropertyInfo = (~) Int32
type AttrBaseTypeConstraint TextViewRightMarginPropertyInfo = IsTextView
type AttrGetType TextViewRightMarginPropertyInfo = Int32
type AttrLabel TextViewRightMarginPropertyInfo = "right-margin"
type AttrOrigin TextViewRightMarginPropertyInfo = TextView
attrGet _ = getTextViewRightMargin
attrSet _ = setTextViewRightMargin
attrConstruct _ = constructTextViewRightMargin
attrClear _ = undefined
#endif
getTextViewTabs :: (MonadIO m, IsTextView o) => o -> m (Maybe Pango.TabArray.TabArray)
getTextViewTabs obj = liftIO $ B.Properties.getObjectPropertyBoxed obj "tabs" Pango.TabArray.TabArray
setTextViewTabs :: (MonadIO m, IsTextView o) => o -> Pango.TabArray.TabArray -> m ()
setTextViewTabs obj val = liftIO $ B.Properties.setObjectPropertyBoxed obj "tabs" (Just val)
constructTextViewTabs :: (IsTextView o) => Pango.TabArray.TabArray -> IO (GValueConstruct o)
constructTextViewTabs val = B.Properties.constructObjectPropertyBoxed "tabs" (Just val)
#if ENABLE_OVERLOADING
data TextViewTabsPropertyInfo
instance AttrInfo TextViewTabsPropertyInfo where
type AttrAllowedOps TextViewTabsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint TextViewTabsPropertyInfo = (~) Pango.TabArray.TabArray
type AttrBaseTypeConstraint TextViewTabsPropertyInfo = IsTextView
type AttrGetType TextViewTabsPropertyInfo = (Maybe Pango.TabArray.TabArray)
type AttrLabel TextViewTabsPropertyInfo = "tabs"
type AttrOrigin TextViewTabsPropertyInfo = TextView
attrGet _ = getTextViewTabs
attrSet _ = setTextViewTabs
attrConstruct _ = constructTextViewTabs
attrClear _ = undefined
#endif
getTextViewTopMargin :: (MonadIO m, IsTextView o) => o -> m Int32
getTextViewTopMargin obj = liftIO $ B.Properties.getObjectPropertyInt32 obj "top-margin"
setTextViewTopMargin :: (MonadIO m, IsTextView o) => o -> Int32 -> m ()
setTextViewTopMargin obj val = liftIO $ B.Properties.setObjectPropertyInt32 obj "top-margin" val
constructTextViewTopMargin :: (IsTextView o) => Int32 -> IO (GValueConstruct o)
constructTextViewTopMargin val = B.Properties.constructObjectPropertyInt32 "top-margin" val
#if ENABLE_OVERLOADING
data TextViewTopMarginPropertyInfo
instance AttrInfo TextViewTopMarginPropertyInfo where
type AttrAllowedOps TextViewTopMarginPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint TextViewTopMarginPropertyInfo = (~) Int32
type AttrBaseTypeConstraint TextViewTopMarginPropertyInfo = IsTextView
type AttrGetType TextViewTopMarginPropertyInfo = Int32
type AttrLabel TextViewTopMarginPropertyInfo = "top-margin"
type AttrOrigin TextViewTopMarginPropertyInfo = TextView
attrGet _ = getTextViewTopMargin
attrSet _ = setTextViewTopMargin
attrConstruct _ = constructTextViewTopMargin
attrClear _ = undefined
#endif
getTextViewWrapMode :: (MonadIO m, IsTextView o) => o -> m Gtk.Enums.WrapMode
getTextViewWrapMode obj = liftIO $ B.Properties.getObjectPropertyEnum obj "wrap-mode"
setTextViewWrapMode :: (MonadIO m, IsTextView o) => o -> Gtk.Enums.WrapMode -> m ()
setTextViewWrapMode obj val = liftIO $ B.Properties.setObjectPropertyEnum obj "wrap-mode" val
constructTextViewWrapMode :: (IsTextView o) => Gtk.Enums.WrapMode -> IO (GValueConstruct o)
constructTextViewWrapMode val = B.Properties.constructObjectPropertyEnum "wrap-mode" val
#if ENABLE_OVERLOADING
data TextViewWrapModePropertyInfo
instance AttrInfo TextViewWrapModePropertyInfo where
type AttrAllowedOps TextViewWrapModePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint TextViewWrapModePropertyInfo = (~) Gtk.Enums.WrapMode
type AttrBaseTypeConstraint TextViewWrapModePropertyInfo = IsTextView
type AttrGetType TextViewWrapModePropertyInfo = Gtk.Enums.WrapMode
type AttrLabel TextViewWrapModePropertyInfo = "wrap-mode"
type AttrOrigin TextViewWrapModePropertyInfo = TextView
attrGet _ = getTextViewWrapMode
attrSet _ = setTextViewWrapMode
attrConstruct _ = constructTextViewWrapMode
attrClear _ = undefined
#endif
#if ENABLE_OVERLOADING
instance O.HasAttributeList TextView
type instance O.AttributeList TextView = TextViewAttributeList
type TextViewAttributeList = ('[ '("acceptsTab", TextViewAcceptsTabPropertyInfo), '("appPaintable", Gtk.Widget.WidgetAppPaintablePropertyInfo), '("borderWidth", Gtk.Container.ContainerBorderWidthPropertyInfo), '("bottomMargin", TextViewBottomMarginPropertyInfo), '("buffer", TextViewBufferPropertyInfo), '("canDefault", Gtk.Widget.WidgetCanDefaultPropertyInfo), '("canFocus", Gtk.Widget.WidgetCanFocusPropertyInfo), '("child", Gtk.Container.ContainerChildPropertyInfo), '("compositeChild", Gtk.Widget.WidgetCompositeChildPropertyInfo), '("cursorVisible", TextViewCursorVisiblePropertyInfo), '("doubleBuffered", Gtk.Widget.WidgetDoubleBufferedPropertyInfo), '("editable", TextViewEditablePropertyInfo), '("events", Gtk.Widget.WidgetEventsPropertyInfo), '("expand", Gtk.Widget.WidgetExpandPropertyInfo), '("focusOnClick", Gtk.Widget.WidgetFocusOnClickPropertyInfo), '("hadjustment", Gtk.Scrollable.ScrollableHadjustmentPropertyInfo), '("halign", Gtk.Widget.WidgetHalignPropertyInfo), '("hasDefault", Gtk.Widget.WidgetHasDefaultPropertyInfo), '("hasFocus", Gtk.Widget.WidgetHasFocusPropertyInfo), '("hasTooltip", Gtk.Widget.WidgetHasTooltipPropertyInfo), '("heightRequest", Gtk.Widget.WidgetHeightRequestPropertyInfo), '("hexpand", Gtk.Widget.WidgetHexpandPropertyInfo), '("hexpandSet", Gtk.Widget.WidgetHexpandSetPropertyInfo), '("hscrollPolicy", Gtk.Scrollable.ScrollableHscrollPolicyPropertyInfo), '("imModule", TextViewImModulePropertyInfo), '("indent", TextViewIndentPropertyInfo), '("inputHints", TextViewInputHintsPropertyInfo), '("inputPurpose", TextViewInputPurposePropertyInfo), '("isFocus", Gtk.Widget.WidgetIsFocusPropertyInfo), '("justification", TextViewJustificationPropertyInfo), '("leftMargin", TextViewLeftMarginPropertyInfo), '("margin", Gtk.Widget.WidgetMarginPropertyInfo), '("marginBottom", Gtk.Widget.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.Widget.WidgetMarginEndPropertyInfo), '("marginLeft", Gtk.Widget.WidgetMarginLeftPropertyInfo), '("marginRight", Gtk.Widget.WidgetMarginRightPropertyInfo), '("marginStart", Gtk.Widget.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.Widget.WidgetMarginTopPropertyInfo), '("monospace", TextViewMonospacePropertyInfo), '("name", Gtk.Widget.WidgetNamePropertyInfo), '("noShowAll", Gtk.Widget.WidgetNoShowAllPropertyInfo), '("opacity", Gtk.Widget.WidgetOpacityPropertyInfo), '("overwrite", TextViewOverwritePropertyInfo), '("parent", Gtk.Widget.WidgetParentPropertyInfo), '("pixelsAboveLines", TextViewPixelsAboveLinesPropertyInfo), '("pixelsBelowLines", TextViewPixelsBelowLinesPropertyInfo), '("pixelsInsideWrap", TextViewPixelsInsideWrapPropertyInfo), '("populateAll", TextViewPopulateAllPropertyInfo), '("receivesDefault", Gtk.Widget.WidgetReceivesDefaultPropertyInfo), '("resizeMode", Gtk.Container.ContainerResizeModePropertyInfo), '("rightMargin", TextViewRightMarginPropertyInfo), '("scaleFactor", Gtk.Widget.WidgetScaleFactorPropertyInfo), '("sensitive", Gtk.Widget.WidgetSensitivePropertyInfo), '("style", Gtk.Widget.WidgetStylePropertyInfo), '("tabs", TextViewTabsPropertyInfo), '("tooltipMarkup", Gtk.Widget.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.Widget.WidgetTooltipTextPropertyInfo), '("topMargin", TextViewTopMarginPropertyInfo), '("vadjustment", Gtk.Scrollable.ScrollableVadjustmentPropertyInfo), '("valign", Gtk.Widget.WidgetValignPropertyInfo), '("vexpand", Gtk.Widget.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.Widget.WidgetVexpandSetPropertyInfo), '("visible", Gtk.Widget.WidgetVisiblePropertyInfo), '("vscrollPolicy", Gtk.Scrollable.ScrollableVscrollPolicyPropertyInfo), '("widthRequest", Gtk.Widget.WidgetWidthRequestPropertyInfo), '("window", Gtk.Widget.WidgetWindowPropertyInfo), '("wrapMode", TextViewWrapModePropertyInfo)] :: [(Symbol, *)])
#endif
#if ENABLE_OVERLOADING
textViewAcceptsTab :: AttrLabelProxy "acceptsTab"
textViewAcceptsTab = AttrLabelProxy
textViewBottomMargin :: AttrLabelProxy "bottomMargin"
textViewBottomMargin = AttrLabelProxy
textViewBuffer :: AttrLabelProxy "buffer"
textViewBuffer = AttrLabelProxy
textViewCursorVisible :: AttrLabelProxy "cursorVisible"
textViewCursorVisible = AttrLabelProxy
textViewEditable :: AttrLabelProxy "editable"
textViewEditable = AttrLabelProxy
textViewImModule :: AttrLabelProxy "imModule"
textViewImModule = AttrLabelProxy
textViewIndent :: AttrLabelProxy "indent"
textViewIndent = AttrLabelProxy
textViewInputHints :: AttrLabelProxy "inputHints"
textViewInputHints = AttrLabelProxy
textViewInputPurpose :: AttrLabelProxy "inputPurpose"
textViewInputPurpose = AttrLabelProxy
textViewJustification :: AttrLabelProxy "justification"
textViewJustification = AttrLabelProxy
textViewLeftMargin :: AttrLabelProxy "leftMargin"
textViewLeftMargin = AttrLabelProxy
textViewMonospace :: AttrLabelProxy "monospace"
textViewMonospace = AttrLabelProxy
textViewOverwrite :: AttrLabelProxy "overwrite"
textViewOverwrite = AttrLabelProxy
textViewPixelsAboveLines :: AttrLabelProxy "pixelsAboveLines"
textViewPixelsAboveLines = AttrLabelProxy
textViewPixelsBelowLines :: AttrLabelProxy "pixelsBelowLines"
textViewPixelsBelowLines = AttrLabelProxy
textViewPixelsInsideWrap :: AttrLabelProxy "pixelsInsideWrap"
textViewPixelsInsideWrap = AttrLabelProxy
textViewPopulateAll :: AttrLabelProxy "populateAll"
textViewPopulateAll = AttrLabelProxy
textViewRightMargin :: AttrLabelProxy "rightMargin"
textViewRightMargin = AttrLabelProxy
textViewTabs :: AttrLabelProxy "tabs"
textViewTabs = AttrLabelProxy
textViewTopMargin :: AttrLabelProxy "topMargin"
textViewTopMargin = AttrLabelProxy
textViewWrapMode :: AttrLabelProxy "wrapMode"
textViewWrapMode = AttrLabelProxy
#endif
#if ENABLE_OVERLOADING
data TextViewBackspaceSignalInfo
instance SignalInfo TextViewBackspaceSignalInfo where
type HaskellCallbackType TextViewBackspaceSignalInfo = TextViewBackspaceCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_TextViewBackspaceCallback cb
cb'' <- mk_TextViewBackspaceCallback cb'
connectSignalFunPtr obj "backspace" cb'' connectMode
data TextViewCopyClipboardSignalInfo
instance SignalInfo TextViewCopyClipboardSignalInfo where
type HaskellCallbackType TextViewCopyClipboardSignalInfo = TextViewCopyClipboardCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_TextViewCopyClipboardCallback cb
cb'' <- mk_TextViewCopyClipboardCallback cb'
connectSignalFunPtr obj "copy-clipboard" cb'' connectMode
data TextViewCutClipboardSignalInfo
instance SignalInfo TextViewCutClipboardSignalInfo where
type HaskellCallbackType TextViewCutClipboardSignalInfo = TextViewCutClipboardCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_TextViewCutClipboardCallback cb
cb'' <- mk_TextViewCutClipboardCallback cb'
connectSignalFunPtr obj "cut-clipboard" cb'' connectMode
data TextViewDeleteFromCursorSignalInfo
instance SignalInfo TextViewDeleteFromCursorSignalInfo where
type HaskellCallbackType TextViewDeleteFromCursorSignalInfo = TextViewDeleteFromCursorCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_TextViewDeleteFromCursorCallback cb
cb'' <- mk_TextViewDeleteFromCursorCallback cb'
connectSignalFunPtr obj "delete-from-cursor" cb'' connectMode
data TextViewExtendSelectionSignalInfo
instance SignalInfo TextViewExtendSelectionSignalInfo where
type HaskellCallbackType TextViewExtendSelectionSignalInfo = TextViewExtendSelectionCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_TextViewExtendSelectionCallback cb
cb'' <- mk_TextViewExtendSelectionCallback cb'
connectSignalFunPtr obj "extend-selection" cb'' connectMode
data TextViewInsertAtCursorSignalInfo
instance SignalInfo TextViewInsertAtCursorSignalInfo where
type HaskellCallbackType TextViewInsertAtCursorSignalInfo = TextViewInsertAtCursorCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_TextViewInsertAtCursorCallback cb
cb'' <- mk_TextViewInsertAtCursorCallback cb'
connectSignalFunPtr obj "insert-at-cursor" cb'' connectMode
data TextViewInsertEmojiSignalInfo
instance SignalInfo TextViewInsertEmojiSignalInfo where
type HaskellCallbackType TextViewInsertEmojiSignalInfo = TextViewInsertEmojiCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_TextViewInsertEmojiCallback cb
cb'' <- mk_TextViewInsertEmojiCallback cb'
connectSignalFunPtr obj "insert-emoji" cb'' connectMode
data TextViewMoveCursorSignalInfo
instance SignalInfo TextViewMoveCursorSignalInfo where
type HaskellCallbackType TextViewMoveCursorSignalInfo = TextViewMoveCursorCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_TextViewMoveCursorCallback cb
cb'' <- mk_TextViewMoveCursorCallback cb'
connectSignalFunPtr obj "move-cursor" cb'' connectMode
data TextViewMoveViewportSignalInfo
instance SignalInfo TextViewMoveViewportSignalInfo where
type HaskellCallbackType TextViewMoveViewportSignalInfo = TextViewMoveViewportCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_TextViewMoveViewportCallback cb
cb'' <- mk_TextViewMoveViewportCallback cb'
connectSignalFunPtr obj "move-viewport" cb'' connectMode
data TextViewPasteClipboardSignalInfo
instance SignalInfo TextViewPasteClipboardSignalInfo where
type HaskellCallbackType TextViewPasteClipboardSignalInfo = TextViewPasteClipboardCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_TextViewPasteClipboardCallback cb
cb'' <- mk_TextViewPasteClipboardCallback cb'
connectSignalFunPtr obj "paste-clipboard" cb'' connectMode
data TextViewPopulatePopupSignalInfo
instance SignalInfo TextViewPopulatePopupSignalInfo where
type HaskellCallbackType TextViewPopulatePopupSignalInfo = TextViewPopulatePopupCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_TextViewPopulatePopupCallback cb
cb'' <- mk_TextViewPopulatePopupCallback cb'
connectSignalFunPtr obj "populate-popup" cb'' connectMode
data TextViewPreeditChangedSignalInfo
instance SignalInfo TextViewPreeditChangedSignalInfo where
type HaskellCallbackType TextViewPreeditChangedSignalInfo = TextViewPreeditChangedCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_TextViewPreeditChangedCallback cb
cb'' <- mk_TextViewPreeditChangedCallback cb'
connectSignalFunPtr obj "preedit-changed" cb'' connectMode
data TextViewSelectAllSignalInfo
instance SignalInfo TextViewSelectAllSignalInfo where
type HaskellCallbackType TextViewSelectAllSignalInfo = TextViewSelectAllCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_TextViewSelectAllCallback cb
cb'' <- mk_TextViewSelectAllCallback cb'
connectSignalFunPtr obj "select-all" cb'' connectMode
data TextViewSetAnchorSignalInfo
instance SignalInfo TextViewSetAnchorSignalInfo where
type HaskellCallbackType TextViewSetAnchorSignalInfo = TextViewSetAnchorCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_TextViewSetAnchorCallback cb
cb'' <- mk_TextViewSetAnchorCallback cb'
connectSignalFunPtr obj "set-anchor" cb'' connectMode
data TextViewToggleCursorVisibleSignalInfo
instance SignalInfo TextViewToggleCursorVisibleSignalInfo where
type HaskellCallbackType TextViewToggleCursorVisibleSignalInfo = TextViewToggleCursorVisibleCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_TextViewToggleCursorVisibleCallback cb
cb'' <- mk_TextViewToggleCursorVisibleCallback cb'
connectSignalFunPtr obj "toggle-cursor-visible" cb'' connectMode
data TextViewToggleOverwriteSignalInfo
instance SignalInfo TextViewToggleOverwriteSignalInfo where
type HaskellCallbackType TextViewToggleOverwriteSignalInfo = TextViewToggleOverwriteCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_TextViewToggleOverwriteCallback cb
cb'' <- mk_TextViewToggleOverwriteCallback cb'
connectSignalFunPtr obj "toggle-overwrite" cb'' connectMode
type instance O.SignalList TextView = TextViewSignalList
type TextViewSignalList = ('[ '("accelClosuresChanged", Gtk.Widget.WidgetAccelClosuresChangedSignalInfo), '("add", Gtk.Container.ContainerAddSignalInfo), '("backspace", TextViewBackspaceSignalInfo), '("buttonPressEvent", Gtk.Widget.WidgetButtonPressEventSignalInfo), '("buttonReleaseEvent", Gtk.Widget.WidgetButtonReleaseEventSignalInfo), '("canActivateAccel", Gtk.Widget.WidgetCanActivateAccelSignalInfo), '("checkResize", Gtk.Container.ContainerCheckResizeSignalInfo), '("childNotify", Gtk.Widget.WidgetChildNotifySignalInfo), '("compositedChanged", Gtk.Widget.WidgetCompositedChangedSignalInfo), '("configureEvent", Gtk.Widget.WidgetConfigureEventSignalInfo), '("copyClipboard", TextViewCopyClipboardSignalInfo), '("cutClipboard", TextViewCutClipboardSignalInfo), '("damageEvent", Gtk.Widget.WidgetDamageEventSignalInfo), '("deleteEvent", Gtk.Widget.WidgetDeleteEventSignalInfo), '("deleteFromCursor", TextViewDeleteFromCursorSignalInfo), '("destroy", Gtk.Widget.WidgetDestroySignalInfo), '("destroyEvent", Gtk.Widget.WidgetDestroyEventSignalInfo), '("directionChanged", Gtk.Widget.WidgetDirectionChangedSignalInfo), '("dragBegin", Gtk.Widget.WidgetDragBeginSignalInfo), '("dragDataDelete", Gtk.Widget.WidgetDragDataDeleteSignalInfo), '("dragDataGet", Gtk.Widget.WidgetDragDataGetSignalInfo), '("dragDataReceived", Gtk.Widget.WidgetDragDataReceivedSignalInfo), '("dragDrop", Gtk.Widget.WidgetDragDropSignalInfo), '("dragEnd", Gtk.Widget.WidgetDragEndSignalInfo), '("dragFailed", Gtk.Widget.WidgetDragFailedSignalInfo), '("dragLeave", Gtk.Widget.WidgetDragLeaveSignalInfo), '("dragMotion", Gtk.Widget.WidgetDragMotionSignalInfo), '("draw", Gtk.Widget.WidgetDrawSignalInfo), '("enterNotifyEvent", Gtk.Widget.WidgetEnterNotifyEventSignalInfo), '("event", Gtk.Widget.WidgetEventSignalInfo), '("eventAfter", Gtk.Widget.WidgetEventAfterSignalInfo), '("extendSelection", TextViewExtendSelectionSignalInfo), '("focus", Gtk.Widget.WidgetFocusSignalInfo), '("focusInEvent", Gtk.Widget.WidgetFocusInEventSignalInfo), '("focusOutEvent", Gtk.Widget.WidgetFocusOutEventSignalInfo), '("grabBrokenEvent", Gtk.Widget.WidgetGrabBrokenEventSignalInfo), '("grabFocus", Gtk.Widget.WidgetGrabFocusSignalInfo), '("grabNotify", Gtk.Widget.WidgetGrabNotifySignalInfo), '("hide", Gtk.Widget.WidgetHideSignalInfo), '("hierarchyChanged", Gtk.Widget.WidgetHierarchyChangedSignalInfo), '("insertAtCursor", TextViewInsertAtCursorSignalInfo), '("insertEmoji", TextViewInsertEmojiSignalInfo), '("keyPressEvent", Gtk.Widget.WidgetKeyPressEventSignalInfo), '("keyReleaseEvent", Gtk.Widget.WidgetKeyReleaseEventSignalInfo), '("keynavFailed", Gtk.Widget.WidgetKeynavFailedSignalInfo), '("leaveNotifyEvent", Gtk.Widget.WidgetLeaveNotifyEventSignalInfo), '("map", Gtk.Widget.WidgetMapSignalInfo), '("mapEvent", Gtk.Widget.WidgetMapEventSignalInfo), '("mnemonicActivate", Gtk.Widget.WidgetMnemonicActivateSignalInfo), '("motionNotifyEvent", Gtk.Widget.WidgetMotionNotifyEventSignalInfo), '("moveCursor", TextViewMoveCursorSignalInfo), '("moveFocus", Gtk.Widget.WidgetMoveFocusSignalInfo), '("moveViewport", TextViewMoveViewportSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo), '("parentSet", Gtk.Widget.WidgetParentSetSignalInfo), '("pasteClipboard", TextViewPasteClipboardSignalInfo), '("populatePopup", TextViewPopulatePopupSignalInfo), '("popupMenu", Gtk.Widget.WidgetPopupMenuSignalInfo), '("preeditChanged", TextViewPreeditChangedSignalInfo), '("propertyNotifyEvent", Gtk.Widget.WidgetPropertyNotifyEventSignalInfo), '("proximityInEvent", Gtk.Widget.WidgetProximityInEventSignalInfo), '("proximityOutEvent", Gtk.Widget.WidgetProximityOutEventSignalInfo), '("queryTooltip", Gtk.Widget.WidgetQueryTooltipSignalInfo), '("realize", Gtk.Widget.WidgetRealizeSignalInfo), '("remove", Gtk.Container.ContainerRemoveSignalInfo), '("screenChanged", Gtk.Widget.WidgetScreenChangedSignalInfo), '("scrollEvent", Gtk.Widget.WidgetScrollEventSignalInfo), '("selectAll", TextViewSelectAllSignalInfo), '("selectionClearEvent", Gtk.Widget.WidgetSelectionClearEventSignalInfo), '("selectionGet", Gtk.Widget.WidgetSelectionGetSignalInfo), '("selectionNotifyEvent", Gtk.Widget.WidgetSelectionNotifyEventSignalInfo), '("selectionReceived", Gtk.Widget.WidgetSelectionReceivedSignalInfo), '("selectionRequestEvent", Gtk.Widget.WidgetSelectionRequestEventSignalInfo), '("setAnchor", TextViewSetAnchorSignalInfo), '("setFocusChild", Gtk.Container.ContainerSetFocusChildSignalInfo), '("show", Gtk.Widget.WidgetShowSignalInfo), '("showHelp", Gtk.Widget.WidgetShowHelpSignalInfo), '("sizeAllocate", Gtk.Widget.WidgetSizeAllocateSignalInfo), '("stateChanged", Gtk.Widget.WidgetStateChangedSignalInfo), '("stateFlagsChanged", Gtk.Widget.WidgetStateFlagsChangedSignalInfo), '("styleSet", Gtk.Widget.WidgetStyleSetSignalInfo), '("styleUpdated", Gtk.Widget.WidgetStyleUpdatedSignalInfo), '("toggleCursorVisible", TextViewToggleCursorVisibleSignalInfo), '("toggleOverwrite", TextViewToggleOverwriteSignalInfo), '("touchEvent", Gtk.Widget.WidgetTouchEventSignalInfo), '("unmap", Gtk.Widget.WidgetUnmapSignalInfo), '("unmapEvent", Gtk.Widget.WidgetUnmapEventSignalInfo), '("unrealize", Gtk.Widget.WidgetUnrealizeSignalInfo), '("visibilityNotifyEvent", Gtk.Widget.WidgetVisibilityNotifyEventSignalInfo), '("windowStateEvent", Gtk.Widget.WidgetWindowStateEventSignalInfo)] :: [(Symbol, *)])
#endif
foreign import ccall "gtk_text_view_new" gtk_text_view_new ::
IO (Ptr TextView)
textViewNew ::
(B.CallStack.HasCallStack, MonadIO m) =>
m TextView
textViewNew = liftIO $ do
result <- gtk_text_view_new
checkUnexpectedReturnNULL "textViewNew" result
result' <- (newObject TextView) result
return result'
#if ENABLE_OVERLOADING
#endif
foreign import ccall "gtk_text_view_new_with_buffer" gtk_text_view_new_with_buffer ::
Ptr Gtk.TextBuffer.TextBuffer ->
IO (Ptr TextView)
textViewNewWithBuffer ::
(B.CallStack.HasCallStack, MonadIO m, Gtk.TextBuffer.IsTextBuffer a) =>
a
-> m TextView
textViewNewWithBuffer buffer = liftIO $ do
buffer' <- unsafeManagedPtrCastPtr buffer
result <- gtk_text_view_new_with_buffer buffer'
checkUnexpectedReturnNULL "textViewNewWithBuffer" result
result' <- (newObject TextView) result
touchManagedPtr buffer
return result'
#if ENABLE_OVERLOADING
#endif
foreign import ccall "gtk_text_view_add_child_at_anchor" gtk_text_view_add_child_at_anchor ::
Ptr TextView ->
Ptr Gtk.Widget.Widget ->
Ptr Gtk.TextChildAnchor.TextChildAnchor ->
IO ()
textViewAddChildAtAnchor ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a, Gtk.Widget.IsWidget b, Gtk.TextChildAnchor.IsTextChildAnchor c) =>
a
-> b
-> c
-> m ()
textViewAddChildAtAnchor textView child anchor = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
child' <- unsafeManagedPtrCastPtr child
anchor' <- unsafeManagedPtrCastPtr anchor
gtk_text_view_add_child_at_anchor textView' child' anchor'
touchManagedPtr textView
touchManagedPtr child
touchManagedPtr anchor
return ()
#if ENABLE_OVERLOADING
data TextViewAddChildAtAnchorMethodInfo
instance (signature ~ (b -> c -> m ()), MonadIO m, IsTextView a, Gtk.Widget.IsWidget b, Gtk.TextChildAnchor.IsTextChildAnchor c) => O.MethodInfo TextViewAddChildAtAnchorMethodInfo a signature where
overloadedMethod _ = textViewAddChildAtAnchor
#endif
foreign import ccall "gtk_text_view_add_child_in_window" gtk_text_view_add_child_in_window ::
Ptr TextView ->
Ptr Gtk.Widget.Widget ->
CUInt ->
Int32 ->
Int32 ->
IO ()
textViewAddChildInWindow ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a, Gtk.Widget.IsWidget b) =>
a
-> b
-> Gtk.Enums.TextWindowType
-> Int32
-> Int32
-> m ()
textViewAddChildInWindow textView child whichWindow xpos ypos = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
child' <- unsafeManagedPtrCastPtr child
let whichWindow' = (fromIntegral . fromEnum) whichWindow
gtk_text_view_add_child_in_window textView' child' whichWindow' xpos ypos
touchManagedPtr textView
touchManagedPtr child
return ()
#if ENABLE_OVERLOADING
data TextViewAddChildInWindowMethodInfo
instance (signature ~ (b -> Gtk.Enums.TextWindowType -> Int32 -> Int32 -> m ()), MonadIO m, IsTextView a, Gtk.Widget.IsWidget b) => O.MethodInfo TextViewAddChildInWindowMethodInfo a signature where
overloadedMethod _ = textViewAddChildInWindow
#endif
foreign import ccall "gtk_text_view_backward_display_line" gtk_text_view_backward_display_line ::
Ptr TextView ->
Ptr Gtk.TextIter.TextIter ->
IO CInt
textViewBackwardDisplayLine ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Gtk.TextIter.TextIter
-> m Bool
textViewBackwardDisplayLine textView iter = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
iter' <- unsafeManagedPtrGetPtr iter
result <- gtk_text_view_backward_display_line textView' iter'
let result' = (/= 0) result
touchManagedPtr textView
touchManagedPtr iter
return result'
#if ENABLE_OVERLOADING
data TextViewBackwardDisplayLineMethodInfo
instance (signature ~ (Gtk.TextIter.TextIter -> m Bool), MonadIO m, IsTextView a) => O.MethodInfo TextViewBackwardDisplayLineMethodInfo a signature where
overloadedMethod _ = textViewBackwardDisplayLine
#endif
foreign import ccall "gtk_text_view_backward_display_line_start" gtk_text_view_backward_display_line_start ::
Ptr TextView ->
Ptr Gtk.TextIter.TextIter ->
IO CInt
textViewBackwardDisplayLineStart ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Gtk.TextIter.TextIter
-> m Bool
textViewBackwardDisplayLineStart textView iter = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
iter' <- unsafeManagedPtrGetPtr iter
result <- gtk_text_view_backward_display_line_start textView' iter'
let result' = (/= 0) result
touchManagedPtr textView
touchManagedPtr iter
return result'
#if ENABLE_OVERLOADING
data TextViewBackwardDisplayLineStartMethodInfo
instance (signature ~ (Gtk.TextIter.TextIter -> m Bool), MonadIO m, IsTextView a) => O.MethodInfo TextViewBackwardDisplayLineStartMethodInfo a signature where
overloadedMethod _ = textViewBackwardDisplayLineStart
#endif
foreign import ccall "gtk_text_view_buffer_to_window_coords" gtk_text_view_buffer_to_window_coords ::
Ptr TextView ->
CUInt ->
Int32 ->
Int32 ->
Ptr Int32 ->
Ptr Int32 ->
IO ()
textViewBufferToWindowCoords ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Gtk.Enums.TextWindowType
-> Int32
-> Int32
-> m ((Int32, Int32))
textViewBufferToWindowCoords textView win bufferX bufferY = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
let win' = (fromIntegral . fromEnum) win
windowX <- allocMem :: IO (Ptr Int32)
windowY <- allocMem :: IO (Ptr Int32)
gtk_text_view_buffer_to_window_coords textView' win' bufferX bufferY windowX windowY
windowX' <- peek windowX
windowY' <- peek windowY
touchManagedPtr textView
freeMem windowX
freeMem windowY
return (windowX', windowY')
#if ENABLE_OVERLOADING
data TextViewBufferToWindowCoordsMethodInfo
instance (signature ~ (Gtk.Enums.TextWindowType -> Int32 -> Int32 -> m ((Int32, Int32))), MonadIO m, IsTextView a) => O.MethodInfo TextViewBufferToWindowCoordsMethodInfo a signature where
overloadedMethod _ = textViewBufferToWindowCoords
#endif
foreign import ccall "gtk_text_view_forward_display_line" gtk_text_view_forward_display_line ::
Ptr TextView ->
Ptr Gtk.TextIter.TextIter ->
IO CInt
textViewForwardDisplayLine ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Gtk.TextIter.TextIter
-> m Bool
textViewForwardDisplayLine textView iter = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
iter' <- unsafeManagedPtrGetPtr iter
result <- gtk_text_view_forward_display_line textView' iter'
let result' = (/= 0) result
touchManagedPtr textView
touchManagedPtr iter
return result'
#if ENABLE_OVERLOADING
data TextViewForwardDisplayLineMethodInfo
instance (signature ~ (Gtk.TextIter.TextIter -> m Bool), MonadIO m, IsTextView a) => O.MethodInfo TextViewForwardDisplayLineMethodInfo a signature where
overloadedMethod _ = textViewForwardDisplayLine
#endif
foreign import ccall "gtk_text_view_forward_display_line_end" gtk_text_view_forward_display_line_end ::
Ptr TextView ->
Ptr Gtk.TextIter.TextIter ->
IO CInt
textViewForwardDisplayLineEnd ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Gtk.TextIter.TextIter
-> m Bool
textViewForwardDisplayLineEnd textView iter = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
iter' <- unsafeManagedPtrGetPtr iter
result <- gtk_text_view_forward_display_line_end textView' iter'
let result' = (/= 0) result
touchManagedPtr textView
touchManagedPtr iter
return result'
#if ENABLE_OVERLOADING
data TextViewForwardDisplayLineEndMethodInfo
instance (signature ~ (Gtk.TextIter.TextIter -> m Bool), MonadIO m, IsTextView a) => O.MethodInfo TextViewForwardDisplayLineEndMethodInfo a signature where
overloadedMethod _ = textViewForwardDisplayLineEnd
#endif
foreign import ccall "gtk_text_view_get_accepts_tab" gtk_text_view_get_accepts_tab ::
Ptr TextView ->
IO CInt
textViewGetAcceptsTab ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> m Bool
textViewGetAcceptsTab textView = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
result <- gtk_text_view_get_accepts_tab textView'
let result' = (/= 0) result
touchManagedPtr textView
return result'
#if ENABLE_OVERLOADING
data TextViewGetAcceptsTabMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetAcceptsTabMethodInfo a signature where
overloadedMethod _ = textViewGetAcceptsTab
#endif
foreign import ccall "gtk_text_view_get_border_window_size" gtk_text_view_get_border_window_size ::
Ptr TextView ->
CUInt ->
IO Int32
textViewGetBorderWindowSize ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Gtk.Enums.TextWindowType
-> m Int32
textViewGetBorderWindowSize textView type_ = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
let type_' = (fromIntegral . fromEnum) type_
result <- gtk_text_view_get_border_window_size textView' type_'
touchManagedPtr textView
return result
#if ENABLE_OVERLOADING
data TextViewGetBorderWindowSizeMethodInfo
instance (signature ~ (Gtk.Enums.TextWindowType -> m Int32), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetBorderWindowSizeMethodInfo a signature where
overloadedMethod _ = textViewGetBorderWindowSize
#endif
foreign import ccall "gtk_text_view_get_bottom_margin" gtk_text_view_get_bottom_margin ::
Ptr TextView ->
IO Int32
textViewGetBottomMargin ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> m Int32
textViewGetBottomMargin textView = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
result <- gtk_text_view_get_bottom_margin textView'
touchManagedPtr textView
return result
#if ENABLE_OVERLOADING
data TextViewGetBottomMarginMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetBottomMarginMethodInfo a signature where
overloadedMethod _ = textViewGetBottomMargin
#endif
foreign import ccall "gtk_text_view_get_buffer" gtk_text_view_get_buffer ::
Ptr TextView ->
IO (Ptr Gtk.TextBuffer.TextBuffer)
textViewGetBuffer ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> m Gtk.TextBuffer.TextBuffer
textViewGetBuffer textView = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
result <- gtk_text_view_get_buffer textView'
checkUnexpectedReturnNULL "textViewGetBuffer" result
result' <- (newObject Gtk.TextBuffer.TextBuffer) result
touchManagedPtr textView
return result'
#if ENABLE_OVERLOADING
data TextViewGetBufferMethodInfo
instance (signature ~ (m Gtk.TextBuffer.TextBuffer), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetBufferMethodInfo a signature where
overloadedMethod _ = textViewGetBuffer
#endif
foreign import ccall "gtk_text_view_get_cursor_locations" gtk_text_view_get_cursor_locations ::
Ptr TextView ->
Ptr Gtk.TextIter.TextIter ->
Ptr Gdk.Rectangle.Rectangle ->
Ptr Gdk.Rectangle.Rectangle ->
IO ()
textViewGetCursorLocations ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Maybe (Gtk.TextIter.TextIter)
-> m ((Gdk.Rectangle.Rectangle, Gdk.Rectangle.Rectangle))
textViewGetCursorLocations textView iter = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
maybeIter <- case iter of
Nothing -> return nullPtr
Just jIter -> do
jIter' <- unsafeManagedPtrGetPtr jIter
return jIter'
strong <- callocBoxedBytes 16 :: IO (Ptr Gdk.Rectangle.Rectangle)
weak <- callocBoxedBytes 16 :: IO (Ptr Gdk.Rectangle.Rectangle)
gtk_text_view_get_cursor_locations textView' maybeIter strong weak
strong' <- (wrapBoxed Gdk.Rectangle.Rectangle) strong
weak' <- (wrapBoxed Gdk.Rectangle.Rectangle) weak
touchManagedPtr textView
whenJust iter touchManagedPtr
return (strong', weak')
#if ENABLE_OVERLOADING
data TextViewGetCursorLocationsMethodInfo
instance (signature ~ (Maybe (Gtk.TextIter.TextIter) -> m ((Gdk.Rectangle.Rectangle, Gdk.Rectangle.Rectangle))), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetCursorLocationsMethodInfo a signature where
overloadedMethod _ = textViewGetCursorLocations
#endif
foreign import ccall "gtk_text_view_get_cursor_visible" gtk_text_view_get_cursor_visible ::
Ptr TextView ->
IO CInt
textViewGetCursorVisible ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> m Bool
textViewGetCursorVisible textView = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
result <- gtk_text_view_get_cursor_visible textView'
let result' = (/= 0) result
touchManagedPtr textView
return result'
#if ENABLE_OVERLOADING
data TextViewGetCursorVisibleMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetCursorVisibleMethodInfo a signature where
overloadedMethod _ = textViewGetCursorVisible
#endif
foreign import ccall "gtk_text_view_get_default_attributes" gtk_text_view_get_default_attributes ::
Ptr TextView ->
IO (Ptr Gtk.TextAttributes.TextAttributes)
textViewGetDefaultAttributes ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> m Gtk.TextAttributes.TextAttributes
textViewGetDefaultAttributes textView = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
result <- gtk_text_view_get_default_attributes textView'
checkUnexpectedReturnNULL "textViewGetDefaultAttributes" result
result' <- (wrapBoxed Gtk.TextAttributes.TextAttributes) result
touchManagedPtr textView
return result'
#if ENABLE_OVERLOADING
data TextViewGetDefaultAttributesMethodInfo
instance (signature ~ (m Gtk.TextAttributes.TextAttributes), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetDefaultAttributesMethodInfo a signature where
overloadedMethod _ = textViewGetDefaultAttributes
#endif
foreign import ccall "gtk_text_view_get_editable" gtk_text_view_get_editable ::
Ptr TextView ->
IO CInt
textViewGetEditable ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> m Bool
textViewGetEditable textView = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
result <- gtk_text_view_get_editable textView'
let result' = (/= 0) result
touchManagedPtr textView
return result'
#if ENABLE_OVERLOADING
data TextViewGetEditableMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetEditableMethodInfo a signature where
overloadedMethod _ = textViewGetEditable
#endif
foreign import ccall "gtk_text_view_get_hadjustment" gtk_text_view_get_hadjustment ::
Ptr TextView ->
IO (Ptr Gtk.Adjustment.Adjustment)
{-# DEPRECATED textViewGetHadjustment ["(Since version 3.0)","Use 'GI.Gtk.Interfaces.Scrollable.scrollableGetHadjustment'"] #-}
textViewGetHadjustment ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> m Gtk.Adjustment.Adjustment
textViewGetHadjustment textView = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
result <- gtk_text_view_get_hadjustment textView'
checkUnexpectedReturnNULL "textViewGetHadjustment" result
result' <- (newObject Gtk.Adjustment.Adjustment) result
touchManagedPtr textView
return result'
#if ENABLE_OVERLOADING
data TextViewGetHadjustmentMethodInfo
instance (signature ~ (m Gtk.Adjustment.Adjustment), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetHadjustmentMethodInfo a signature where
overloadedMethod _ = textViewGetHadjustment
#endif
foreign import ccall "gtk_text_view_get_indent" gtk_text_view_get_indent ::
Ptr TextView ->
IO Int32
textViewGetIndent ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> m Int32
textViewGetIndent textView = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
result <- gtk_text_view_get_indent textView'
touchManagedPtr textView
return result
#if ENABLE_OVERLOADING
data TextViewGetIndentMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetIndentMethodInfo a signature where
overloadedMethod _ = textViewGetIndent
#endif
foreign import ccall "gtk_text_view_get_input_hints" gtk_text_view_get_input_hints ::
Ptr TextView ->
IO CUInt
textViewGetInputHints ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> m [Gtk.Flags.InputHints]
textViewGetInputHints textView = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
result <- gtk_text_view_get_input_hints textView'
let result' = wordToGFlags result
touchManagedPtr textView
return result'
#if ENABLE_OVERLOADING
data TextViewGetInputHintsMethodInfo
instance (signature ~ (m [Gtk.Flags.InputHints]), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetInputHintsMethodInfo a signature where
overloadedMethod _ = textViewGetInputHints
#endif
foreign import ccall "gtk_text_view_get_input_purpose" gtk_text_view_get_input_purpose ::
Ptr TextView ->
IO CUInt
textViewGetInputPurpose ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> m Gtk.Enums.InputPurpose
textViewGetInputPurpose textView = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
result <- gtk_text_view_get_input_purpose textView'
let result' = (toEnum . fromIntegral) result
touchManagedPtr textView
return result'
#if ENABLE_OVERLOADING
data TextViewGetInputPurposeMethodInfo
instance (signature ~ (m Gtk.Enums.InputPurpose), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetInputPurposeMethodInfo a signature where
overloadedMethod _ = textViewGetInputPurpose
#endif
foreign import ccall "gtk_text_view_get_iter_at_location" gtk_text_view_get_iter_at_location ::
Ptr TextView ->
Ptr Gtk.TextIter.TextIter ->
Int32 ->
Int32 ->
IO CInt
textViewGetIterAtLocation ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Int32
-> Int32
-> m ((Bool, Gtk.TextIter.TextIter))
textViewGetIterAtLocation textView x y = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
iter <- callocBoxedBytes 80 :: IO (Ptr Gtk.TextIter.TextIter)
result <- gtk_text_view_get_iter_at_location textView' iter x y
let result' = (/= 0) result
iter' <- (wrapBoxed Gtk.TextIter.TextIter) iter
touchManagedPtr textView
return (result', iter')
#if ENABLE_OVERLOADING
data TextViewGetIterAtLocationMethodInfo
instance (signature ~ (Int32 -> Int32 -> m ((Bool, Gtk.TextIter.TextIter))), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetIterAtLocationMethodInfo a signature where
overloadedMethod _ = textViewGetIterAtLocation
#endif
foreign import ccall "gtk_text_view_get_iter_at_position" gtk_text_view_get_iter_at_position ::
Ptr TextView ->
Ptr Gtk.TextIter.TextIter ->
Ptr Int32 ->
Int32 ->
Int32 ->
IO CInt
textViewGetIterAtPosition ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Int32
-> Int32
-> m ((Bool, Gtk.TextIter.TextIter, Int32))
textViewGetIterAtPosition textView x y = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
iter <- callocBoxedBytes 80 :: IO (Ptr Gtk.TextIter.TextIter)
trailing <- allocMem :: IO (Ptr Int32)
result <- gtk_text_view_get_iter_at_position textView' iter trailing x y
let result' = (/= 0) result
iter' <- (wrapBoxed Gtk.TextIter.TextIter) iter
trailing' <- peek trailing
touchManagedPtr textView
freeMem trailing
return (result', iter', trailing')
#if ENABLE_OVERLOADING
data TextViewGetIterAtPositionMethodInfo
instance (signature ~ (Int32 -> Int32 -> m ((Bool, Gtk.TextIter.TextIter, Int32))), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetIterAtPositionMethodInfo a signature where
overloadedMethod _ = textViewGetIterAtPosition
#endif
foreign import ccall "gtk_text_view_get_iter_location" gtk_text_view_get_iter_location ::
Ptr TextView ->
Ptr Gtk.TextIter.TextIter ->
Ptr Gdk.Rectangle.Rectangle ->
IO ()
textViewGetIterLocation ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Gtk.TextIter.TextIter
-> m (Gdk.Rectangle.Rectangle)
textViewGetIterLocation textView iter = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
iter' <- unsafeManagedPtrGetPtr iter
location <- callocBoxedBytes 16 :: IO (Ptr Gdk.Rectangle.Rectangle)
gtk_text_view_get_iter_location textView' iter' location
location' <- (wrapBoxed Gdk.Rectangle.Rectangle) location
touchManagedPtr textView
touchManagedPtr iter
return location'
#if ENABLE_OVERLOADING
data TextViewGetIterLocationMethodInfo
instance (signature ~ (Gtk.TextIter.TextIter -> m (Gdk.Rectangle.Rectangle)), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetIterLocationMethodInfo a signature where
overloadedMethod _ = textViewGetIterLocation
#endif
foreign import ccall "gtk_text_view_get_justification" gtk_text_view_get_justification ::
Ptr TextView ->
IO CUInt
textViewGetJustification ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> m Gtk.Enums.Justification
textViewGetJustification textView = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
result <- gtk_text_view_get_justification textView'
let result' = (toEnum . fromIntegral) result
touchManagedPtr textView
return result'
#if ENABLE_OVERLOADING
data TextViewGetJustificationMethodInfo
instance (signature ~ (m Gtk.Enums.Justification), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetJustificationMethodInfo a signature where
overloadedMethod _ = textViewGetJustification
#endif
foreign import ccall "gtk_text_view_get_left_margin" gtk_text_view_get_left_margin ::
Ptr TextView ->
IO Int32
textViewGetLeftMargin ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> m Int32
textViewGetLeftMargin textView = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
result <- gtk_text_view_get_left_margin textView'
touchManagedPtr textView
return result
#if ENABLE_OVERLOADING
data TextViewGetLeftMarginMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetLeftMarginMethodInfo a signature where
overloadedMethod _ = textViewGetLeftMargin
#endif
foreign import ccall "gtk_text_view_get_line_at_y" gtk_text_view_get_line_at_y ::
Ptr TextView ->
Ptr Gtk.TextIter.TextIter ->
Int32 ->
Ptr Int32 ->
IO ()
textViewGetLineAtY ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Int32
-> m ((Gtk.TextIter.TextIter, Int32))
textViewGetLineAtY textView y = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
targetIter <- callocBoxedBytes 80 :: IO (Ptr Gtk.TextIter.TextIter)
lineTop <- allocMem :: IO (Ptr Int32)
gtk_text_view_get_line_at_y textView' targetIter y lineTop
targetIter' <- (wrapBoxed Gtk.TextIter.TextIter) targetIter
lineTop' <- peek lineTop
touchManagedPtr textView
freeMem lineTop
return (targetIter', lineTop')
#if ENABLE_OVERLOADING
data TextViewGetLineAtYMethodInfo
instance (signature ~ (Int32 -> m ((Gtk.TextIter.TextIter, Int32))), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetLineAtYMethodInfo a signature where
overloadedMethod _ = textViewGetLineAtY
#endif
foreign import ccall "gtk_text_view_get_line_yrange" gtk_text_view_get_line_yrange ::
Ptr TextView ->
Ptr Gtk.TextIter.TextIter ->
Ptr Int32 ->
Ptr Int32 ->
IO ()
textViewGetLineYrange ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Gtk.TextIter.TextIter
-> m ((Int32, Int32))
textViewGetLineYrange textView iter = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
iter' <- unsafeManagedPtrGetPtr iter
y <- allocMem :: IO (Ptr Int32)
height <- allocMem :: IO (Ptr Int32)
gtk_text_view_get_line_yrange textView' iter' y height
y' <- peek y
height' <- peek height
touchManagedPtr textView
touchManagedPtr iter
freeMem y
freeMem height
return (y', height')
#if ENABLE_OVERLOADING
data TextViewGetLineYrangeMethodInfo
instance (signature ~ (Gtk.TextIter.TextIter -> m ((Int32, Int32))), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetLineYrangeMethodInfo a signature where
overloadedMethod _ = textViewGetLineYrange
#endif
foreign import ccall "gtk_text_view_get_monospace" gtk_text_view_get_monospace ::
Ptr TextView ->
IO CInt
textViewGetMonospace ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> m Bool
textViewGetMonospace textView = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
result <- gtk_text_view_get_monospace textView'
let result' = (/= 0) result
touchManagedPtr textView
return result'
#if ENABLE_OVERLOADING
data TextViewGetMonospaceMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetMonospaceMethodInfo a signature where
overloadedMethod _ = textViewGetMonospace
#endif
foreign import ccall "gtk_text_view_get_overwrite" gtk_text_view_get_overwrite ::
Ptr TextView ->
IO CInt
textViewGetOverwrite ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> m Bool
textViewGetOverwrite textView = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
result <- gtk_text_view_get_overwrite textView'
let result' = (/= 0) result
touchManagedPtr textView
return result'
#if ENABLE_OVERLOADING
data TextViewGetOverwriteMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetOverwriteMethodInfo a signature where
overloadedMethod _ = textViewGetOverwrite
#endif
foreign import ccall "gtk_text_view_get_pixels_above_lines" gtk_text_view_get_pixels_above_lines ::
Ptr TextView ->
IO Int32
textViewGetPixelsAboveLines ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> m Int32
textViewGetPixelsAboveLines textView = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
result <- gtk_text_view_get_pixels_above_lines textView'
touchManagedPtr textView
return result
#if ENABLE_OVERLOADING
data TextViewGetPixelsAboveLinesMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetPixelsAboveLinesMethodInfo a signature where
overloadedMethod _ = textViewGetPixelsAboveLines
#endif
foreign import ccall "gtk_text_view_get_pixels_below_lines" gtk_text_view_get_pixels_below_lines ::
Ptr TextView ->
IO Int32
textViewGetPixelsBelowLines ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> m Int32
textViewGetPixelsBelowLines textView = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
result <- gtk_text_view_get_pixels_below_lines textView'
touchManagedPtr textView
return result
#if ENABLE_OVERLOADING
data TextViewGetPixelsBelowLinesMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetPixelsBelowLinesMethodInfo a signature where
overloadedMethod _ = textViewGetPixelsBelowLines
#endif
foreign import ccall "gtk_text_view_get_pixels_inside_wrap" gtk_text_view_get_pixels_inside_wrap ::
Ptr TextView ->
IO Int32
textViewGetPixelsInsideWrap ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> m Int32
textViewGetPixelsInsideWrap textView = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
result <- gtk_text_view_get_pixels_inside_wrap textView'
touchManagedPtr textView
return result
#if ENABLE_OVERLOADING
data TextViewGetPixelsInsideWrapMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetPixelsInsideWrapMethodInfo a signature where
overloadedMethod _ = textViewGetPixelsInsideWrap
#endif
foreign import ccall "gtk_text_view_get_right_margin" gtk_text_view_get_right_margin ::
Ptr TextView ->
IO Int32
textViewGetRightMargin ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> m Int32
textViewGetRightMargin textView = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
result <- gtk_text_view_get_right_margin textView'
touchManagedPtr textView
return result
#if ENABLE_OVERLOADING
data TextViewGetRightMarginMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetRightMarginMethodInfo a signature where
overloadedMethod _ = textViewGetRightMargin
#endif
foreign import ccall "gtk_text_view_get_tabs" gtk_text_view_get_tabs ::
Ptr TextView ->
IO (Ptr Pango.TabArray.TabArray)
textViewGetTabs ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> m (Maybe Pango.TabArray.TabArray)
textViewGetTabs textView = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
result <- gtk_text_view_get_tabs textView'
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- (wrapBoxed Pango.TabArray.TabArray) result'
return result''
touchManagedPtr textView
return maybeResult
#if ENABLE_OVERLOADING
data TextViewGetTabsMethodInfo
instance (signature ~ (m (Maybe Pango.TabArray.TabArray)), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetTabsMethodInfo a signature where
overloadedMethod _ = textViewGetTabs
#endif
foreign import ccall "gtk_text_view_get_top_margin" gtk_text_view_get_top_margin ::
Ptr TextView ->
IO Int32
textViewGetTopMargin ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> m Int32
textViewGetTopMargin textView = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
result <- gtk_text_view_get_top_margin textView'
touchManagedPtr textView
return result
#if ENABLE_OVERLOADING
data TextViewGetTopMarginMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetTopMarginMethodInfo a signature where
overloadedMethod _ = textViewGetTopMargin
#endif
foreign import ccall "gtk_text_view_get_vadjustment" gtk_text_view_get_vadjustment ::
Ptr TextView ->
IO (Ptr Gtk.Adjustment.Adjustment)
{-# DEPRECATED textViewGetVadjustment ["(Since version 3.0)","Use 'GI.Gtk.Interfaces.Scrollable.scrollableGetVadjustment'"] #-}
textViewGetVadjustment ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> m Gtk.Adjustment.Adjustment
textViewGetVadjustment textView = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
result <- gtk_text_view_get_vadjustment textView'
checkUnexpectedReturnNULL "textViewGetVadjustment" result
result' <- (newObject Gtk.Adjustment.Adjustment) result
touchManagedPtr textView
return result'
#if ENABLE_OVERLOADING
data TextViewGetVadjustmentMethodInfo
instance (signature ~ (m Gtk.Adjustment.Adjustment), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetVadjustmentMethodInfo a signature where
overloadedMethod _ = textViewGetVadjustment
#endif
foreign import ccall "gtk_text_view_get_visible_rect" gtk_text_view_get_visible_rect ::
Ptr TextView ->
Ptr Gdk.Rectangle.Rectangle ->
IO ()
textViewGetVisibleRect ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> m (Gdk.Rectangle.Rectangle)
textViewGetVisibleRect textView = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
visibleRect <- callocBoxedBytes 16 :: IO (Ptr Gdk.Rectangle.Rectangle)
gtk_text_view_get_visible_rect textView' visibleRect
visibleRect' <- (wrapBoxed Gdk.Rectangle.Rectangle) visibleRect
touchManagedPtr textView
return visibleRect'
#if ENABLE_OVERLOADING
data TextViewGetVisibleRectMethodInfo
instance (signature ~ (m (Gdk.Rectangle.Rectangle)), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetVisibleRectMethodInfo a signature where
overloadedMethod _ = textViewGetVisibleRect
#endif
foreign import ccall "gtk_text_view_get_window" gtk_text_view_get_window ::
Ptr TextView ->
CUInt ->
IO (Ptr Gdk.Window.Window)
textViewGetWindow ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Gtk.Enums.TextWindowType
-> m (Maybe Gdk.Window.Window)
textViewGetWindow textView win = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
let win' = (fromIntegral . fromEnum) win
result <- gtk_text_view_get_window textView' win'
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- (newObject Gdk.Window.Window) result'
return result''
touchManagedPtr textView
return maybeResult
#if ENABLE_OVERLOADING
data TextViewGetWindowMethodInfo
instance (signature ~ (Gtk.Enums.TextWindowType -> m (Maybe Gdk.Window.Window)), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetWindowMethodInfo a signature where
overloadedMethod _ = textViewGetWindow
#endif
foreign import ccall "gtk_text_view_get_window_type" gtk_text_view_get_window_type ::
Ptr TextView ->
Ptr Gdk.Window.Window ->
IO CUInt
textViewGetWindowType ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a, Gdk.Window.IsWindow b) =>
a
-> b
-> m Gtk.Enums.TextWindowType
textViewGetWindowType textView window = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
window' <- unsafeManagedPtrCastPtr window
result <- gtk_text_view_get_window_type textView' window'
let result' = (toEnum . fromIntegral) result
touchManagedPtr textView
touchManagedPtr window
return result'
#if ENABLE_OVERLOADING
data TextViewGetWindowTypeMethodInfo
instance (signature ~ (b -> m Gtk.Enums.TextWindowType), MonadIO m, IsTextView a, Gdk.Window.IsWindow b) => O.MethodInfo TextViewGetWindowTypeMethodInfo a signature where
overloadedMethod _ = textViewGetWindowType
#endif
foreign import ccall "gtk_text_view_get_wrap_mode" gtk_text_view_get_wrap_mode ::
Ptr TextView ->
IO CUInt
textViewGetWrapMode ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> m Gtk.Enums.WrapMode
textViewGetWrapMode textView = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
result <- gtk_text_view_get_wrap_mode textView'
let result' = (toEnum . fromIntegral) result
touchManagedPtr textView
return result'
#if ENABLE_OVERLOADING
data TextViewGetWrapModeMethodInfo
instance (signature ~ (m Gtk.Enums.WrapMode), MonadIO m, IsTextView a) => O.MethodInfo TextViewGetWrapModeMethodInfo a signature where
overloadedMethod _ = textViewGetWrapMode
#endif
foreign import ccall "gtk_text_view_im_context_filter_keypress" gtk_text_view_im_context_filter_keypress ::
Ptr TextView ->
Ptr Gdk.EventKey.EventKey ->
IO CInt
textViewImContextFilterKeypress ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Gdk.EventKey.EventKey
-> m Bool
textViewImContextFilterKeypress textView event = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
event' <- unsafeManagedPtrGetPtr event
result <- gtk_text_view_im_context_filter_keypress textView' event'
let result' = (/= 0) result
touchManagedPtr textView
touchManagedPtr event
return result'
#if ENABLE_OVERLOADING
data TextViewImContextFilterKeypressMethodInfo
instance (signature ~ (Gdk.EventKey.EventKey -> m Bool), MonadIO m, IsTextView a) => O.MethodInfo TextViewImContextFilterKeypressMethodInfo a signature where
overloadedMethod _ = textViewImContextFilterKeypress
#endif
foreign import ccall "gtk_text_view_move_child" gtk_text_view_move_child ::
Ptr TextView ->
Ptr Gtk.Widget.Widget ->
Int32 ->
Int32 ->
IO ()
textViewMoveChild ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a, Gtk.Widget.IsWidget b) =>
a
-> b
-> Int32
-> Int32
-> m ()
textViewMoveChild textView child xpos ypos = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
child' <- unsafeManagedPtrCastPtr child
gtk_text_view_move_child textView' child' xpos ypos
touchManagedPtr textView
touchManagedPtr child
return ()
#if ENABLE_OVERLOADING
data TextViewMoveChildMethodInfo
instance (signature ~ (b -> Int32 -> Int32 -> m ()), MonadIO m, IsTextView a, Gtk.Widget.IsWidget b) => O.MethodInfo TextViewMoveChildMethodInfo a signature where
overloadedMethod _ = textViewMoveChild
#endif
foreign import ccall "gtk_text_view_move_mark_onscreen" gtk_text_view_move_mark_onscreen ::
Ptr TextView ->
Ptr Gtk.TextMark.TextMark ->
IO CInt
textViewMoveMarkOnscreen ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a, Gtk.TextMark.IsTextMark b) =>
a
-> b
-> m Bool
textViewMoveMarkOnscreen textView mark = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
mark' <- unsafeManagedPtrCastPtr mark
result <- gtk_text_view_move_mark_onscreen textView' mark'
let result' = (/= 0) result
touchManagedPtr textView
touchManagedPtr mark
return result'
#if ENABLE_OVERLOADING
data TextViewMoveMarkOnscreenMethodInfo
instance (signature ~ (b -> m Bool), MonadIO m, IsTextView a, Gtk.TextMark.IsTextMark b) => O.MethodInfo TextViewMoveMarkOnscreenMethodInfo a signature where
overloadedMethod _ = textViewMoveMarkOnscreen
#endif
foreign import ccall "gtk_text_view_move_visually" gtk_text_view_move_visually ::
Ptr TextView ->
Ptr Gtk.TextIter.TextIter ->
Int32 ->
IO CInt
textViewMoveVisually ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Gtk.TextIter.TextIter
-> Int32
-> m Bool
textViewMoveVisually textView iter count = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
iter' <- unsafeManagedPtrGetPtr iter
result <- gtk_text_view_move_visually textView' iter' count
let result' = (/= 0) result
touchManagedPtr textView
touchManagedPtr iter
return result'
#if ENABLE_OVERLOADING
data TextViewMoveVisuallyMethodInfo
instance (signature ~ (Gtk.TextIter.TextIter -> Int32 -> m Bool), MonadIO m, IsTextView a) => O.MethodInfo TextViewMoveVisuallyMethodInfo a signature where
overloadedMethod _ = textViewMoveVisually
#endif
foreign import ccall "gtk_text_view_place_cursor_onscreen" gtk_text_view_place_cursor_onscreen ::
Ptr TextView ->
IO CInt
textViewPlaceCursorOnscreen ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> m Bool
textViewPlaceCursorOnscreen textView = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
result <- gtk_text_view_place_cursor_onscreen textView'
let result' = (/= 0) result
touchManagedPtr textView
return result'
#if ENABLE_OVERLOADING
data TextViewPlaceCursorOnscreenMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsTextView a) => O.MethodInfo TextViewPlaceCursorOnscreenMethodInfo a signature where
overloadedMethod _ = textViewPlaceCursorOnscreen
#endif
foreign import ccall "gtk_text_view_reset_cursor_blink" gtk_text_view_reset_cursor_blink ::
Ptr TextView ->
IO ()
textViewResetCursorBlink ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> m ()
textViewResetCursorBlink textView = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
gtk_text_view_reset_cursor_blink textView'
touchManagedPtr textView
return ()
#if ENABLE_OVERLOADING
data TextViewResetCursorBlinkMethodInfo
instance (signature ~ (m ()), MonadIO m, IsTextView a) => O.MethodInfo TextViewResetCursorBlinkMethodInfo a signature where
overloadedMethod _ = textViewResetCursorBlink
#endif
foreign import ccall "gtk_text_view_reset_im_context" gtk_text_view_reset_im_context ::
Ptr TextView ->
IO ()
textViewResetImContext ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> m ()
textViewResetImContext textView = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
gtk_text_view_reset_im_context textView'
touchManagedPtr textView
return ()
#if ENABLE_OVERLOADING
data TextViewResetImContextMethodInfo
instance (signature ~ (m ()), MonadIO m, IsTextView a) => O.MethodInfo TextViewResetImContextMethodInfo a signature where
overloadedMethod _ = textViewResetImContext
#endif
foreign import ccall "gtk_text_view_scroll_mark_onscreen" gtk_text_view_scroll_mark_onscreen ::
Ptr TextView ->
Ptr Gtk.TextMark.TextMark ->
IO ()
textViewScrollMarkOnscreen ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a, Gtk.TextMark.IsTextMark b) =>
a
-> b
-> m ()
textViewScrollMarkOnscreen textView mark = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
mark' <- unsafeManagedPtrCastPtr mark
gtk_text_view_scroll_mark_onscreen textView' mark'
touchManagedPtr textView
touchManagedPtr mark
return ()
#if ENABLE_OVERLOADING
data TextViewScrollMarkOnscreenMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsTextView a, Gtk.TextMark.IsTextMark b) => O.MethodInfo TextViewScrollMarkOnscreenMethodInfo a signature where
overloadedMethod _ = textViewScrollMarkOnscreen
#endif
foreign import ccall "gtk_text_view_scroll_to_iter" gtk_text_view_scroll_to_iter ::
Ptr TextView ->
Ptr Gtk.TextIter.TextIter ->
CDouble ->
CInt ->
CDouble ->
CDouble ->
IO CInt
textViewScrollToIter ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Gtk.TextIter.TextIter
-> Double
-> Bool
-> Double
-> Double
-> m Bool
textViewScrollToIter textView iter withinMargin useAlign xalign yalign = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
iter' <- unsafeManagedPtrGetPtr iter
let withinMargin' = realToFrac withinMargin
let useAlign' = (fromIntegral . fromEnum) useAlign
let xalign' = realToFrac xalign
let yalign' = realToFrac yalign
result <- gtk_text_view_scroll_to_iter textView' iter' withinMargin' useAlign' xalign' yalign'
let result' = (/= 0) result
touchManagedPtr textView
touchManagedPtr iter
return result'
#if ENABLE_OVERLOADING
data TextViewScrollToIterMethodInfo
instance (signature ~ (Gtk.TextIter.TextIter -> Double -> Bool -> Double -> Double -> m Bool), MonadIO m, IsTextView a) => O.MethodInfo TextViewScrollToIterMethodInfo a signature where
overloadedMethod _ = textViewScrollToIter
#endif
foreign import ccall "gtk_text_view_scroll_to_mark" gtk_text_view_scroll_to_mark ::
Ptr TextView ->
Ptr Gtk.TextMark.TextMark ->
CDouble ->
CInt ->
CDouble ->
CDouble ->
IO ()
textViewScrollToMark ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a, Gtk.TextMark.IsTextMark b) =>
a
-> b
-> Double
-> Bool
-> Double
-> Double
-> m ()
textViewScrollToMark textView mark withinMargin useAlign xalign yalign = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
mark' <- unsafeManagedPtrCastPtr mark
let withinMargin' = realToFrac withinMargin
let useAlign' = (fromIntegral . fromEnum) useAlign
let xalign' = realToFrac xalign
let yalign' = realToFrac yalign
gtk_text_view_scroll_to_mark textView' mark' withinMargin' useAlign' xalign' yalign'
touchManagedPtr textView
touchManagedPtr mark
return ()
#if ENABLE_OVERLOADING
data TextViewScrollToMarkMethodInfo
instance (signature ~ (b -> Double -> Bool -> Double -> Double -> m ()), MonadIO m, IsTextView a, Gtk.TextMark.IsTextMark b) => O.MethodInfo TextViewScrollToMarkMethodInfo a signature where
overloadedMethod _ = textViewScrollToMark
#endif
foreign import ccall "gtk_text_view_set_accepts_tab" gtk_text_view_set_accepts_tab ::
Ptr TextView ->
CInt ->
IO ()
textViewSetAcceptsTab ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Bool
-> m ()
textViewSetAcceptsTab textView acceptsTab = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
let acceptsTab' = (fromIntegral . fromEnum) acceptsTab
gtk_text_view_set_accepts_tab textView' acceptsTab'
touchManagedPtr textView
return ()
#if ENABLE_OVERLOADING
data TextViewSetAcceptsTabMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsTextView a) => O.MethodInfo TextViewSetAcceptsTabMethodInfo a signature where
overloadedMethod _ = textViewSetAcceptsTab
#endif
foreign import ccall "gtk_text_view_set_border_window_size" gtk_text_view_set_border_window_size ::
Ptr TextView ->
CUInt ->
Int32 ->
IO ()
textViewSetBorderWindowSize ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Gtk.Enums.TextWindowType
-> Int32
-> m ()
textViewSetBorderWindowSize textView type_ size = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
let type_' = (fromIntegral . fromEnum) type_
gtk_text_view_set_border_window_size textView' type_' size
touchManagedPtr textView
return ()
#if ENABLE_OVERLOADING
data TextViewSetBorderWindowSizeMethodInfo
instance (signature ~ (Gtk.Enums.TextWindowType -> Int32 -> m ()), MonadIO m, IsTextView a) => O.MethodInfo TextViewSetBorderWindowSizeMethodInfo a signature where
overloadedMethod _ = textViewSetBorderWindowSize
#endif
foreign import ccall "gtk_text_view_set_bottom_margin" gtk_text_view_set_bottom_margin ::
Ptr TextView ->
Int32 ->
IO ()
textViewSetBottomMargin ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Int32
-> m ()
textViewSetBottomMargin textView bottomMargin = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
gtk_text_view_set_bottom_margin textView' bottomMargin
touchManagedPtr textView
return ()
#if ENABLE_OVERLOADING
data TextViewSetBottomMarginMethodInfo
instance (signature ~ (Int32 -> m ()), MonadIO m, IsTextView a) => O.MethodInfo TextViewSetBottomMarginMethodInfo a signature where
overloadedMethod _ = textViewSetBottomMargin
#endif
foreign import ccall "gtk_text_view_set_buffer" gtk_text_view_set_buffer ::
Ptr TextView ->
Ptr Gtk.TextBuffer.TextBuffer ->
IO ()
textViewSetBuffer ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a, Gtk.TextBuffer.IsTextBuffer b) =>
a
-> Maybe (b)
-> m ()
textViewSetBuffer textView buffer = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
maybeBuffer <- case buffer of
Nothing -> return nullPtr
Just jBuffer -> do
jBuffer' <- unsafeManagedPtrCastPtr jBuffer
return jBuffer'
gtk_text_view_set_buffer textView' maybeBuffer
touchManagedPtr textView
whenJust buffer touchManagedPtr
return ()
#if ENABLE_OVERLOADING
data TextViewSetBufferMethodInfo
instance (signature ~ (Maybe (b) -> m ()), MonadIO m, IsTextView a, Gtk.TextBuffer.IsTextBuffer b) => O.MethodInfo TextViewSetBufferMethodInfo a signature where
overloadedMethod _ = textViewSetBuffer
#endif
foreign import ccall "gtk_text_view_set_cursor_visible" gtk_text_view_set_cursor_visible ::
Ptr TextView ->
CInt ->
IO ()
textViewSetCursorVisible ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Bool
-> m ()
textViewSetCursorVisible textView setting = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
let setting' = (fromIntegral . fromEnum) setting
gtk_text_view_set_cursor_visible textView' setting'
touchManagedPtr textView
return ()
#if ENABLE_OVERLOADING
data TextViewSetCursorVisibleMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsTextView a) => O.MethodInfo TextViewSetCursorVisibleMethodInfo a signature where
overloadedMethod _ = textViewSetCursorVisible
#endif
foreign import ccall "gtk_text_view_set_editable" gtk_text_view_set_editable ::
Ptr TextView ->
CInt ->
IO ()
textViewSetEditable ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Bool
-> m ()
textViewSetEditable textView setting = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
let setting' = (fromIntegral . fromEnum) setting
gtk_text_view_set_editable textView' setting'
touchManagedPtr textView
return ()
#if ENABLE_OVERLOADING
data TextViewSetEditableMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsTextView a) => O.MethodInfo TextViewSetEditableMethodInfo a signature where
overloadedMethod _ = textViewSetEditable
#endif
foreign import ccall "gtk_text_view_set_indent" gtk_text_view_set_indent ::
Ptr TextView ->
Int32 ->
IO ()
textViewSetIndent ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Int32
-> m ()
textViewSetIndent textView indent = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
gtk_text_view_set_indent textView' indent
touchManagedPtr textView
return ()
#if ENABLE_OVERLOADING
data TextViewSetIndentMethodInfo
instance (signature ~ (Int32 -> m ()), MonadIO m, IsTextView a) => O.MethodInfo TextViewSetIndentMethodInfo a signature where
overloadedMethod _ = textViewSetIndent
#endif
foreign import ccall "gtk_text_view_set_input_hints" gtk_text_view_set_input_hints ::
Ptr TextView ->
CUInt ->
IO ()
textViewSetInputHints ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> [Gtk.Flags.InputHints]
-> m ()
textViewSetInputHints textView hints = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
let hints' = gflagsToWord hints
gtk_text_view_set_input_hints textView' hints'
touchManagedPtr textView
return ()
#if ENABLE_OVERLOADING
data TextViewSetInputHintsMethodInfo
instance (signature ~ ([Gtk.Flags.InputHints] -> m ()), MonadIO m, IsTextView a) => O.MethodInfo TextViewSetInputHintsMethodInfo a signature where
overloadedMethod _ = textViewSetInputHints
#endif
foreign import ccall "gtk_text_view_set_input_purpose" gtk_text_view_set_input_purpose ::
Ptr TextView ->
CUInt ->
IO ()
textViewSetInputPurpose ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Gtk.Enums.InputPurpose
-> m ()
textViewSetInputPurpose textView purpose = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
let purpose' = (fromIntegral . fromEnum) purpose
gtk_text_view_set_input_purpose textView' purpose'
touchManagedPtr textView
return ()
#if ENABLE_OVERLOADING
data TextViewSetInputPurposeMethodInfo
instance (signature ~ (Gtk.Enums.InputPurpose -> m ()), MonadIO m, IsTextView a) => O.MethodInfo TextViewSetInputPurposeMethodInfo a signature where
overloadedMethod _ = textViewSetInputPurpose
#endif
foreign import ccall "gtk_text_view_set_justification" gtk_text_view_set_justification ::
Ptr TextView ->
CUInt ->
IO ()
textViewSetJustification ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Gtk.Enums.Justification
-> m ()
textViewSetJustification textView justification = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
let justification' = (fromIntegral . fromEnum) justification
gtk_text_view_set_justification textView' justification'
touchManagedPtr textView
return ()
#if ENABLE_OVERLOADING
data TextViewSetJustificationMethodInfo
instance (signature ~ (Gtk.Enums.Justification -> m ()), MonadIO m, IsTextView a) => O.MethodInfo TextViewSetJustificationMethodInfo a signature where
overloadedMethod _ = textViewSetJustification
#endif
foreign import ccall "gtk_text_view_set_left_margin" gtk_text_view_set_left_margin ::
Ptr TextView ->
Int32 ->
IO ()
textViewSetLeftMargin ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Int32
-> m ()
textViewSetLeftMargin textView leftMargin = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
gtk_text_view_set_left_margin textView' leftMargin
touchManagedPtr textView
return ()
#if ENABLE_OVERLOADING
data TextViewSetLeftMarginMethodInfo
instance (signature ~ (Int32 -> m ()), MonadIO m, IsTextView a) => O.MethodInfo TextViewSetLeftMarginMethodInfo a signature where
overloadedMethod _ = textViewSetLeftMargin
#endif
foreign import ccall "gtk_text_view_set_monospace" gtk_text_view_set_monospace ::
Ptr TextView ->
CInt ->
IO ()
textViewSetMonospace ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Bool
-> m ()
textViewSetMonospace textView monospace = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
let monospace' = (fromIntegral . fromEnum) monospace
gtk_text_view_set_monospace textView' monospace'
touchManagedPtr textView
return ()
#if ENABLE_OVERLOADING
data TextViewSetMonospaceMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsTextView a) => O.MethodInfo TextViewSetMonospaceMethodInfo a signature where
overloadedMethod _ = textViewSetMonospace
#endif
foreign import ccall "gtk_text_view_set_overwrite" gtk_text_view_set_overwrite ::
Ptr TextView ->
CInt ->
IO ()
textViewSetOverwrite ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Bool
-> m ()
textViewSetOverwrite textView overwrite = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
let overwrite' = (fromIntegral . fromEnum) overwrite
gtk_text_view_set_overwrite textView' overwrite'
touchManagedPtr textView
return ()
#if ENABLE_OVERLOADING
data TextViewSetOverwriteMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsTextView a) => O.MethodInfo TextViewSetOverwriteMethodInfo a signature where
overloadedMethod _ = textViewSetOverwrite
#endif
foreign import ccall "gtk_text_view_set_pixels_above_lines" gtk_text_view_set_pixels_above_lines ::
Ptr TextView ->
Int32 ->
IO ()
textViewSetPixelsAboveLines ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Int32
-> m ()
textViewSetPixelsAboveLines textView pixelsAboveLines = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
gtk_text_view_set_pixels_above_lines textView' pixelsAboveLines
touchManagedPtr textView
return ()
#if ENABLE_OVERLOADING
data TextViewSetPixelsAboveLinesMethodInfo
instance (signature ~ (Int32 -> m ()), MonadIO m, IsTextView a) => O.MethodInfo TextViewSetPixelsAboveLinesMethodInfo a signature where
overloadedMethod _ = textViewSetPixelsAboveLines
#endif
foreign import ccall "gtk_text_view_set_pixels_below_lines" gtk_text_view_set_pixels_below_lines ::
Ptr TextView ->
Int32 ->
IO ()
textViewSetPixelsBelowLines ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Int32
-> m ()
textViewSetPixelsBelowLines textView pixelsBelowLines = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
gtk_text_view_set_pixels_below_lines textView' pixelsBelowLines
touchManagedPtr textView
return ()
#if ENABLE_OVERLOADING
data TextViewSetPixelsBelowLinesMethodInfo
instance (signature ~ (Int32 -> m ()), MonadIO m, IsTextView a) => O.MethodInfo TextViewSetPixelsBelowLinesMethodInfo a signature where
overloadedMethod _ = textViewSetPixelsBelowLines
#endif
foreign import ccall "gtk_text_view_set_pixels_inside_wrap" gtk_text_view_set_pixels_inside_wrap ::
Ptr TextView ->
Int32 ->
IO ()
textViewSetPixelsInsideWrap ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Int32
-> m ()
textViewSetPixelsInsideWrap textView pixelsInsideWrap = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
gtk_text_view_set_pixels_inside_wrap textView' pixelsInsideWrap
touchManagedPtr textView
return ()
#if ENABLE_OVERLOADING
data TextViewSetPixelsInsideWrapMethodInfo
instance (signature ~ (Int32 -> m ()), MonadIO m, IsTextView a) => O.MethodInfo TextViewSetPixelsInsideWrapMethodInfo a signature where
overloadedMethod _ = textViewSetPixelsInsideWrap
#endif
foreign import ccall "gtk_text_view_set_right_margin" gtk_text_view_set_right_margin ::
Ptr TextView ->
Int32 ->
IO ()
textViewSetRightMargin ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Int32
-> m ()
textViewSetRightMargin textView rightMargin = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
gtk_text_view_set_right_margin textView' rightMargin
touchManagedPtr textView
return ()
#if ENABLE_OVERLOADING
data TextViewSetRightMarginMethodInfo
instance (signature ~ (Int32 -> m ()), MonadIO m, IsTextView a) => O.MethodInfo TextViewSetRightMarginMethodInfo a signature where
overloadedMethod _ = textViewSetRightMargin
#endif
foreign import ccall "gtk_text_view_set_tabs" gtk_text_view_set_tabs ::
Ptr TextView ->
Ptr Pango.TabArray.TabArray ->
IO ()
textViewSetTabs ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Pango.TabArray.TabArray
-> m ()
textViewSetTabs textView tabs = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
tabs' <- unsafeManagedPtrGetPtr tabs
gtk_text_view_set_tabs textView' tabs'
touchManagedPtr textView
touchManagedPtr tabs
return ()
#if ENABLE_OVERLOADING
data TextViewSetTabsMethodInfo
instance (signature ~ (Pango.TabArray.TabArray -> m ()), MonadIO m, IsTextView a) => O.MethodInfo TextViewSetTabsMethodInfo a signature where
overloadedMethod _ = textViewSetTabs
#endif
foreign import ccall "gtk_text_view_set_top_margin" gtk_text_view_set_top_margin ::
Ptr TextView ->
Int32 ->
IO ()
textViewSetTopMargin ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Int32
-> m ()
textViewSetTopMargin textView topMargin = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
gtk_text_view_set_top_margin textView' topMargin
touchManagedPtr textView
return ()
#if ENABLE_OVERLOADING
data TextViewSetTopMarginMethodInfo
instance (signature ~ (Int32 -> m ()), MonadIO m, IsTextView a) => O.MethodInfo TextViewSetTopMarginMethodInfo a signature where
overloadedMethod _ = textViewSetTopMargin
#endif
foreign import ccall "gtk_text_view_set_wrap_mode" gtk_text_view_set_wrap_mode ::
Ptr TextView ->
CUInt ->
IO ()
textViewSetWrapMode ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Gtk.Enums.WrapMode
-> m ()
textViewSetWrapMode textView wrapMode = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
let wrapMode' = (fromIntegral . fromEnum) wrapMode
gtk_text_view_set_wrap_mode textView' wrapMode'
touchManagedPtr textView
return ()
#if ENABLE_OVERLOADING
data TextViewSetWrapModeMethodInfo
instance (signature ~ (Gtk.Enums.WrapMode -> m ()), MonadIO m, IsTextView a) => O.MethodInfo TextViewSetWrapModeMethodInfo a signature where
overloadedMethod _ = textViewSetWrapMode
#endif
foreign import ccall "gtk_text_view_starts_display_line" gtk_text_view_starts_display_line ::
Ptr TextView ->
Ptr Gtk.TextIter.TextIter ->
IO CInt
textViewStartsDisplayLine ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Gtk.TextIter.TextIter
-> m Bool
textViewStartsDisplayLine textView iter = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
iter' <- unsafeManagedPtrGetPtr iter
result <- gtk_text_view_starts_display_line textView' iter'
let result' = (/= 0) result
touchManagedPtr textView
touchManagedPtr iter
return result'
#if ENABLE_OVERLOADING
data TextViewStartsDisplayLineMethodInfo
instance (signature ~ (Gtk.TextIter.TextIter -> m Bool), MonadIO m, IsTextView a) => O.MethodInfo TextViewStartsDisplayLineMethodInfo a signature where
overloadedMethod _ = textViewStartsDisplayLine
#endif
foreign import ccall "gtk_text_view_window_to_buffer_coords" gtk_text_view_window_to_buffer_coords ::
Ptr TextView ->
CUInt ->
Int32 ->
Int32 ->
Ptr Int32 ->
Ptr Int32 ->
IO ()
textViewWindowToBufferCoords ::
(B.CallStack.HasCallStack, MonadIO m, IsTextView a) =>
a
-> Gtk.Enums.TextWindowType
-> Int32
-> Int32
-> m ((Int32, Int32))
textViewWindowToBufferCoords textView win windowX windowY = liftIO $ do
textView' <- unsafeManagedPtrCastPtr textView
let win' = (fromIntegral . fromEnum) win
bufferX <- allocMem :: IO (Ptr Int32)
bufferY <- allocMem :: IO (Ptr Int32)
gtk_text_view_window_to_buffer_coords textView' win' windowX windowY bufferX bufferY
bufferX' <- peek bufferX
bufferY' <- peek bufferY
touchManagedPtr textView
freeMem bufferX
freeMem bufferY
return (bufferX', bufferY')
#if ENABLE_OVERLOADING
data TextViewWindowToBufferCoordsMethodInfo
instance (signature ~ (Gtk.Enums.TextWindowType -> Int32 -> Int32 -> m ((Int32, Int32))), MonadIO m, IsTextView a) => O.MethodInfo TextViewWindowToBufferCoordsMethodInfo a signature where
overloadedMethod _ = textViewWindowToBufferCoords
#endif