{- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 Maintainer : Iñaki García Etxebarria (garetxe@gmail.com) -} module GI.Vte.Objects.Terminal ( -- * Exported types Terminal(..) , TerminalK , toTerminal , noTerminal , -- * Methods -- ** terminalCopyClipboard TerminalCopyClipboardMethodInfo , terminalCopyClipboard , -- ** terminalCopyPrimary TerminalCopyPrimaryMethodInfo , terminalCopyPrimary , -- ** terminalFeed TerminalFeedMethodInfo , terminalFeed , -- ** terminalFeedChild TerminalFeedChildMethodInfo , terminalFeedChild , -- ** terminalFeedChildBinary TerminalFeedChildBinaryMethodInfo , terminalFeedChildBinary , -- ** terminalGetAllowBold TerminalGetAllowBoldMethodInfo , terminalGetAllowBold , -- ** terminalGetAudibleBell TerminalGetAudibleBellMethodInfo , terminalGetAudibleBell , -- ** terminalGetCharHeight TerminalGetCharHeightMethodInfo , terminalGetCharHeight , -- ** terminalGetCharWidth TerminalGetCharWidthMethodInfo , terminalGetCharWidth , -- ** terminalGetCjkAmbiguousWidth TerminalGetCjkAmbiguousWidthMethodInfo , terminalGetCjkAmbiguousWidth , -- ** terminalGetColumnCount TerminalGetColumnCountMethodInfo , terminalGetColumnCount , -- ** terminalGetCurrentDirectoryUri TerminalGetCurrentDirectoryUriMethodInfo, terminalGetCurrentDirectoryUri , -- ** terminalGetCurrentFileUri TerminalGetCurrentFileUriMethodInfo , terminalGetCurrentFileUri , -- ** terminalGetCursorBlinkMode TerminalGetCursorBlinkModeMethodInfo , terminalGetCursorBlinkMode , -- ** terminalGetCursorPosition TerminalGetCursorPositionMethodInfo , terminalGetCursorPosition , -- ** terminalGetCursorShape TerminalGetCursorShapeMethodInfo , terminalGetCursorShape , -- ** terminalGetEncoding TerminalGetEncodingMethodInfo , terminalGetEncoding , -- ** terminalGetFont TerminalGetFontMethodInfo , terminalGetFont , -- ** terminalGetFontScale TerminalGetFontScaleMethodInfo , terminalGetFontScale , -- ** terminalGetGeometryHints TerminalGetGeometryHintsMethodInfo , terminalGetGeometryHints , -- ** terminalGetHasSelection TerminalGetHasSelectionMethodInfo , terminalGetHasSelection , -- ** terminalGetIconTitle TerminalGetIconTitleMethodInfo , terminalGetIconTitle , -- ** terminalGetInputEnabled TerminalGetInputEnabledMethodInfo , terminalGetInputEnabled , -- ** terminalGetMouseAutohide TerminalGetMouseAutohideMethodInfo , terminalGetMouseAutohide , -- ** terminalGetPty TerminalGetPtyMethodInfo , terminalGetPty , -- ** terminalGetRewrapOnResize TerminalGetRewrapOnResizeMethodInfo , terminalGetRewrapOnResize , -- ** terminalGetRowCount TerminalGetRowCountMethodInfo , terminalGetRowCount , -- ** terminalGetText TerminalGetTextMethodInfo , terminalGetText , -- ** terminalGetTextIncludeTrailingSpaces TerminalGetTextIncludeTrailingSpacesMethodInfo, terminalGetTextIncludeTrailingSpaces , -- ** terminalGetTextRange TerminalGetTextRangeMethodInfo , terminalGetTextRange , -- ** terminalGetWindowTitle TerminalGetWindowTitleMethodInfo , terminalGetWindowTitle , -- ** terminalGetWordCharExceptions TerminalGetWordCharExceptionsMethodInfo , terminalGetWordCharExceptions , -- ** terminalMatchAddGregex TerminalMatchAddGregexMethodInfo , terminalMatchAddGregex , -- ** terminalMatchCheck TerminalMatchCheckMethodInfo , terminalMatchCheck , -- ** terminalMatchCheckEvent TerminalMatchCheckEventMethodInfo , terminalMatchCheckEvent , -- ** terminalMatchRemove TerminalMatchRemoveMethodInfo , terminalMatchRemove , -- ** terminalMatchRemoveAll TerminalMatchRemoveAllMethodInfo , terminalMatchRemoveAll , -- ** terminalMatchSetCursorName TerminalMatchSetCursorNameMethodInfo , terminalMatchSetCursorName , -- ** terminalMatchSetCursorType TerminalMatchSetCursorTypeMethodInfo , terminalMatchSetCursorType , -- ** terminalNew terminalNew , -- ** terminalPasteClipboard TerminalPasteClipboardMethodInfo , terminalPasteClipboard , -- ** terminalPastePrimary TerminalPastePrimaryMethodInfo , terminalPastePrimary , -- ** terminalPtyNewSync TerminalPtyNewSyncMethodInfo , terminalPtyNewSync , -- ** terminalReset TerminalResetMethodInfo , terminalReset , -- ** terminalSearchFindNext TerminalSearchFindNextMethodInfo , terminalSearchFindNext , -- ** terminalSearchFindPrevious TerminalSearchFindPreviousMethodInfo , terminalSearchFindPrevious , -- ** terminalSearchGetGregex TerminalSearchGetGregexMethodInfo , terminalSearchGetGregex , -- ** terminalSearchGetWrapAround TerminalSearchGetWrapAroundMethodInfo , terminalSearchGetWrapAround , -- ** terminalSearchSetGregex TerminalSearchSetGregexMethodInfo , terminalSearchSetGregex , -- ** terminalSearchSetWrapAround TerminalSearchSetWrapAroundMethodInfo , terminalSearchSetWrapAround , -- ** terminalSelectAll TerminalSelectAllMethodInfo , terminalSelectAll , -- ** terminalSetAllowBold TerminalSetAllowBoldMethodInfo , terminalSetAllowBold , -- ** terminalSetAudibleBell TerminalSetAudibleBellMethodInfo , terminalSetAudibleBell , -- ** terminalSetBackspaceBinding TerminalSetBackspaceBindingMethodInfo , terminalSetBackspaceBinding , -- ** terminalSetCjkAmbiguousWidth TerminalSetCjkAmbiguousWidthMethodInfo , terminalSetCjkAmbiguousWidth , -- ** terminalSetColorBackground TerminalSetColorBackgroundMethodInfo , terminalSetColorBackground , -- ** terminalSetColorBold TerminalSetColorBoldMethodInfo , terminalSetColorBold , -- ** terminalSetColorCursor TerminalSetColorCursorMethodInfo , terminalSetColorCursor , -- ** terminalSetColorForeground TerminalSetColorForegroundMethodInfo , terminalSetColorForeground , -- ** terminalSetColorHighlight TerminalSetColorHighlightMethodInfo , terminalSetColorHighlight , -- ** terminalSetColorHighlightForeground TerminalSetColorHighlightForegroundMethodInfo, terminalSetColorHighlightForeground , -- ** terminalSetColors TerminalSetColorsMethodInfo , terminalSetColors , -- ** terminalSetCursorBlinkMode TerminalSetCursorBlinkModeMethodInfo , terminalSetCursorBlinkMode , -- ** terminalSetCursorShape TerminalSetCursorShapeMethodInfo , terminalSetCursorShape , -- ** terminalSetDefaultColors TerminalSetDefaultColorsMethodInfo , terminalSetDefaultColors , -- ** terminalSetDeleteBinding TerminalSetDeleteBindingMethodInfo , terminalSetDeleteBinding , -- ** terminalSetEncoding TerminalSetEncodingMethodInfo , terminalSetEncoding , -- ** terminalSetFont TerminalSetFontMethodInfo , terminalSetFont , -- ** terminalSetFontScale TerminalSetFontScaleMethodInfo , terminalSetFontScale , -- ** terminalSetGeometryHintsForWindow TerminalSetGeometryHintsForWindowMethodInfo, terminalSetGeometryHintsForWindow , -- ** terminalSetInputEnabled TerminalSetInputEnabledMethodInfo , terminalSetInputEnabled , -- ** terminalSetMouseAutohide TerminalSetMouseAutohideMethodInfo , terminalSetMouseAutohide , -- ** terminalSetPty TerminalSetPtyMethodInfo , terminalSetPty , -- ** terminalSetRewrapOnResize TerminalSetRewrapOnResizeMethodInfo , terminalSetRewrapOnResize , -- ** terminalSetScrollOnKeystroke TerminalSetScrollOnKeystrokeMethodInfo , terminalSetScrollOnKeystroke , -- ** terminalSetScrollOnOutput TerminalSetScrollOnOutputMethodInfo , terminalSetScrollOnOutput , -- ** terminalSetScrollbackLines TerminalSetScrollbackLinesMethodInfo , terminalSetScrollbackLines , -- ** terminalSetSize TerminalSetSizeMethodInfo , terminalSetSize , -- ** terminalSetWordCharExceptions TerminalSetWordCharExceptionsMethodInfo , terminalSetWordCharExceptions , -- ** terminalSpawnSync TerminalSpawnSyncMethodInfo , terminalSpawnSync , -- ** terminalUnselectAll TerminalUnselectAllMethodInfo , terminalUnselectAll , -- ** terminalWatchChild TerminalWatchChildMethodInfo , terminalWatchChild , -- ** terminalWriteContentsSync TerminalWriteContentsSyncMethodInfo , terminalWriteContentsSync , -- * Properties -- ** AllowBold TerminalAllowBoldPropertyInfo , constructTerminalAllowBold , getTerminalAllowBold , setTerminalAllowBold , terminalAllowBold , -- ** AudibleBell TerminalAudibleBellPropertyInfo , constructTerminalAudibleBell , getTerminalAudibleBell , setTerminalAudibleBell , terminalAudibleBell , -- ** BackspaceBinding TerminalBackspaceBindingPropertyInfo , constructTerminalBackspaceBinding , getTerminalBackspaceBinding , setTerminalBackspaceBinding , terminalBackspaceBinding , -- ** CjkAmbiguousWidth TerminalCjkAmbiguousWidthPropertyInfo , constructTerminalCjkAmbiguousWidth , getTerminalCjkAmbiguousWidth , setTerminalCjkAmbiguousWidth , terminalCjkAmbiguousWidth , -- ** CurrentDirectoryUri TerminalCurrentDirectoryUriPropertyInfo , getTerminalCurrentDirectoryUri , terminalCurrentDirectoryUri , -- ** CurrentFileUri TerminalCurrentFileUriPropertyInfo , getTerminalCurrentFileUri , terminalCurrentFileUri , -- ** CursorBlinkMode TerminalCursorBlinkModePropertyInfo , constructTerminalCursorBlinkMode , getTerminalCursorBlinkMode , setTerminalCursorBlinkMode , terminalCursorBlinkMode , -- ** CursorShape TerminalCursorShapePropertyInfo , constructTerminalCursorShape , getTerminalCursorShape , setTerminalCursorShape , terminalCursorShape , -- ** DeleteBinding TerminalDeleteBindingPropertyInfo , constructTerminalDeleteBinding , getTerminalDeleteBinding , setTerminalDeleteBinding , terminalDeleteBinding , -- ** Encoding TerminalEncodingPropertyInfo , clearTerminalEncoding , constructTerminalEncoding , getTerminalEncoding , setTerminalEncoding , terminalEncoding , -- ** FontDesc TerminalFontDescPropertyInfo , clearTerminalFontDesc , constructTerminalFontDesc , getTerminalFontDesc , setTerminalFontDesc , terminalFontDesc , -- ** FontScale TerminalFontScalePropertyInfo , constructTerminalFontScale , getTerminalFontScale , setTerminalFontScale , terminalFontScale , -- ** IconTitle TerminalIconTitlePropertyInfo , getTerminalIconTitle , terminalIconTitle , -- ** InputEnabled TerminalInputEnabledPropertyInfo , constructTerminalInputEnabled , getTerminalInputEnabled , setTerminalInputEnabled , terminalInputEnabled , -- ** PointerAutohide TerminalPointerAutohidePropertyInfo , constructTerminalPointerAutohide , getTerminalPointerAutohide , setTerminalPointerAutohide , terminalPointerAutohide , -- ** Pty TerminalPtyPropertyInfo , clearTerminalPty , constructTerminalPty , getTerminalPty , setTerminalPty , terminalPty , -- ** RewrapOnResize TerminalRewrapOnResizePropertyInfo , constructTerminalRewrapOnResize , getTerminalRewrapOnResize , setTerminalRewrapOnResize , terminalRewrapOnResize , -- ** ScrollOnKeystroke TerminalScrollOnKeystrokePropertyInfo , constructTerminalScrollOnKeystroke , getTerminalScrollOnKeystroke , setTerminalScrollOnKeystroke , terminalScrollOnKeystroke , -- ** ScrollOnOutput TerminalScrollOnOutputPropertyInfo , constructTerminalScrollOnOutput , getTerminalScrollOnOutput , setTerminalScrollOnOutput , terminalScrollOnOutput , -- ** ScrollbackLines TerminalScrollbackLinesPropertyInfo , constructTerminalScrollbackLines , getTerminalScrollbackLines , setTerminalScrollbackLines , terminalScrollbackLines , -- ** WindowTitle TerminalWindowTitlePropertyInfo , getTerminalWindowTitle , terminalWindowTitle , -- ** WordCharExceptions TerminalWordCharExceptionsPropertyInfo , getTerminalWordCharExceptions , terminalWordCharExceptions , -- * Signals -- ** Bell TerminalBellCallback , TerminalBellCallbackC , TerminalBellSignalInfo , afterTerminalBell , mkTerminalBellCallback , noTerminalBellCallback , onTerminalBell , terminalBellCallbackWrapper , terminalBellClosure , -- ** CharSizeChanged TerminalCharSizeChangedCallback , TerminalCharSizeChangedCallbackC , TerminalCharSizeChangedSignalInfo , afterTerminalCharSizeChanged , mkTerminalCharSizeChangedCallback , noTerminalCharSizeChangedCallback , onTerminalCharSizeChanged , terminalCharSizeChangedCallbackWrapper , terminalCharSizeChangedClosure , -- ** ChildExited TerminalChildExitedCallback , TerminalChildExitedCallbackC , TerminalChildExitedSignalInfo , afterTerminalChildExited , mkTerminalChildExitedCallback , noTerminalChildExitedCallback , onTerminalChildExited , terminalChildExitedCallbackWrapper , terminalChildExitedClosure , -- ** Commit TerminalCommitCallback , TerminalCommitCallbackC , TerminalCommitSignalInfo , afterTerminalCommit , mkTerminalCommitCallback , noTerminalCommitCallback , onTerminalCommit , terminalCommitCallbackWrapper , terminalCommitClosure , -- ** ContentsChanged TerminalContentsChangedCallback , TerminalContentsChangedCallbackC , TerminalContentsChangedSignalInfo , afterTerminalContentsChanged , mkTerminalContentsChangedCallback , noTerminalContentsChangedCallback , onTerminalContentsChanged , terminalContentsChangedCallbackWrapper , terminalContentsChangedClosure , -- ** CopyClipboard TerminalCopyClipboardCallback , TerminalCopyClipboardCallbackC , TerminalCopyClipboardSignalInfo , afterTerminalCopyClipboard , mkTerminalCopyClipboardCallback , noTerminalCopyClipboardCallback , onTerminalCopyClipboard , terminalCopyClipboardCallbackWrapper , terminalCopyClipboardClosure , -- ** CurrentDirectoryUriChanged TerminalCurrentDirectoryUriChangedCallback, TerminalCurrentDirectoryUriChangedCallbackC, TerminalCurrentDirectoryUriChangedSignalInfo, afterTerminalCurrentDirectoryUriChanged , mkTerminalCurrentDirectoryUriChangedCallback, noTerminalCurrentDirectoryUriChangedCallback, onTerminalCurrentDirectoryUriChanged , terminalCurrentDirectoryUriChangedCallbackWrapper, terminalCurrentDirectoryUriChangedClosure, -- ** CurrentFileUriChanged TerminalCurrentFileUriChangedCallback , TerminalCurrentFileUriChangedCallbackC , TerminalCurrentFileUriChangedSignalInfo , afterTerminalCurrentFileUriChanged , mkTerminalCurrentFileUriChangedCallback , noTerminalCurrentFileUriChangedCallback , onTerminalCurrentFileUriChanged , terminalCurrentFileUriChangedCallbackWrapper, terminalCurrentFileUriChangedClosure , -- ** CursorMoved TerminalCursorMovedCallback , TerminalCursorMovedCallbackC , TerminalCursorMovedSignalInfo , afterTerminalCursorMoved , mkTerminalCursorMovedCallback , noTerminalCursorMovedCallback , onTerminalCursorMoved , terminalCursorMovedCallbackWrapper , terminalCursorMovedClosure , -- ** DecreaseFontSize TerminalDecreaseFontSizeCallback , TerminalDecreaseFontSizeCallbackC , TerminalDecreaseFontSizeSignalInfo , afterTerminalDecreaseFontSize , mkTerminalDecreaseFontSizeCallback , noTerminalDecreaseFontSizeCallback , onTerminalDecreaseFontSize , terminalDecreaseFontSizeCallbackWrapper , terminalDecreaseFontSizeClosure , -- ** DeiconifyWindow TerminalDeiconifyWindowCallback , TerminalDeiconifyWindowCallbackC , TerminalDeiconifyWindowSignalInfo , afterTerminalDeiconifyWindow , mkTerminalDeiconifyWindowCallback , noTerminalDeiconifyWindowCallback , onTerminalDeiconifyWindow , terminalDeiconifyWindowCallbackWrapper , terminalDeiconifyWindowClosure , -- ** EncodingChanged TerminalEncodingChangedCallback , TerminalEncodingChangedCallbackC , TerminalEncodingChangedSignalInfo , afterTerminalEncodingChanged , mkTerminalEncodingChangedCallback , noTerminalEncodingChangedCallback , onTerminalEncodingChanged , terminalEncodingChangedCallbackWrapper , terminalEncodingChangedClosure , -- ** Eof TerminalEofCallback , TerminalEofCallbackC , TerminalEofSignalInfo , afterTerminalEof , mkTerminalEofCallback , noTerminalEofCallback , onTerminalEof , terminalEofCallbackWrapper , terminalEofClosure , -- ** IconTitleChanged TerminalIconTitleChangedCallback , TerminalIconTitleChangedCallbackC , TerminalIconTitleChangedSignalInfo , afterTerminalIconTitleChanged , mkTerminalIconTitleChangedCallback , noTerminalIconTitleChangedCallback , onTerminalIconTitleChanged , terminalIconTitleChangedCallbackWrapper , terminalIconTitleChangedClosure , -- ** IconifyWindow TerminalIconifyWindowCallback , TerminalIconifyWindowCallbackC , TerminalIconifyWindowSignalInfo , afterTerminalIconifyWindow , mkTerminalIconifyWindowCallback , noTerminalIconifyWindowCallback , onTerminalIconifyWindow , terminalIconifyWindowCallbackWrapper , terminalIconifyWindowClosure , -- ** IncreaseFontSize TerminalIncreaseFontSizeCallback , TerminalIncreaseFontSizeCallbackC , TerminalIncreaseFontSizeSignalInfo , afterTerminalIncreaseFontSize , mkTerminalIncreaseFontSizeCallback , noTerminalIncreaseFontSizeCallback , onTerminalIncreaseFontSize , terminalIncreaseFontSizeCallbackWrapper , terminalIncreaseFontSizeClosure , -- ** LowerWindow TerminalLowerWindowCallback , TerminalLowerWindowCallbackC , TerminalLowerWindowSignalInfo , afterTerminalLowerWindow , mkTerminalLowerWindowCallback , noTerminalLowerWindowCallback , onTerminalLowerWindow , terminalLowerWindowCallbackWrapper , terminalLowerWindowClosure , -- ** MaximizeWindow TerminalMaximizeWindowCallback , TerminalMaximizeWindowCallbackC , TerminalMaximizeWindowSignalInfo , afterTerminalMaximizeWindow , mkTerminalMaximizeWindowCallback , noTerminalMaximizeWindowCallback , onTerminalMaximizeWindow , terminalMaximizeWindowCallbackWrapper , terminalMaximizeWindowClosure , -- ** MoveWindow TerminalMoveWindowCallback , TerminalMoveWindowCallbackC , TerminalMoveWindowSignalInfo , afterTerminalMoveWindow , mkTerminalMoveWindowCallback , noTerminalMoveWindowCallback , onTerminalMoveWindow , terminalMoveWindowCallbackWrapper , terminalMoveWindowClosure , -- ** NotificationReceived TerminalNotificationReceivedCallback , TerminalNotificationReceivedCallbackC , TerminalNotificationReceivedSignalInfo , afterTerminalNotificationReceived , mkTerminalNotificationReceivedCallback , noTerminalNotificationReceivedCallback , onTerminalNotificationReceived , terminalNotificationReceivedCallbackWrapper, terminalNotificationReceivedClosure , -- ** PasteClipboard TerminalPasteClipboardCallback , TerminalPasteClipboardCallbackC , TerminalPasteClipboardSignalInfo , afterTerminalPasteClipboard , mkTerminalPasteClipboardCallback , noTerminalPasteClipboardCallback , onTerminalPasteClipboard , terminalPasteClipboardCallbackWrapper , terminalPasteClipboardClosure , -- ** RaiseWindow TerminalRaiseWindowCallback , TerminalRaiseWindowCallbackC , TerminalRaiseWindowSignalInfo , afterTerminalRaiseWindow , mkTerminalRaiseWindowCallback , noTerminalRaiseWindowCallback , onTerminalRaiseWindow , terminalRaiseWindowCallbackWrapper , terminalRaiseWindowClosure , -- ** RefreshWindow TerminalRefreshWindowCallback , TerminalRefreshWindowCallbackC , TerminalRefreshWindowSignalInfo , afterTerminalRefreshWindow , mkTerminalRefreshWindowCallback , noTerminalRefreshWindowCallback , onTerminalRefreshWindow , terminalRefreshWindowCallbackWrapper , terminalRefreshWindowClosure , -- ** ResizeWindow TerminalResizeWindowCallback , TerminalResizeWindowCallbackC , TerminalResizeWindowSignalInfo , afterTerminalResizeWindow , mkTerminalResizeWindowCallback , noTerminalResizeWindowCallback , onTerminalResizeWindow , terminalResizeWindowCallbackWrapper , terminalResizeWindowClosure , -- ** RestoreWindow TerminalRestoreWindowCallback , TerminalRestoreWindowCallbackC , TerminalRestoreWindowSignalInfo , afterTerminalRestoreWindow , mkTerminalRestoreWindowCallback , noTerminalRestoreWindowCallback , onTerminalRestoreWindow , terminalRestoreWindowCallbackWrapper , terminalRestoreWindowClosure , -- ** SelectionChanged TerminalSelectionChangedCallback , TerminalSelectionChangedCallbackC , TerminalSelectionChangedSignalInfo , afterTerminalSelectionChanged , mkTerminalSelectionChangedCallback , noTerminalSelectionChangedCallback , onTerminalSelectionChanged , terminalSelectionChangedCallbackWrapper , terminalSelectionChangedClosure , -- ** TextDeleted TerminalTextDeletedCallback , TerminalTextDeletedCallbackC , TerminalTextDeletedSignalInfo , afterTerminalTextDeleted , mkTerminalTextDeletedCallback , noTerminalTextDeletedCallback , onTerminalTextDeleted , terminalTextDeletedCallbackWrapper , terminalTextDeletedClosure , -- ** TextInserted TerminalTextInsertedCallback , TerminalTextInsertedCallbackC , TerminalTextInsertedSignalInfo , afterTerminalTextInserted , mkTerminalTextInsertedCallback , noTerminalTextInsertedCallback , onTerminalTextInserted , terminalTextInsertedCallbackWrapper , terminalTextInsertedClosure , -- ** TextModified TerminalTextModifiedCallback , TerminalTextModifiedCallbackC , TerminalTextModifiedSignalInfo , afterTerminalTextModified , mkTerminalTextModifiedCallback , noTerminalTextModifiedCallback , onTerminalTextModified , terminalTextModifiedCallbackWrapper , terminalTextModifiedClosure , -- ** TextScrolled TerminalTextScrolledCallback , TerminalTextScrolledCallbackC , TerminalTextScrolledSignalInfo , afterTerminalTextScrolled , mkTerminalTextScrolledCallback , noTerminalTextScrolledCallback , onTerminalTextScrolled , terminalTextScrolledCallbackWrapper , terminalTextScrolledClosure , -- ** WindowTitleChanged TerminalWindowTitleChangedCallback , TerminalWindowTitleChangedCallbackC , TerminalWindowTitleChangedSignalInfo , afterTerminalWindowTitleChanged , mkTerminalWindowTitleChangedCallback , noTerminalWindowTitleChangedCallback , onTerminalWindowTitleChanged , terminalWindowTitleChangedCallbackWrapper, terminalWindowTitleChangedClosure , ) where import Data.GI.Base.ShortPrelude import qualified Data.GI.Base.Attributes as GI.Attributes import qualified Data.Text as T import qualified Data.ByteString.Char8 as B import qualified Data.Map as Map import GI.Vte.Types import GI.Vte.Callbacks import qualified GI.Atk as Atk import qualified GI.GLib as GLib import qualified GI.GObject as GObject import qualified GI.Gdk as Gdk import qualified GI.Gio as Gio import qualified GI.Gtk as Gtk import qualified GI.Pango as Pango newtype Terminal = Terminal (ForeignPtr Terminal) foreign import ccall "vte_terminal_get_type" c_vte_terminal_get_type :: IO GType type instance ParentTypes Terminal = TerminalParentTypes type TerminalParentTypes = '[Gtk.Widget, GObject.Object, Atk.ImplementorIface, Gtk.Buildable, Gtk.Scrollable] instance GObject Terminal where gobjectIsInitiallyUnowned _ = True gobjectType _ = c_vte_terminal_get_type class GObject o => TerminalK o instance (GObject o, IsDescendantOf Terminal o) => TerminalK o toTerminal :: TerminalK o => o -> IO Terminal toTerminal = unsafeCastTo Terminal noTerminal :: Maybe Terminal noTerminal = Nothing type family ResolveTerminalMethod (t :: Symbol) (o :: *) :: * where ResolveTerminalMethod "activate" o = Gtk.WidgetActivateMethodInfo ResolveTerminalMethod "addAccelerator" o = Gtk.WidgetAddAcceleratorMethodInfo ResolveTerminalMethod "addChild" o = Gtk.BuildableAddChildMethodInfo ResolveTerminalMethod "addDeviceEvents" o = Gtk.WidgetAddDeviceEventsMethodInfo ResolveTerminalMethod "addEvents" o = Gtk.WidgetAddEventsMethodInfo ResolveTerminalMethod "addMnemonicLabel" o = Gtk.WidgetAddMnemonicLabelMethodInfo ResolveTerminalMethod "addTickCallback" o = Gtk.WidgetAddTickCallbackMethodInfo ResolveTerminalMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo ResolveTerminalMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo ResolveTerminalMethod "canActivateAccel" o = Gtk.WidgetCanActivateAccelMethodInfo ResolveTerminalMethod "childFocus" o = Gtk.WidgetChildFocusMethodInfo ResolveTerminalMethod "childNotify" o = Gtk.WidgetChildNotifyMethodInfo ResolveTerminalMethod "classPath" o = Gtk.WidgetClassPathMethodInfo ResolveTerminalMethod "computeExpand" o = Gtk.WidgetComputeExpandMethodInfo ResolveTerminalMethod "constructChild" o = Gtk.BuildableConstructChildMethodInfo ResolveTerminalMethod "copyClipboard" o = TerminalCopyClipboardMethodInfo ResolveTerminalMethod "copyPrimary" o = TerminalCopyPrimaryMethodInfo ResolveTerminalMethod "createPangoContext" o = Gtk.WidgetCreatePangoContextMethodInfo ResolveTerminalMethod "createPangoLayout" o = Gtk.WidgetCreatePangoLayoutMethodInfo ResolveTerminalMethod "customFinished" o = Gtk.BuildableCustomFinishedMethodInfo ResolveTerminalMethod "customTagEnd" o = Gtk.BuildableCustomTagEndMethodInfo ResolveTerminalMethod "customTagStart" o = Gtk.BuildableCustomTagStartMethodInfo ResolveTerminalMethod "destroy" o = Gtk.WidgetDestroyMethodInfo ResolveTerminalMethod "destroyed" o = Gtk.WidgetDestroyedMethodInfo ResolveTerminalMethod "deviceIsShadowed" o = Gtk.WidgetDeviceIsShadowedMethodInfo ResolveTerminalMethod "dragBegin" o = Gtk.WidgetDragBeginMethodInfo ResolveTerminalMethod "dragBeginWithCoordinates" o = Gtk.WidgetDragBeginWithCoordinatesMethodInfo ResolveTerminalMethod "dragCheckThreshold" o = Gtk.WidgetDragCheckThresholdMethodInfo ResolveTerminalMethod "dragDestAddImageTargets" o = Gtk.WidgetDragDestAddImageTargetsMethodInfo ResolveTerminalMethod "dragDestAddTextTargets" o = Gtk.WidgetDragDestAddTextTargetsMethodInfo ResolveTerminalMethod "dragDestAddUriTargets" o = Gtk.WidgetDragDestAddUriTargetsMethodInfo ResolveTerminalMethod "dragDestFindTarget" o = Gtk.WidgetDragDestFindTargetMethodInfo ResolveTerminalMethod "dragDestGetTargetList" o = Gtk.WidgetDragDestGetTargetListMethodInfo ResolveTerminalMethod "dragDestGetTrackMotion" o = Gtk.WidgetDragDestGetTrackMotionMethodInfo ResolveTerminalMethod "dragDestSet" o = Gtk.WidgetDragDestSetMethodInfo ResolveTerminalMethod "dragDestSetProxy" o = Gtk.WidgetDragDestSetProxyMethodInfo ResolveTerminalMethod "dragDestSetTargetList" o = Gtk.WidgetDragDestSetTargetListMethodInfo ResolveTerminalMethod "dragDestSetTrackMotion" o = Gtk.WidgetDragDestSetTrackMotionMethodInfo ResolveTerminalMethod "dragDestUnset" o = Gtk.WidgetDragDestUnsetMethodInfo ResolveTerminalMethod "dragGetData" o = Gtk.WidgetDragGetDataMethodInfo ResolveTerminalMethod "dragHighlight" o = Gtk.WidgetDragHighlightMethodInfo ResolveTerminalMethod "dragSourceAddImageTargets" o = Gtk.WidgetDragSourceAddImageTargetsMethodInfo ResolveTerminalMethod "dragSourceAddTextTargets" o = Gtk.WidgetDragSourceAddTextTargetsMethodInfo ResolveTerminalMethod "dragSourceAddUriTargets" o = Gtk.WidgetDragSourceAddUriTargetsMethodInfo ResolveTerminalMethod "dragSourceGetTargetList" o = Gtk.WidgetDragSourceGetTargetListMethodInfo ResolveTerminalMethod "dragSourceSet" o = Gtk.WidgetDragSourceSetMethodInfo ResolveTerminalMethod "dragSourceSetIconGicon" o = Gtk.WidgetDragSourceSetIconGiconMethodInfo ResolveTerminalMethod "dragSourceSetIconName" o = Gtk.WidgetDragSourceSetIconNameMethodInfo ResolveTerminalMethod "dragSourceSetIconPixbuf" o = Gtk.WidgetDragSourceSetIconPixbufMethodInfo ResolveTerminalMethod "dragSourceSetIconStock" o = Gtk.WidgetDragSourceSetIconStockMethodInfo ResolveTerminalMethod "dragSourceSetTargetList" o = Gtk.WidgetDragSourceSetTargetListMethodInfo ResolveTerminalMethod "dragSourceUnset" o = Gtk.WidgetDragSourceUnsetMethodInfo ResolveTerminalMethod "dragUnhighlight" o = Gtk.WidgetDragUnhighlightMethodInfo ResolveTerminalMethod "draw" o = Gtk.WidgetDrawMethodInfo ResolveTerminalMethod "ensureStyle" o = Gtk.WidgetEnsureStyleMethodInfo ResolveTerminalMethod "errorBell" o = Gtk.WidgetErrorBellMethodInfo ResolveTerminalMethod "event" o = Gtk.WidgetEventMethodInfo ResolveTerminalMethod "feed" o = TerminalFeedMethodInfo ResolveTerminalMethod "feedChild" o = TerminalFeedChildMethodInfo ResolveTerminalMethod "feedChildBinary" o = TerminalFeedChildBinaryMethodInfo ResolveTerminalMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo ResolveTerminalMethod "freezeChildNotify" o = Gtk.WidgetFreezeChildNotifyMethodInfo ResolveTerminalMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo ResolveTerminalMethod "grabAdd" o = Gtk.WidgetGrabAddMethodInfo ResolveTerminalMethod "grabDefault" o = Gtk.WidgetGrabDefaultMethodInfo ResolveTerminalMethod "grabFocus" o = Gtk.WidgetGrabFocusMethodInfo ResolveTerminalMethod "grabRemove" o = Gtk.WidgetGrabRemoveMethodInfo ResolveTerminalMethod "hasDefault" o = Gtk.WidgetHasDefaultMethodInfo ResolveTerminalMethod "hasFocus" o = Gtk.WidgetHasFocusMethodInfo ResolveTerminalMethod "hasGrab" o = Gtk.WidgetHasGrabMethodInfo ResolveTerminalMethod "hasRcStyle" o = Gtk.WidgetHasRcStyleMethodInfo ResolveTerminalMethod "hasScreen" o = Gtk.WidgetHasScreenMethodInfo ResolveTerminalMethod "hasVisibleFocus" o = Gtk.WidgetHasVisibleFocusMethodInfo ResolveTerminalMethod "hide" o = Gtk.WidgetHideMethodInfo ResolveTerminalMethod "hideOnDelete" o = Gtk.WidgetHideOnDeleteMethodInfo ResolveTerminalMethod "inDestruction" o = Gtk.WidgetInDestructionMethodInfo ResolveTerminalMethod "initTemplate" o = Gtk.WidgetInitTemplateMethodInfo ResolveTerminalMethod "inputShapeCombineRegion" o = Gtk.WidgetInputShapeCombineRegionMethodInfo ResolveTerminalMethod "insertActionGroup" o = Gtk.WidgetInsertActionGroupMethodInfo ResolveTerminalMethod "intersect" o = Gtk.WidgetIntersectMethodInfo ResolveTerminalMethod "isAncestor" o = Gtk.WidgetIsAncestorMethodInfo ResolveTerminalMethod "isComposited" o = Gtk.WidgetIsCompositedMethodInfo ResolveTerminalMethod "isDrawable" o = Gtk.WidgetIsDrawableMethodInfo ResolveTerminalMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo ResolveTerminalMethod "isFocus" o = Gtk.WidgetIsFocusMethodInfo ResolveTerminalMethod "isSensitive" o = Gtk.WidgetIsSensitiveMethodInfo ResolveTerminalMethod "isToplevel" o = Gtk.WidgetIsToplevelMethodInfo ResolveTerminalMethod "isVisible" o = Gtk.WidgetIsVisibleMethodInfo ResolveTerminalMethod "keynavFailed" o = Gtk.WidgetKeynavFailedMethodInfo ResolveTerminalMethod "listAccelClosures" o = Gtk.WidgetListAccelClosuresMethodInfo ResolveTerminalMethod "listActionPrefixes" o = Gtk.WidgetListActionPrefixesMethodInfo ResolveTerminalMethod "listMnemonicLabels" o = Gtk.WidgetListMnemonicLabelsMethodInfo ResolveTerminalMethod "map" o = Gtk.WidgetMapMethodInfo ResolveTerminalMethod "matchAddGregex" o = TerminalMatchAddGregexMethodInfo ResolveTerminalMethod "matchCheck" o = TerminalMatchCheckMethodInfo ResolveTerminalMethod "matchCheckEvent" o = TerminalMatchCheckEventMethodInfo ResolveTerminalMethod "matchRemove" o = TerminalMatchRemoveMethodInfo ResolveTerminalMethod "matchRemoveAll" o = TerminalMatchRemoveAllMethodInfo ResolveTerminalMethod "matchSetCursorName" o = TerminalMatchSetCursorNameMethodInfo ResolveTerminalMethod "matchSetCursorType" o = TerminalMatchSetCursorTypeMethodInfo ResolveTerminalMethod "mnemonicActivate" o = Gtk.WidgetMnemonicActivateMethodInfo ResolveTerminalMethod "modifyBase" o = Gtk.WidgetModifyBaseMethodInfo ResolveTerminalMethod "modifyBg" o = Gtk.WidgetModifyBgMethodInfo ResolveTerminalMethod "modifyCursor" o = Gtk.WidgetModifyCursorMethodInfo ResolveTerminalMethod "modifyFg" o = Gtk.WidgetModifyFgMethodInfo ResolveTerminalMethod "modifyFont" o = Gtk.WidgetModifyFontMethodInfo ResolveTerminalMethod "modifyStyle" o = Gtk.WidgetModifyStyleMethodInfo ResolveTerminalMethod "modifyText" o = Gtk.WidgetModifyTextMethodInfo ResolveTerminalMethod "notify" o = GObject.ObjectNotifyMethodInfo ResolveTerminalMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo ResolveTerminalMethod "overrideBackgroundColor" o = Gtk.WidgetOverrideBackgroundColorMethodInfo ResolveTerminalMethod "overrideColor" o = Gtk.WidgetOverrideColorMethodInfo ResolveTerminalMethod "overrideCursor" o = Gtk.WidgetOverrideCursorMethodInfo ResolveTerminalMethod "overrideFont" o = Gtk.WidgetOverrideFontMethodInfo ResolveTerminalMethod "overrideSymbolicColor" o = Gtk.WidgetOverrideSymbolicColorMethodInfo ResolveTerminalMethod "parserFinished" o = Gtk.BuildableParserFinishedMethodInfo ResolveTerminalMethod "pasteClipboard" o = TerminalPasteClipboardMethodInfo ResolveTerminalMethod "pastePrimary" o = TerminalPastePrimaryMethodInfo ResolveTerminalMethod "path" o = Gtk.WidgetPathMethodInfo ResolveTerminalMethod "ptyNewSync" o = TerminalPtyNewSyncMethodInfo ResolveTerminalMethod "queueComputeExpand" o = Gtk.WidgetQueueComputeExpandMethodInfo ResolveTerminalMethod "queueDraw" o = Gtk.WidgetQueueDrawMethodInfo ResolveTerminalMethod "queueDrawArea" o = Gtk.WidgetQueueDrawAreaMethodInfo ResolveTerminalMethod "queueDrawRegion" o = Gtk.WidgetQueueDrawRegionMethodInfo ResolveTerminalMethod "queueResize" o = Gtk.WidgetQueueResizeMethodInfo ResolveTerminalMethod "queueResizeNoRedraw" o = Gtk.WidgetQueueResizeNoRedrawMethodInfo ResolveTerminalMethod "realize" o = Gtk.WidgetRealizeMethodInfo ResolveTerminalMethod "ref" o = GObject.ObjectRefMethodInfo ResolveTerminalMethod "refSink" o = GObject.ObjectRefSinkMethodInfo ResolveTerminalMethod "regionIntersect" o = Gtk.WidgetRegionIntersectMethodInfo ResolveTerminalMethod "registerWindow" o = Gtk.WidgetRegisterWindowMethodInfo ResolveTerminalMethod "removeAccelerator" o = Gtk.WidgetRemoveAcceleratorMethodInfo ResolveTerminalMethod "removeMnemonicLabel" o = Gtk.WidgetRemoveMnemonicLabelMethodInfo ResolveTerminalMethod "removeTickCallback" o = Gtk.WidgetRemoveTickCallbackMethodInfo ResolveTerminalMethod "renderIcon" o = Gtk.WidgetRenderIconMethodInfo ResolveTerminalMethod "renderIconPixbuf" o = Gtk.WidgetRenderIconPixbufMethodInfo ResolveTerminalMethod "reparent" o = Gtk.WidgetReparentMethodInfo ResolveTerminalMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo ResolveTerminalMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo ResolveTerminalMethod "reset" o = TerminalResetMethodInfo ResolveTerminalMethod "resetRcStyles" o = Gtk.WidgetResetRcStylesMethodInfo ResolveTerminalMethod "resetStyle" o = Gtk.WidgetResetStyleMethodInfo ResolveTerminalMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo ResolveTerminalMethod "searchFindNext" o = TerminalSearchFindNextMethodInfo ResolveTerminalMethod "searchFindPrevious" o = TerminalSearchFindPreviousMethodInfo ResolveTerminalMethod "searchGetGregex" o = TerminalSearchGetGregexMethodInfo ResolveTerminalMethod "searchGetWrapAround" o = TerminalSearchGetWrapAroundMethodInfo ResolveTerminalMethod "searchSetGregex" o = TerminalSearchSetGregexMethodInfo ResolveTerminalMethod "searchSetWrapAround" o = TerminalSearchSetWrapAroundMethodInfo ResolveTerminalMethod "selectAll" o = TerminalSelectAllMethodInfo ResolveTerminalMethod "sendExpose" o = Gtk.WidgetSendExposeMethodInfo ResolveTerminalMethod "sendFocusChange" o = Gtk.WidgetSendFocusChangeMethodInfo ResolveTerminalMethod "shapeCombineRegion" o = Gtk.WidgetShapeCombineRegionMethodInfo ResolveTerminalMethod "show" o = Gtk.WidgetShowMethodInfo ResolveTerminalMethod "showAll" o = Gtk.WidgetShowAllMethodInfo ResolveTerminalMethod "showNow" o = Gtk.WidgetShowNowMethodInfo ResolveTerminalMethod "sizeAllocate" o = Gtk.WidgetSizeAllocateMethodInfo ResolveTerminalMethod "sizeAllocateWithBaseline" o = Gtk.WidgetSizeAllocateWithBaselineMethodInfo ResolveTerminalMethod "sizeRequest" o = Gtk.WidgetSizeRequestMethodInfo ResolveTerminalMethod "spawnSync" o = TerminalSpawnSyncMethodInfo ResolveTerminalMethod "stealData" o = GObject.ObjectStealDataMethodInfo ResolveTerminalMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo ResolveTerminalMethod "styleAttach" o = Gtk.WidgetStyleAttachMethodInfo ResolveTerminalMethod "styleGetProperty" o = Gtk.WidgetStyleGetPropertyMethodInfo ResolveTerminalMethod "thawChildNotify" o = Gtk.WidgetThawChildNotifyMethodInfo ResolveTerminalMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo ResolveTerminalMethod "translateCoordinates" o = Gtk.WidgetTranslateCoordinatesMethodInfo ResolveTerminalMethod "triggerTooltipQuery" o = Gtk.WidgetTriggerTooltipQueryMethodInfo ResolveTerminalMethod "unmap" o = Gtk.WidgetUnmapMethodInfo ResolveTerminalMethod "unparent" o = Gtk.WidgetUnparentMethodInfo ResolveTerminalMethod "unrealize" o = Gtk.WidgetUnrealizeMethodInfo ResolveTerminalMethod "unref" o = GObject.ObjectUnrefMethodInfo ResolveTerminalMethod "unregisterWindow" o = Gtk.WidgetUnregisterWindowMethodInfo ResolveTerminalMethod "unselectAll" o = TerminalUnselectAllMethodInfo ResolveTerminalMethod "unsetStateFlags" o = Gtk.WidgetUnsetStateFlagsMethodInfo ResolveTerminalMethod "watchChild" o = TerminalWatchChildMethodInfo ResolveTerminalMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo ResolveTerminalMethod "writeContentsSync" o = TerminalWriteContentsSyncMethodInfo ResolveTerminalMethod "getAccessible" o = Gtk.WidgetGetAccessibleMethodInfo ResolveTerminalMethod "getActionGroup" o = Gtk.WidgetGetActionGroupMethodInfo ResolveTerminalMethod "getAllocatedBaseline" o = Gtk.WidgetGetAllocatedBaselineMethodInfo ResolveTerminalMethod "getAllocatedHeight" o = Gtk.WidgetGetAllocatedHeightMethodInfo ResolveTerminalMethod "getAllocatedWidth" o = Gtk.WidgetGetAllocatedWidthMethodInfo ResolveTerminalMethod "getAllocation" o = Gtk.WidgetGetAllocationMethodInfo ResolveTerminalMethod "getAllowBold" o = TerminalGetAllowBoldMethodInfo ResolveTerminalMethod "getAncestor" o = Gtk.WidgetGetAncestorMethodInfo ResolveTerminalMethod "getAppPaintable" o = Gtk.WidgetGetAppPaintableMethodInfo ResolveTerminalMethod "getAudibleBell" o = TerminalGetAudibleBellMethodInfo ResolveTerminalMethod "getBorder" o = Gtk.ScrollableGetBorderMethodInfo ResolveTerminalMethod "getCanDefault" o = Gtk.WidgetGetCanDefaultMethodInfo ResolveTerminalMethod "getCanFocus" o = Gtk.WidgetGetCanFocusMethodInfo ResolveTerminalMethod "getCharHeight" o = TerminalGetCharHeightMethodInfo ResolveTerminalMethod "getCharWidth" o = TerminalGetCharWidthMethodInfo ResolveTerminalMethod "getChildRequisition" o = Gtk.WidgetGetChildRequisitionMethodInfo ResolveTerminalMethod "getChildVisible" o = Gtk.WidgetGetChildVisibleMethodInfo ResolveTerminalMethod "getCjkAmbiguousWidth" o = TerminalGetCjkAmbiguousWidthMethodInfo ResolveTerminalMethod "getClip" o = Gtk.WidgetGetClipMethodInfo ResolveTerminalMethod "getClipboard" o = Gtk.WidgetGetClipboardMethodInfo ResolveTerminalMethod "getColumnCount" o = TerminalGetColumnCountMethodInfo ResolveTerminalMethod "getCompositeName" o = Gtk.WidgetGetCompositeNameMethodInfo ResolveTerminalMethod "getCurrentDirectoryUri" o = TerminalGetCurrentDirectoryUriMethodInfo ResolveTerminalMethod "getCurrentFileUri" o = TerminalGetCurrentFileUriMethodInfo ResolveTerminalMethod "getCursorBlinkMode" o = TerminalGetCursorBlinkModeMethodInfo ResolveTerminalMethod "getCursorPosition" o = TerminalGetCursorPositionMethodInfo ResolveTerminalMethod "getCursorShape" o = TerminalGetCursorShapeMethodInfo ResolveTerminalMethod "getData" o = GObject.ObjectGetDataMethodInfo ResolveTerminalMethod "getDeviceEnabled" o = Gtk.WidgetGetDeviceEnabledMethodInfo ResolveTerminalMethod "getDeviceEvents" o = Gtk.WidgetGetDeviceEventsMethodInfo ResolveTerminalMethod "getDirection" o = Gtk.WidgetGetDirectionMethodInfo ResolveTerminalMethod "getDisplay" o = Gtk.WidgetGetDisplayMethodInfo ResolveTerminalMethod "getDoubleBuffered" o = Gtk.WidgetGetDoubleBufferedMethodInfo ResolveTerminalMethod "getEncoding" o = TerminalGetEncodingMethodInfo ResolveTerminalMethod "getEvents" o = Gtk.WidgetGetEventsMethodInfo ResolveTerminalMethod "getFont" o = TerminalGetFontMethodInfo ResolveTerminalMethod "getFontMap" o = Gtk.WidgetGetFontMapMethodInfo ResolveTerminalMethod "getFontOptions" o = Gtk.WidgetGetFontOptionsMethodInfo ResolveTerminalMethod "getFontScale" o = TerminalGetFontScaleMethodInfo ResolveTerminalMethod "getFrameClock" o = Gtk.WidgetGetFrameClockMethodInfo ResolveTerminalMethod "getGeometryHints" o = TerminalGetGeometryHintsMethodInfo ResolveTerminalMethod "getHadjustment" o = Gtk.ScrollableGetHadjustmentMethodInfo ResolveTerminalMethod "getHalign" o = Gtk.WidgetGetHalignMethodInfo ResolveTerminalMethod "getHasSelection" o = TerminalGetHasSelectionMethodInfo ResolveTerminalMethod "getHasTooltip" o = Gtk.WidgetGetHasTooltipMethodInfo ResolveTerminalMethod "getHasWindow" o = Gtk.WidgetGetHasWindowMethodInfo ResolveTerminalMethod "getHexpand" o = Gtk.WidgetGetHexpandMethodInfo ResolveTerminalMethod "getHexpandSet" o = Gtk.WidgetGetHexpandSetMethodInfo ResolveTerminalMethod "getHscrollPolicy" o = Gtk.ScrollableGetHscrollPolicyMethodInfo ResolveTerminalMethod "getIconTitle" o = TerminalGetIconTitleMethodInfo ResolveTerminalMethod "getInputEnabled" o = TerminalGetInputEnabledMethodInfo ResolveTerminalMethod "getInternalChild" o = Gtk.BuildableGetInternalChildMethodInfo ResolveTerminalMethod "getMapped" o = Gtk.WidgetGetMappedMethodInfo ResolveTerminalMethod "getMarginBottom" o = Gtk.WidgetGetMarginBottomMethodInfo ResolveTerminalMethod "getMarginEnd" o = Gtk.WidgetGetMarginEndMethodInfo ResolveTerminalMethod "getMarginLeft" o = Gtk.WidgetGetMarginLeftMethodInfo ResolveTerminalMethod "getMarginRight" o = Gtk.WidgetGetMarginRightMethodInfo ResolveTerminalMethod "getMarginStart" o = Gtk.WidgetGetMarginStartMethodInfo ResolveTerminalMethod "getMarginTop" o = Gtk.WidgetGetMarginTopMethodInfo ResolveTerminalMethod "getModifierMask" o = Gtk.WidgetGetModifierMaskMethodInfo ResolveTerminalMethod "getModifierStyle" o = Gtk.WidgetGetModifierStyleMethodInfo ResolveTerminalMethod "getMouseAutohide" o = TerminalGetMouseAutohideMethodInfo ResolveTerminalMethod "getNoShowAll" o = Gtk.WidgetGetNoShowAllMethodInfo ResolveTerminalMethod "getOpacity" o = Gtk.WidgetGetOpacityMethodInfo ResolveTerminalMethod "getPangoContext" o = Gtk.WidgetGetPangoContextMethodInfo ResolveTerminalMethod "getParent" o = Gtk.WidgetGetParentMethodInfo ResolveTerminalMethod "getParentWindow" o = Gtk.WidgetGetParentWindowMethodInfo ResolveTerminalMethod "getPath" o = Gtk.WidgetGetPathMethodInfo ResolveTerminalMethod "getPointer" o = Gtk.WidgetGetPointerMethodInfo ResolveTerminalMethod "getPreferredHeight" o = Gtk.WidgetGetPreferredHeightMethodInfo ResolveTerminalMethod "getPreferredHeightAndBaselineForWidth" o = Gtk.WidgetGetPreferredHeightAndBaselineForWidthMethodInfo ResolveTerminalMethod "getPreferredHeightForWidth" o = Gtk.WidgetGetPreferredHeightForWidthMethodInfo ResolveTerminalMethod "getPreferredSize" o = Gtk.WidgetGetPreferredSizeMethodInfo ResolveTerminalMethod "getPreferredWidth" o = Gtk.WidgetGetPreferredWidthMethodInfo ResolveTerminalMethod "getPreferredWidthForHeight" o = Gtk.WidgetGetPreferredWidthForHeightMethodInfo ResolveTerminalMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo ResolveTerminalMethod "getPty" o = TerminalGetPtyMethodInfo ResolveTerminalMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo ResolveTerminalMethod "getRealized" o = Gtk.WidgetGetRealizedMethodInfo ResolveTerminalMethod "getReceivesDefault" o = Gtk.WidgetGetReceivesDefaultMethodInfo ResolveTerminalMethod "getRequestMode" o = Gtk.WidgetGetRequestModeMethodInfo ResolveTerminalMethod "getRequisition" o = Gtk.WidgetGetRequisitionMethodInfo ResolveTerminalMethod "getRewrapOnResize" o = TerminalGetRewrapOnResizeMethodInfo ResolveTerminalMethod "getRootWindow" o = Gtk.WidgetGetRootWindowMethodInfo ResolveTerminalMethod "getRowCount" o = TerminalGetRowCountMethodInfo ResolveTerminalMethod "getScaleFactor" o = Gtk.WidgetGetScaleFactorMethodInfo ResolveTerminalMethod "getScreen" o = Gtk.WidgetGetScreenMethodInfo ResolveTerminalMethod "getSensitive" o = Gtk.WidgetGetSensitiveMethodInfo ResolveTerminalMethod "getSettings" o = Gtk.WidgetGetSettingsMethodInfo ResolveTerminalMethod "getSizeRequest" o = Gtk.WidgetGetSizeRequestMethodInfo ResolveTerminalMethod "getState" o = Gtk.WidgetGetStateMethodInfo ResolveTerminalMethod "getStateFlags" o = Gtk.WidgetGetStateFlagsMethodInfo ResolveTerminalMethod "getStyle" o = Gtk.WidgetGetStyleMethodInfo ResolveTerminalMethod "getStyleContext" o = Gtk.WidgetGetStyleContextMethodInfo ResolveTerminalMethod "getSupportMultidevice" o = Gtk.WidgetGetSupportMultideviceMethodInfo ResolveTerminalMethod "getTemplateChild" o = Gtk.WidgetGetTemplateChildMethodInfo ResolveTerminalMethod "getText" o = TerminalGetTextMethodInfo ResolveTerminalMethod "getTextIncludeTrailingSpaces" o = TerminalGetTextIncludeTrailingSpacesMethodInfo ResolveTerminalMethod "getTextRange" o = TerminalGetTextRangeMethodInfo ResolveTerminalMethod "getTooltipMarkup" o = Gtk.WidgetGetTooltipMarkupMethodInfo ResolveTerminalMethod "getTooltipText" o = Gtk.WidgetGetTooltipTextMethodInfo ResolveTerminalMethod "getTooltipWindow" o = Gtk.WidgetGetTooltipWindowMethodInfo ResolveTerminalMethod "getToplevel" o = Gtk.WidgetGetToplevelMethodInfo ResolveTerminalMethod "getVadjustment" o = Gtk.ScrollableGetVadjustmentMethodInfo ResolveTerminalMethod "getValign" o = Gtk.WidgetGetValignMethodInfo ResolveTerminalMethod "getValignWithBaseline" o = Gtk.WidgetGetValignWithBaselineMethodInfo ResolveTerminalMethod "getVexpand" o = Gtk.WidgetGetVexpandMethodInfo ResolveTerminalMethod "getVexpandSet" o = Gtk.WidgetGetVexpandSetMethodInfo ResolveTerminalMethod "getVisible" o = Gtk.WidgetGetVisibleMethodInfo ResolveTerminalMethod "getVisual" o = Gtk.WidgetGetVisualMethodInfo ResolveTerminalMethod "getVscrollPolicy" o = Gtk.ScrollableGetVscrollPolicyMethodInfo ResolveTerminalMethod "getWindow" o = Gtk.WidgetGetWindowMethodInfo ResolveTerminalMethod "getWindowTitle" o = TerminalGetWindowTitleMethodInfo ResolveTerminalMethod "getWordCharExceptions" o = TerminalGetWordCharExceptionsMethodInfo ResolveTerminalMethod "setAccelPath" o = Gtk.WidgetSetAccelPathMethodInfo ResolveTerminalMethod "setAllocation" o = Gtk.WidgetSetAllocationMethodInfo ResolveTerminalMethod "setAllowBold" o = TerminalSetAllowBoldMethodInfo ResolveTerminalMethod "setAppPaintable" o = Gtk.WidgetSetAppPaintableMethodInfo ResolveTerminalMethod "setAudibleBell" o = TerminalSetAudibleBellMethodInfo ResolveTerminalMethod "setBackspaceBinding" o = TerminalSetBackspaceBindingMethodInfo ResolveTerminalMethod "setBuildableProperty" o = Gtk.BuildableSetBuildablePropertyMethodInfo ResolveTerminalMethod "setCanDefault" o = Gtk.WidgetSetCanDefaultMethodInfo ResolveTerminalMethod "setCanFocus" o = Gtk.WidgetSetCanFocusMethodInfo ResolveTerminalMethod "setChildVisible" o = Gtk.WidgetSetChildVisibleMethodInfo ResolveTerminalMethod "setCjkAmbiguousWidth" o = TerminalSetCjkAmbiguousWidthMethodInfo ResolveTerminalMethod "setClip" o = Gtk.WidgetSetClipMethodInfo ResolveTerminalMethod "setColorBackground" o = TerminalSetColorBackgroundMethodInfo ResolveTerminalMethod "setColorBold" o = TerminalSetColorBoldMethodInfo ResolveTerminalMethod "setColorCursor" o = TerminalSetColorCursorMethodInfo ResolveTerminalMethod "setColorForeground" o = TerminalSetColorForegroundMethodInfo ResolveTerminalMethod "setColorHighlight" o = TerminalSetColorHighlightMethodInfo ResolveTerminalMethod "setColorHighlightForeground" o = TerminalSetColorHighlightForegroundMethodInfo ResolveTerminalMethod "setColors" o = TerminalSetColorsMethodInfo ResolveTerminalMethod "setCompositeName" o = Gtk.WidgetSetCompositeNameMethodInfo ResolveTerminalMethod "setCursorBlinkMode" o = TerminalSetCursorBlinkModeMethodInfo ResolveTerminalMethod "setCursorShape" o = TerminalSetCursorShapeMethodInfo ResolveTerminalMethod "setData" o = GObject.ObjectSetDataMethodInfo ResolveTerminalMethod "setDefaultColors" o = TerminalSetDefaultColorsMethodInfo ResolveTerminalMethod "setDeleteBinding" o = TerminalSetDeleteBindingMethodInfo ResolveTerminalMethod "setDeviceEnabled" o = Gtk.WidgetSetDeviceEnabledMethodInfo ResolveTerminalMethod "setDeviceEvents" o = Gtk.WidgetSetDeviceEventsMethodInfo ResolveTerminalMethod "setDirection" o = Gtk.WidgetSetDirectionMethodInfo ResolveTerminalMethod "setDoubleBuffered" o = Gtk.WidgetSetDoubleBufferedMethodInfo ResolveTerminalMethod "setEncoding" o = TerminalSetEncodingMethodInfo ResolveTerminalMethod "setEvents" o = Gtk.WidgetSetEventsMethodInfo ResolveTerminalMethod "setFont" o = TerminalSetFontMethodInfo ResolveTerminalMethod "setFontMap" o = Gtk.WidgetSetFontMapMethodInfo ResolveTerminalMethod "setFontOptions" o = Gtk.WidgetSetFontOptionsMethodInfo ResolveTerminalMethod "setFontScale" o = TerminalSetFontScaleMethodInfo ResolveTerminalMethod "setGeometryHintsForWindow" o = TerminalSetGeometryHintsForWindowMethodInfo ResolveTerminalMethod "setHadjustment" o = Gtk.ScrollableSetHadjustmentMethodInfo ResolveTerminalMethod "setHalign" o = Gtk.WidgetSetHalignMethodInfo ResolveTerminalMethod "setHasTooltip" o = Gtk.WidgetSetHasTooltipMethodInfo ResolveTerminalMethod "setHasWindow" o = Gtk.WidgetSetHasWindowMethodInfo ResolveTerminalMethod "setHexpand" o = Gtk.WidgetSetHexpandMethodInfo ResolveTerminalMethod "setHexpandSet" o = Gtk.WidgetSetHexpandSetMethodInfo ResolveTerminalMethod "setHscrollPolicy" o = Gtk.ScrollableSetHscrollPolicyMethodInfo ResolveTerminalMethod "setInputEnabled" o = TerminalSetInputEnabledMethodInfo ResolveTerminalMethod "setMapped" o = Gtk.WidgetSetMappedMethodInfo ResolveTerminalMethod "setMarginBottom" o = Gtk.WidgetSetMarginBottomMethodInfo ResolveTerminalMethod "setMarginEnd" o = Gtk.WidgetSetMarginEndMethodInfo ResolveTerminalMethod "setMarginLeft" o = Gtk.WidgetSetMarginLeftMethodInfo ResolveTerminalMethod "setMarginRight" o = Gtk.WidgetSetMarginRightMethodInfo ResolveTerminalMethod "setMarginStart" o = Gtk.WidgetSetMarginStartMethodInfo ResolveTerminalMethod "setMarginTop" o = Gtk.WidgetSetMarginTopMethodInfo ResolveTerminalMethod "setMouseAutohide" o = TerminalSetMouseAutohideMethodInfo ResolveTerminalMethod "setNoShowAll" o = Gtk.WidgetSetNoShowAllMethodInfo ResolveTerminalMethod "setOpacity" o = Gtk.WidgetSetOpacityMethodInfo ResolveTerminalMethod "setParent" o = Gtk.WidgetSetParentMethodInfo ResolveTerminalMethod "setParentWindow" o = Gtk.WidgetSetParentWindowMethodInfo ResolveTerminalMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo ResolveTerminalMethod "setPty" o = TerminalSetPtyMethodInfo ResolveTerminalMethod "setRealized" o = Gtk.WidgetSetRealizedMethodInfo ResolveTerminalMethod "setReceivesDefault" o = Gtk.WidgetSetReceivesDefaultMethodInfo ResolveTerminalMethod "setRedrawOnAllocate" o = Gtk.WidgetSetRedrawOnAllocateMethodInfo ResolveTerminalMethod "setRewrapOnResize" o = TerminalSetRewrapOnResizeMethodInfo ResolveTerminalMethod "setScrollOnKeystroke" o = TerminalSetScrollOnKeystrokeMethodInfo ResolveTerminalMethod "setScrollOnOutput" o = TerminalSetScrollOnOutputMethodInfo ResolveTerminalMethod "setScrollbackLines" o = TerminalSetScrollbackLinesMethodInfo ResolveTerminalMethod "setSensitive" o = Gtk.WidgetSetSensitiveMethodInfo ResolveTerminalMethod "setSize" o = TerminalSetSizeMethodInfo ResolveTerminalMethod "setSizeRequest" o = Gtk.WidgetSetSizeRequestMethodInfo ResolveTerminalMethod "setState" o = Gtk.WidgetSetStateMethodInfo ResolveTerminalMethod "setStateFlags" o = Gtk.WidgetSetStateFlagsMethodInfo ResolveTerminalMethod "setStyle" o = Gtk.WidgetSetStyleMethodInfo ResolveTerminalMethod "setSupportMultidevice" o = Gtk.WidgetSetSupportMultideviceMethodInfo ResolveTerminalMethod "setTooltipMarkup" o = Gtk.WidgetSetTooltipMarkupMethodInfo ResolveTerminalMethod "setTooltipText" o = Gtk.WidgetSetTooltipTextMethodInfo ResolveTerminalMethod "setTooltipWindow" o = Gtk.WidgetSetTooltipWindowMethodInfo ResolveTerminalMethod "setVadjustment" o = Gtk.ScrollableSetVadjustmentMethodInfo ResolveTerminalMethod "setValign" o = Gtk.WidgetSetValignMethodInfo ResolveTerminalMethod "setVexpand" o = Gtk.WidgetSetVexpandMethodInfo ResolveTerminalMethod "setVexpandSet" o = Gtk.WidgetSetVexpandSetMethodInfo ResolveTerminalMethod "setVisible" o = Gtk.WidgetSetVisibleMethodInfo ResolveTerminalMethod "setVisual" o = Gtk.WidgetSetVisualMethodInfo ResolveTerminalMethod "setVscrollPolicy" o = Gtk.ScrollableSetVscrollPolicyMethodInfo ResolveTerminalMethod "setWindow" o = Gtk.WidgetSetWindowMethodInfo ResolveTerminalMethod "setWordCharExceptions" o = TerminalSetWordCharExceptionsMethodInfo ResolveTerminalMethod l o = MethodResolutionFailed l o instance (info ~ ResolveTerminalMethod t Terminal, MethodInfo info Terminal p) => IsLabelProxy t (Terminal -> p) where fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) #if MIN_VERSION_base(4,9,0) instance (info ~ ResolveTerminalMethod t Terminal, MethodInfo info Terminal p) => IsLabel t (Terminal -> p) where fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) #endif -- signal Terminal::bell type TerminalBellCallback = IO () noTerminalBellCallback :: Maybe TerminalBellCallback noTerminalBellCallback = Nothing type TerminalBellCallbackC = Ptr () -> -- object Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalBellCallback :: TerminalBellCallbackC -> IO (FunPtr TerminalBellCallbackC) terminalBellClosure :: TerminalBellCallback -> IO Closure terminalBellClosure cb = newCClosure =<< mkTerminalBellCallback wrapped where wrapped = terminalBellCallbackWrapper cb terminalBellCallbackWrapper :: TerminalBellCallback -> Ptr () -> Ptr () -> IO () terminalBellCallbackWrapper _cb _ _ = do _cb onTerminalBell :: (GObject a, MonadIO m) => a -> TerminalBellCallback -> m SignalHandlerId onTerminalBell obj cb = liftIO $ connectTerminalBell obj cb SignalConnectBefore afterTerminalBell :: (GObject a, MonadIO m) => a -> TerminalBellCallback -> m SignalHandlerId afterTerminalBell obj cb = connectTerminalBell obj cb SignalConnectAfter connectTerminalBell :: (GObject a, MonadIO m) => a -> TerminalBellCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalBell obj cb after = liftIO $ do cb' <- mkTerminalBellCallback (terminalBellCallbackWrapper cb) connectSignalFunPtr obj "bell" cb' after -- signal Terminal::char-size-changed type TerminalCharSizeChangedCallback = Word32 -> Word32 -> IO () noTerminalCharSizeChangedCallback :: Maybe TerminalCharSizeChangedCallback noTerminalCharSizeChangedCallback = Nothing type TerminalCharSizeChangedCallbackC = Ptr () -> -- object Word32 -> Word32 -> Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalCharSizeChangedCallback :: TerminalCharSizeChangedCallbackC -> IO (FunPtr TerminalCharSizeChangedCallbackC) terminalCharSizeChangedClosure :: TerminalCharSizeChangedCallback -> IO Closure terminalCharSizeChangedClosure cb = newCClosure =<< mkTerminalCharSizeChangedCallback wrapped where wrapped = terminalCharSizeChangedCallbackWrapper cb terminalCharSizeChangedCallbackWrapper :: TerminalCharSizeChangedCallback -> Ptr () -> Word32 -> Word32 -> Ptr () -> IO () terminalCharSizeChangedCallbackWrapper _cb _ width height _ = do _cb width height onTerminalCharSizeChanged :: (GObject a, MonadIO m) => a -> TerminalCharSizeChangedCallback -> m SignalHandlerId onTerminalCharSizeChanged obj cb = liftIO $ connectTerminalCharSizeChanged obj cb SignalConnectBefore afterTerminalCharSizeChanged :: (GObject a, MonadIO m) => a -> TerminalCharSizeChangedCallback -> m SignalHandlerId afterTerminalCharSizeChanged obj cb = connectTerminalCharSizeChanged obj cb SignalConnectAfter connectTerminalCharSizeChanged :: (GObject a, MonadIO m) => a -> TerminalCharSizeChangedCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalCharSizeChanged obj cb after = liftIO $ do cb' <- mkTerminalCharSizeChangedCallback (terminalCharSizeChangedCallbackWrapper cb) connectSignalFunPtr obj "char-size-changed" cb' after -- signal Terminal::child-exited type TerminalChildExitedCallback = Int32 -> IO () noTerminalChildExitedCallback :: Maybe TerminalChildExitedCallback noTerminalChildExitedCallback = Nothing type TerminalChildExitedCallbackC = Ptr () -> -- object Int32 -> Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalChildExitedCallback :: TerminalChildExitedCallbackC -> IO (FunPtr TerminalChildExitedCallbackC) terminalChildExitedClosure :: TerminalChildExitedCallback -> IO Closure terminalChildExitedClosure cb = newCClosure =<< mkTerminalChildExitedCallback wrapped where wrapped = terminalChildExitedCallbackWrapper cb terminalChildExitedCallbackWrapper :: TerminalChildExitedCallback -> Ptr () -> Int32 -> Ptr () -> IO () terminalChildExitedCallbackWrapper _cb _ status _ = do _cb status onTerminalChildExited :: (GObject a, MonadIO m) => a -> TerminalChildExitedCallback -> m SignalHandlerId onTerminalChildExited obj cb = liftIO $ connectTerminalChildExited obj cb SignalConnectBefore afterTerminalChildExited :: (GObject a, MonadIO m) => a -> TerminalChildExitedCallback -> m SignalHandlerId afterTerminalChildExited obj cb = connectTerminalChildExited obj cb SignalConnectAfter connectTerminalChildExited :: (GObject a, MonadIO m) => a -> TerminalChildExitedCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalChildExited obj cb after = liftIO $ do cb' <- mkTerminalChildExitedCallback (terminalChildExitedCallbackWrapper cb) connectSignalFunPtr obj "child-exited" cb' after -- signal Terminal::commit type TerminalCommitCallback = T.Text -> Word32 -> IO () noTerminalCommitCallback :: Maybe TerminalCommitCallback noTerminalCommitCallback = Nothing type TerminalCommitCallbackC = Ptr () -> -- object CString -> Word32 -> Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalCommitCallback :: TerminalCommitCallbackC -> IO (FunPtr TerminalCommitCallbackC) terminalCommitClosure :: TerminalCommitCallback -> IO Closure terminalCommitClosure cb = newCClosure =<< mkTerminalCommitCallback wrapped where wrapped = terminalCommitCallbackWrapper cb terminalCommitCallbackWrapper :: TerminalCommitCallback -> Ptr () -> CString -> Word32 -> Ptr () -> IO () terminalCommitCallbackWrapper _cb _ text size _ = do text' <- cstringToText text _cb text' size onTerminalCommit :: (GObject a, MonadIO m) => a -> TerminalCommitCallback -> m SignalHandlerId onTerminalCommit obj cb = liftIO $ connectTerminalCommit obj cb SignalConnectBefore afterTerminalCommit :: (GObject a, MonadIO m) => a -> TerminalCommitCallback -> m SignalHandlerId afterTerminalCommit obj cb = connectTerminalCommit obj cb SignalConnectAfter connectTerminalCommit :: (GObject a, MonadIO m) => a -> TerminalCommitCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalCommit obj cb after = liftIO $ do cb' <- mkTerminalCommitCallback (terminalCommitCallbackWrapper cb) connectSignalFunPtr obj "commit" cb' after -- signal Terminal::contents-changed type TerminalContentsChangedCallback = IO () noTerminalContentsChangedCallback :: Maybe TerminalContentsChangedCallback noTerminalContentsChangedCallback = Nothing type TerminalContentsChangedCallbackC = Ptr () -> -- object Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalContentsChangedCallback :: TerminalContentsChangedCallbackC -> IO (FunPtr TerminalContentsChangedCallbackC) terminalContentsChangedClosure :: TerminalContentsChangedCallback -> IO Closure terminalContentsChangedClosure cb = newCClosure =<< mkTerminalContentsChangedCallback wrapped where wrapped = terminalContentsChangedCallbackWrapper cb terminalContentsChangedCallbackWrapper :: TerminalContentsChangedCallback -> Ptr () -> Ptr () -> IO () terminalContentsChangedCallbackWrapper _cb _ _ = do _cb onTerminalContentsChanged :: (GObject a, MonadIO m) => a -> TerminalContentsChangedCallback -> m SignalHandlerId onTerminalContentsChanged obj cb = liftIO $ connectTerminalContentsChanged obj cb SignalConnectBefore afterTerminalContentsChanged :: (GObject a, MonadIO m) => a -> TerminalContentsChangedCallback -> m SignalHandlerId afterTerminalContentsChanged obj cb = connectTerminalContentsChanged obj cb SignalConnectAfter connectTerminalContentsChanged :: (GObject a, MonadIO m) => a -> TerminalContentsChangedCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalContentsChanged obj cb after = liftIO $ do cb' <- mkTerminalContentsChangedCallback (terminalContentsChangedCallbackWrapper cb) connectSignalFunPtr obj "contents-changed" cb' after -- signal Terminal::copy-clipboard type TerminalCopyClipboardCallback = IO () noTerminalCopyClipboardCallback :: Maybe TerminalCopyClipboardCallback noTerminalCopyClipboardCallback = Nothing type TerminalCopyClipboardCallbackC = Ptr () -> -- object Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalCopyClipboardCallback :: TerminalCopyClipboardCallbackC -> IO (FunPtr TerminalCopyClipboardCallbackC) terminalCopyClipboardClosure :: TerminalCopyClipboardCallback -> IO Closure terminalCopyClipboardClosure cb = newCClosure =<< mkTerminalCopyClipboardCallback wrapped where wrapped = terminalCopyClipboardCallbackWrapper cb terminalCopyClipboardCallbackWrapper :: TerminalCopyClipboardCallback -> Ptr () -> Ptr () -> IO () terminalCopyClipboardCallbackWrapper _cb _ _ = do _cb onTerminalCopyClipboard :: (GObject a, MonadIO m) => a -> TerminalCopyClipboardCallback -> m SignalHandlerId onTerminalCopyClipboard obj cb = liftIO $ connectTerminalCopyClipboard obj cb SignalConnectBefore afterTerminalCopyClipboard :: (GObject a, MonadIO m) => a -> TerminalCopyClipboardCallback -> m SignalHandlerId afterTerminalCopyClipboard obj cb = connectTerminalCopyClipboard obj cb SignalConnectAfter connectTerminalCopyClipboard :: (GObject a, MonadIO m) => a -> TerminalCopyClipboardCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalCopyClipboard obj cb after = liftIO $ do cb' <- mkTerminalCopyClipboardCallback (terminalCopyClipboardCallbackWrapper cb) connectSignalFunPtr obj "copy-clipboard" cb' after -- signal Terminal::current-directory-uri-changed type TerminalCurrentDirectoryUriChangedCallback = IO () noTerminalCurrentDirectoryUriChangedCallback :: Maybe TerminalCurrentDirectoryUriChangedCallback noTerminalCurrentDirectoryUriChangedCallback = Nothing type TerminalCurrentDirectoryUriChangedCallbackC = Ptr () -> -- object Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalCurrentDirectoryUriChangedCallback :: TerminalCurrentDirectoryUriChangedCallbackC -> IO (FunPtr TerminalCurrentDirectoryUriChangedCallbackC) terminalCurrentDirectoryUriChangedClosure :: TerminalCurrentDirectoryUriChangedCallback -> IO Closure terminalCurrentDirectoryUriChangedClosure cb = newCClosure =<< mkTerminalCurrentDirectoryUriChangedCallback wrapped where wrapped = terminalCurrentDirectoryUriChangedCallbackWrapper cb terminalCurrentDirectoryUriChangedCallbackWrapper :: TerminalCurrentDirectoryUriChangedCallback -> Ptr () -> Ptr () -> IO () terminalCurrentDirectoryUriChangedCallbackWrapper _cb _ _ = do _cb onTerminalCurrentDirectoryUriChanged :: (GObject a, MonadIO m) => a -> TerminalCurrentDirectoryUriChangedCallback -> m SignalHandlerId onTerminalCurrentDirectoryUriChanged obj cb = liftIO $ connectTerminalCurrentDirectoryUriChanged obj cb SignalConnectBefore afterTerminalCurrentDirectoryUriChanged :: (GObject a, MonadIO m) => a -> TerminalCurrentDirectoryUriChangedCallback -> m SignalHandlerId afterTerminalCurrentDirectoryUriChanged obj cb = connectTerminalCurrentDirectoryUriChanged obj cb SignalConnectAfter connectTerminalCurrentDirectoryUriChanged :: (GObject a, MonadIO m) => a -> TerminalCurrentDirectoryUriChangedCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalCurrentDirectoryUriChanged obj cb after = liftIO $ do cb' <- mkTerminalCurrentDirectoryUriChangedCallback (terminalCurrentDirectoryUriChangedCallbackWrapper cb) connectSignalFunPtr obj "current-directory-uri-changed" cb' after -- signal Terminal::current-file-uri-changed type TerminalCurrentFileUriChangedCallback = IO () noTerminalCurrentFileUriChangedCallback :: Maybe TerminalCurrentFileUriChangedCallback noTerminalCurrentFileUriChangedCallback = Nothing type TerminalCurrentFileUriChangedCallbackC = Ptr () -> -- object Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalCurrentFileUriChangedCallback :: TerminalCurrentFileUriChangedCallbackC -> IO (FunPtr TerminalCurrentFileUriChangedCallbackC) terminalCurrentFileUriChangedClosure :: TerminalCurrentFileUriChangedCallback -> IO Closure terminalCurrentFileUriChangedClosure cb = newCClosure =<< mkTerminalCurrentFileUriChangedCallback wrapped where wrapped = terminalCurrentFileUriChangedCallbackWrapper cb terminalCurrentFileUriChangedCallbackWrapper :: TerminalCurrentFileUriChangedCallback -> Ptr () -> Ptr () -> IO () terminalCurrentFileUriChangedCallbackWrapper _cb _ _ = do _cb onTerminalCurrentFileUriChanged :: (GObject a, MonadIO m) => a -> TerminalCurrentFileUriChangedCallback -> m SignalHandlerId onTerminalCurrentFileUriChanged obj cb = liftIO $ connectTerminalCurrentFileUriChanged obj cb SignalConnectBefore afterTerminalCurrentFileUriChanged :: (GObject a, MonadIO m) => a -> TerminalCurrentFileUriChangedCallback -> m SignalHandlerId afterTerminalCurrentFileUriChanged obj cb = connectTerminalCurrentFileUriChanged obj cb SignalConnectAfter connectTerminalCurrentFileUriChanged :: (GObject a, MonadIO m) => a -> TerminalCurrentFileUriChangedCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalCurrentFileUriChanged obj cb after = liftIO $ do cb' <- mkTerminalCurrentFileUriChangedCallback (terminalCurrentFileUriChangedCallbackWrapper cb) connectSignalFunPtr obj "current-file-uri-changed" cb' after -- signal Terminal::cursor-moved type TerminalCursorMovedCallback = IO () noTerminalCursorMovedCallback :: Maybe TerminalCursorMovedCallback noTerminalCursorMovedCallback = Nothing type TerminalCursorMovedCallbackC = Ptr () -> -- object Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalCursorMovedCallback :: TerminalCursorMovedCallbackC -> IO (FunPtr TerminalCursorMovedCallbackC) terminalCursorMovedClosure :: TerminalCursorMovedCallback -> IO Closure terminalCursorMovedClosure cb = newCClosure =<< mkTerminalCursorMovedCallback wrapped where wrapped = terminalCursorMovedCallbackWrapper cb terminalCursorMovedCallbackWrapper :: TerminalCursorMovedCallback -> Ptr () -> Ptr () -> IO () terminalCursorMovedCallbackWrapper _cb _ _ = do _cb onTerminalCursorMoved :: (GObject a, MonadIO m) => a -> TerminalCursorMovedCallback -> m SignalHandlerId onTerminalCursorMoved obj cb = liftIO $ connectTerminalCursorMoved obj cb SignalConnectBefore afterTerminalCursorMoved :: (GObject a, MonadIO m) => a -> TerminalCursorMovedCallback -> m SignalHandlerId afterTerminalCursorMoved obj cb = connectTerminalCursorMoved obj cb SignalConnectAfter connectTerminalCursorMoved :: (GObject a, MonadIO m) => a -> TerminalCursorMovedCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalCursorMoved obj cb after = liftIO $ do cb' <- mkTerminalCursorMovedCallback (terminalCursorMovedCallbackWrapper cb) connectSignalFunPtr obj "cursor-moved" cb' after -- signal Terminal::decrease-font-size type TerminalDecreaseFontSizeCallback = IO () noTerminalDecreaseFontSizeCallback :: Maybe TerminalDecreaseFontSizeCallback noTerminalDecreaseFontSizeCallback = Nothing type TerminalDecreaseFontSizeCallbackC = Ptr () -> -- object Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalDecreaseFontSizeCallback :: TerminalDecreaseFontSizeCallbackC -> IO (FunPtr TerminalDecreaseFontSizeCallbackC) terminalDecreaseFontSizeClosure :: TerminalDecreaseFontSizeCallback -> IO Closure terminalDecreaseFontSizeClosure cb = newCClosure =<< mkTerminalDecreaseFontSizeCallback wrapped where wrapped = terminalDecreaseFontSizeCallbackWrapper cb terminalDecreaseFontSizeCallbackWrapper :: TerminalDecreaseFontSizeCallback -> Ptr () -> Ptr () -> IO () terminalDecreaseFontSizeCallbackWrapper _cb _ _ = do _cb onTerminalDecreaseFontSize :: (GObject a, MonadIO m) => a -> TerminalDecreaseFontSizeCallback -> m SignalHandlerId onTerminalDecreaseFontSize obj cb = liftIO $ connectTerminalDecreaseFontSize obj cb SignalConnectBefore afterTerminalDecreaseFontSize :: (GObject a, MonadIO m) => a -> TerminalDecreaseFontSizeCallback -> m SignalHandlerId afterTerminalDecreaseFontSize obj cb = connectTerminalDecreaseFontSize obj cb SignalConnectAfter connectTerminalDecreaseFontSize :: (GObject a, MonadIO m) => a -> TerminalDecreaseFontSizeCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalDecreaseFontSize obj cb after = liftIO $ do cb' <- mkTerminalDecreaseFontSizeCallback (terminalDecreaseFontSizeCallbackWrapper cb) connectSignalFunPtr obj "decrease-font-size" cb' after -- signal Terminal::deiconify-window type TerminalDeiconifyWindowCallback = IO () noTerminalDeiconifyWindowCallback :: Maybe TerminalDeiconifyWindowCallback noTerminalDeiconifyWindowCallback = Nothing type TerminalDeiconifyWindowCallbackC = Ptr () -> -- object Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalDeiconifyWindowCallback :: TerminalDeiconifyWindowCallbackC -> IO (FunPtr TerminalDeiconifyWindowCallbackC) terminalDeiconifyWindowClosure :: TerminalDeiconifyWindowCallback -> IO Closure terminalDeiconifyWindowClosure cb = newCClosure =<< mkTerminalDeiconifyWindowCallback wrapped where wrapped = terminalDeiconifyWindowCallbackWrapper cb terminalDeiconifyWindowCallbackWrapper :: TerminalDeiconifyWindowCallback -> Ptr () -> Ptr () -> IO () terminalDeiconifyWindowCallbackWrapper _cb _ _ = do _cb onTerminalDeiconifyWindow :: (GObject a, MonadIO m) => a -> TerminalDeiconifyWindowCallback -> m SignalHandlerId onTerminalDeiconifyWindow obj cb = liftIO $ connectTerminalDeiconifyWindow obj cb SignalConnectBefore afterTerminalDeiconifyWindow :: (GObject a, MonadIO m) => a -> TerminalDeiconifyWindowCallback -> m SignalHandlerId afterTerminalDeiconifyWindow obj cb = connectTerminalDeiconifyWindow obj cb SignalConnectAfter connectTerminalDeiconifyWindow :: (GObject a, MonadIO m) => a -> TerminalDeiconifyWindowCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalDeiconifyWindow obj cb after = liftIO $ do cb' <- mkTerminalDeiconifyWindowCallback (terminalDeiconifyWindowCallbackWrapper cb) connectSignalFunPtr obj "deiconify-window" cb' after -- signal Terminal::encoding-changed type TerminalEncodingChangedCallback = IO () noTerminalEncodingChangedCallback :: Maybe TerminalEncodingChangedCallback noTerminalEncodingChangedCallback = Nothing type TerminalEncodingChangedCallbackC = Ptr () -> -- object Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalEncodingChangedCallback :: TerminalEncodingChangedCallbackC -> IO (FunPtr TerminalEncodingChangedCallbackC) terminalEncodingChangedClosure :: TerminalEncodingChangedCallback -> IO Closure terminalEncodingChangedClosure cb = newCClosure =<< mkTerminalEncodingChangedCallback wrapped where wrapped = terminalEncodingChangedCallbackWrapper cb terminalEncodingChangedCallbackWrapper :: TerminalEncodingChangedCallback -> Ptr () -> Ptr () -> IO () terminalEncodingChangedCallbackWrapper _cb _ _ = do _cb onTerminalEncodingChanged :: (GObject a, MonadIO m) => a -> TerminalEncodingChangedCallback -> m SignalHandlerId onTerminalEncodingChanged obj cb = liftIO $ connectTerminalEncodingChanged obj cb SignalConnectBefore afterTerminalEncodingChanged :: (GObject a, MonadIO m) => a -> TerminalEncodingChangedCallback -> m SignalHandlerId afterTerminalEncodingChanged obj cb = connectTerminalEncodingChanged obj cb SignalConnectAfter connectTerminalEncodingChanged :: (GObject a, MonadIO m) => a -> TerminalEncodingChangedCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalEncodingChanged obj cb after = liftIO $ do cb' <- mkTerminalEncodingChangedCallback (terminalEncodingChangedCallbackWrapper cb) connectSignalFunPtr obj "encoding-changed" cb' after -- signal Terminal::eof type TerminalEofCallback = IO () noTerminalEofCallback :: Maybe TerminalEofCallback noTerminalEofCallback = Nothing type TerminalEofCallbackC = Ptr () -> -- object Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalEofCallback :: TerminalEofCallbackC -> IO (FunPtr TerminalEofCallbackC) terminalEofClosure :: TerminalEofCallback -> IO Closure terminalEofClosure cb = newCClosure =<< mkTerminalEofCallback wrapped where wrapped = terminalEofCallbackWrapper cb terminalEofCallbackWrapper :: TerminalEofCallback -> Ptr () -> Ptr () -> IO () terminalEofCallbackWrapper _cb _ _ = do _cb onTerminalEof :: (GObject a, MonadIO m) => a -> TerminalEofCallback -> m SignalHandlerId onTerminalEof obj cb = liftIO $ connectTerminalEof obj cb SignalConnectBefore afterTerminalEof :: (GObject a, MonadIO m) => a -> TerminalEofCallback -> m SignalHandlerId afterTerminalEof obj cb = connectTerminalEof obj cb SignalConnectAfter connectTerminalEof :: (GObject a, MonadIO m) => a -> TerminalEofCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalEof obj cb after = liftIO $ do cb' <- mkTerminalEofCallback (terminalEofCallbackWrapper cb) connectSignalFunPtr obj "eof" cb' after -- signal Terminal::icon-title-changed type TerminalIconTitleChangedCallback = IO () noTerminalIconTitleChangedCallback :: Maybe TerminalIconTitleChangedCallback noTerminalIconTitleChangedCallback = Nothing type TerminalIconTitleChangedCallbackC = Ptr () -> -- object Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalIconTitleChangedCallback :: TerminalIconTitleChangedCallbackC -> IO (FunPtr TerminalIconTitleChangedCallbackC) terminalIconTitleChangedClosure :: TerminalIconTitleChangedCallback -> IO Closure terminalIconTitleChangedClosure cb = newCClosure =<< mkTerminalIconTitleChangedCallback wrapped where wrapped = terminalIconTitleChangedCallbackWrapper cb terminalIconTitleChangedCallbackWrapper :: TerminalIconTitleChangedCallback -> Ptr () -> Ptr () -> IO () terminalIconTitleChangedCallbackWrapper _cb _ _ = do _cb onTerminalIconTitleChanged :: (GObject a, MonadIO m) => a -> TerminalIconTitleChangedCallback -> m SignalHandlerId onTerminalIconTitleChanged obj cb = liftIO $ connectTerminalIconTitleChanged obj cb SignalConnectBefore afterTerminalIconTitleChanged :: (GObject a, MonadIO m) => a -> TerminalIconTitleChangedCallback -> m SignalHandlerId afterTerminalIconTitleChanged obj cb = connectTerminalIconTitleChanged obj cb SignalConnectAfter connectTerminalIconTitleChanged :: (GObject a, MonadIO m) => a -> TerminalIconTitleChangedCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalIconTitleChanged obj cb after = liftIO $ do cb' <- mkTerminalIconTitleChangedCallback (terminalIconTitleChangedCallbackWrapper cb) connectSignalFunPtr obj "icon-title-changed" cb' after -- signal Terminal::iconify-window type TerminalIconifyWindowCallback = IO () noTerminalIconifyWindowCallback :: Maybe TerminalIconifyWindowCallback noTerminalIconifyWindowCallback = Nothing type TerminalIconifyWindowCallbackC = Ptr () -> -- object Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalIconifyWindowCallback :: TerminalIconifyWindowCallbackC -> IO (FunPtr TerminalIconifyWindowCallbackC) terminalIconifyWindowClosure :: TerminalIconifyWindowCallback -> IO Closure terminalIconifyWindowClosure cb = newCClosure =<< mkTerminalIconifyWindowCallback wrapped where wrapped = terminalIconifyWindowCallbackWrapper cb terminalIconifyWindowCallbackWrapper :: TerminalIconifyWindowCallback -> Ptr () -> Ptr () -> IO () terminalIconifyWindowCallbackWrapper _cb _ _ = do _cb onTerminalIconifyWindow :: (GObject a, MonadIO m) => a -> TerminalIconifyWindowCallback -> m SignalHandlerId onTerminalIconifyWindow obj cb = liftIO $ connectTerminalIconifyWindow obj cb SignalConnectBefore afterTerminalIconifyWindow :: (GObject a, MonadIO m) => a -> TerminalIconifyWindowCallback -> m SignalHandlerId afterTerminalIconifyWindow obj cb = connectTerminalIconifyWindow obj cb SignalConnectAfter connectTerminalIconifyWindow :: (GObject a, MonadIO m) => a -> TerminalIconifyWindowCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalIconifyWindow obj cb after = liftIO $ do cb' <- mkTerminalIconifyWindowCallback (terminalIconifyWindowCallbackWrapper cb) connectSignalFunPtr obj "iconify-window" cb' after -- signal Terminal::increase-font-size type TerminalIncreaseFontSizeCallback = IO () noTerminalIncreaseFontSizeCallback :: Maybe TerminalIncreaseFontSizeCallback noTerminalIncreaseFontSizeCallback = Nothing type TerminalIncreaseFontSizeCallbackC = Ptr () -> -- object Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalIncreaseFontSizeCallback :: TerminalIncreaseFontSizeCallbackC -> IO (FunPtr TerminalIncreaseFontSizeCallbackC) terminalIncreaseFontSizeClosure :: TerminalIncreaseFontSizeCallback -> IO Closure terminalIncreaseFontSizeClosure cb = newCClosure =<< mkTerminalIncreaseFontSizeCallback wrapped where wrapped = terminalIncreaseFontSizeCallbackWrapper cb terminalIncreaseFontSizeCallbackWrapper :: TerminalIncreaseFontSizeCallback -> Ptr () -> Ptr () -> IO () terminalIncreaseFontSizeCallbackWrapper _cb _ _ = do _cb onTerminalIncreaseFontSize :: (GObject a, MonadIO m) => a -> TerminalIncreaseFontSizeCallback -> m SignalHandlerId onTerminalIncreaseFontSize obj cb = liftIO $ connectTerminalIncreaseFontSize obj cb SignalConnectBefore afterTerminalIncreaseFontSize :: (GObject a, MonadIO m) => a -> TerminalIncreaseFontSizeCallback -> m SignalHandlerId afterTerminalIncreaseFontSize obj cb = connectTerminalIncreaseFontSize obj cb SignalConnectAfter connectTerminalIncreaseFontSize :: (GObject a, MonadIO m) => a -> TerminalIncreaseFontSizeCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalIncreaseFontSize obj cb after = liftIO $ do cb' <- mkTerminalIncreaseFontSizeCallback (terminalIncreaseFontSizeCallbackWrapper cb) connectSignalFunPtr obj "increase-font-size" cb' after -- signal Terminal::lower-window type TerminalLowerWindowCallback = IO () noTerminalLowerWindowCallback :: Maybe TerminalLowerWindowCallback noTerminalLowerWindowCallback = Nothing type TerminalLowerWindowCallbackC = Ptr () -> -- object Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalLowerWindowCallback :: TerminalLowerWindowCallbackC -> IO (FunPtr TerminalLowerWindowCallbackC) terminalLowerWindowClosure :: TerminalLowerWindowCallback -> IO Closure terminalLowerWindowClosure cb = newCClosure =<< mkTerminalLowerWindowCallback wrapped where wrapped = terminalLowerWindowCallbackWrapper cb terminalLowerWindowCallbackWrapper :: TerminalLowerWindowCallback -> Ptr () -> Ptr () -> IO () terminalLowerWindowCallbackWrapper _cb _ _ = do _cb onTerminalLowerWindow :: (GObject a, MonadIO m) => a -> TerminalLowerWindowCallback -> m SignalHandlerId onTerminalLowerWindow obj cb = liftIO $ connectTerminalLowerWindow obj cb SignalConnectBefore afterTerminalLowerWindow :: (GObject a, MonadIO m) => a -> TerminalLowerWindowCallback -> m SignalHandlerId afterTerminalLowerWindow obj cb = connectTerminalLowerWindow obj cb SignalConnectAfter connectTerminalLowerWindow :: (GObject a, MonadIO m) => a -> TerminalLowerWindowCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalLowerWindow obj cb after = liftIO $ do cb' <- mkTerminalLowerWindowCallback (terminalLowerWindowCallbackWrapper cb) connectSignalFunPtr obj "lower-window" cb' after -- signal Terminal::maximize-window type TerminalMaximizeWindowCallback = IO () noTerminalMaximizeWindowCallback :: Maybe TerminalMaximizeWindowCallback noTerminalMaximizeWindowCallback = Nothing type TerminalMaximizeWindowCallbackC = Ptr () -> -- object Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalMaximizeWindowCallback :: TerminalMaximizeWindowCallbackC -> IO (FunPtr TerminalMaximizeWindowCallbackC) terminalMaximizeWindowClosure :: TerminalMaximizeWindowCallback -> IO Closure terminalMaximizeWindowClosure cb = newCClosure =<< mkTerminalMaximizeWindowCallback wrapped where wrapped = terminalMaximizeWindowCallbackWrapper cb terminalMaximizeWindowCallbackWrapper :: TerminalMaximizeWindowCallback -> Ptr () -> Ptr () -> IO () terminalMaximizeWindowCallbackWrapper _cb _ _ = do _cb onTerminalMaximizeWindow :: (GObject a, MonadIO m) => a -> TerminalMaximizeWindowCallback -> m SignalHandlerId onTerminalMaximizeWindow obj cb = liftIO $ connectTerminalMaximizeWindow obj cb SignalConnectBefore afterTerminalMaximizeWindow :: (GObject a, MonadIO m) => a -> TerminalMaximizeWindowCallback -> m SignalHandlerId afterTerminalMaximizeWindow obj cb = connectTerminalMaximizeWindow obj cb SignalConnectAfter connectTerminalMaximizeWindow :: (GObject a, MonadIO m) => a -> TerminalMaximizeWindowCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalMaximizeWindow obj cb after = liftIO $ do cb' <- mkTerminalMaximizeWindowCallback (terminalMaximizeWindowCallbackWrapper cb) connectSignalFunPtr obj "maximize-window" cb' after -- signal Terminal::move-window type TerminalMoveWindowCallback = Word32 -> Word32 -> IO () noTerminalMoveWindowCallback :: Maybe TerminalMoveWindowCallback noTerminalMoveWindowCallback = Nothing type TerminalMoveWindowCallbackC = Ptr () -> -- object Word32 -> Word32 -> Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalMoveWindowCallback :: TerminalMoveWindowCallbackC -> IO (FunPtr TerminalMoveWindowCallbackC) terminalMoveWindowClosure :: TerminalMoveWindowCallback -> IO Closure terminalMoveWindowClosure cb = newCClosure =<< mkTerminalMoveWindowCallback wrapped where wrapped = terminalMoveWindowCallbackWrapper cb terminalMoveWindowCallbackWrapper :: TerminalMoveWindowCallback -> Ptr () -> Word32 -> Word32 -> Ptr () -> IO () terminalMoveWindowCallbackWrapper _cb _ x y _ = do _cb x y onTerminalMoveWindow :: (GObject a, MonadIO m) => a -> TerminalMoveWindowCallback -> m SignalHandlerId onTerminalMoveWindow obj cb = liftIO $ connectTerminalMoveWindow obj cb SignalConnectBefore afterTerminalMoveWindow :: (GObject a, MonadIO m) => a -> TerminalMoveWindowCallback -> m SignalHandlerId afterTerminalMoveWindow obj cb = connectTerminalMoveWindow obj cb SignalConnectAfter connectTerminalMoveWindow :: (GObject a, MonadIO m) => a -> TerminalMoveWindowCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalMoveWindow obj cb after = liftIO $ do cb' <- mkTerminalMoveWindowCallback (terminalMoveWindowCallbackWrapper cb) connectSignalFunPtr obj "move-window" cb' after -- signal Terminal::notification-received type TerminalNotificationReceivedCallback = T.Text -> Maybe T.Text -> IO () noTerminalNotificationReceivedCallback :: Maybe TerminalNotificationReceivedCallback noTerminalNotificationReceivedCallback = Nothing type TerminalNotificationReceivedCallbackC = Ptr () -> -- object CString -> CString -> Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalNotificationReceivedCallback :: TerminalNotificationReceivedCallbackC -> IO (FunPtr TerminalNotificationReceivedCallbackC) terminalNotificationReceivedClosure :: TerminalNotificationReceivedCallback -> IO Closure terminalNotificationReceivedClosure cb = newCClosure =<< mkTerminalNotificationReceivedCallback wrapped where wrapped = terminalNotificationReceivedCallbackWrapper cb terminalNotificationReceivedCallbackWrapper :: TerminalNotificationReceivedCallback -> Ptr () -> CString -> CString -> Ptr () -> IO () terminalNotificationReceivedCallbackWrapper _cb _ summary body _ = do summary' <- cstringToText summary maybeBody <- if body == nullPtr then return Nothing else do body' <- cstringToText body return $ Just body' _cb summary' maybeBody onTerminalNotificationReceived :: (GObject a, MonadIO m) => a -> TerminalNotificationReceivedCallback -> m SignalHandlerId onTerminalNotificationReceived obj cb = liftIO $ connectTerminalNotificationReceived obj cb SignalConnectBefore afterTerminalNotificationReceived :: (GObject a, MonadIO m) => a -> TerminalNotificationReceivedCallback -> m SignalHandlerId afterTerminalNotificationReceived obj cb = connectTerminalNotificationReceived obj cb SignalConnectAfter connectTerminalNotificationReceived :: (GObject a, MonadIO m) => a -> TerminalNotificationReceivedCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalNotificationReceived obj cb after = liftIO $ do cb' <- mkTerminalNotificationReceivedCallback (terminalNotificationReceivedCallbackWrapper cb) connectSignalFunPtr obj "notification-received" cb' after -- signal Terminal::paste-clipboard type TerminalPasteClipboardCallback = IO () noTerminalPasteClipboardCallback :: Maybe TerminalPasteClipboardCallback noTerminalPasteClipboardCallback = Nothing type TerminalPasteClipboardCallbackC = Ptr () -> -- object Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalPasteClipboardCallback :: TerminalPasteClipboardCallbackC -> IO (FunPtr TerminalPasteClipboardCallbackC) terminalPasteClipboardClosure :: TerminalPasteClipboardCallback -> IO Closure terminalPasteClipboardClosure cb = newCClosure =<< mkTerminalPasteClipboardCallback wrapped where wrapped = terminalPasteClipboardCallbackWrapper cb terminalPasteClipboardCallbackWrapper :: TerminalPasteClipboardCallback -> Ptr () -> Ptr () -> IO () terminalPasteClipboardCallbackWrapper _cb _ _ = do _cb onTerminalPasteClipboard :: (GObject a, MonadIO m) => a -> TerminalPasteClipboardCallback -> m SignalHandlerId onTerminalPasteClipboard obj cb = liftIO $ connectTerminalPasteClipboard obj cb SignalConnectBefore afterTerminalPasteClipboard :: (GObject a, MonadIO m) => a -> TerminalPasteClipboardCallback -> m SignalHandlerId afterTerminalPasteClipboard obj cb = connectTerminalPasteClipboard obj cb SignalConnectAfter connectTerminalPasteClipboard :: (GObject a, MonadIO m) => a -> TerminalPasteClipboardCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalPasteClipboard obj cb after = liftIO $ do cb' <- mkTerminalPasteClipboardCallback (terminalPasteClipboardCallbackWrapper cb) connectSignalFunPtr obj "paste-clipboard" cb' after -- signal Terminal::raise-window type TerminalRaiseWindowCallback = IO () noTerminalRaiseWindowCallback :: Maybe TerminalRaiseWindowCallback noTerminalRaiseWindowCallback = Nothing type TerminalRaiseWindowCallbackC = Ptr () -> -- object Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalRaiseWindowCallback :: TerminalRaiseWindowCallbackC -> IO (FunPtr TerminalRaiseWindowCallbackC) terminalRaiseWindowClosure :: TerminalRaiseWindowCallback -> IO Closure terminalRaiseWindowClosure cb = newCClosure =<< mkTerminalRaiseWindowCallback wrapped where wrapped = terminalRaiseWindowCallbackWrapper cb terminalRaiseWindowCallbackWrapper :: TerminalRaiseWindowCallback -> Ptr () -> Ptr () -> IO () terminalRaiseWindowCallbackWrapper _cb _ _ = do _cb onTerminalRaiseWindow :: (GObject a, MonadIO m) => a -> TerminalRaiseWindowCallback -> m SignalHandlerId onTerminalRaiseWindow obj cb = liftIO $ connectTerminalRaiseWindow obj cb SignalConnectBefore afterTerminalRaiseWindow :: (GObject a, MonadIO m) => a -> TerminalRaiseWindowCallback -> m SignalHandlerId afterTerminalRaiseWindow obj cb = connectTerminalRaiseWindow obj cb SignalConnectAfter connectTerminalRaiseWindow :: (GObject a, MonadIO m) => a -> TerminalRaiseWindowCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalRaiseWindow obj cb after = liftIO $ do cb' <- mkTerminalRaiseWindowCallback (terminalRaiseWindowCallbackWrapper cb) connectSignalFunPtr obj "raise-window" cb' after -- signal Terminal::refresh-window type TerminalRefreshWindowCallback = IO () noTerminalRefreshWindowCallback :: Maybe TerminalRefreshWindowCallback noTerminalRefreshWindowCallback = Nothing type TerminalRefreshWindowCallbackC = Ptr () -> -- object Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalRefreshWindowCallback :: TerminalRefreshWindowCallbackC -> IO (FunPtr TerminalRefreshWindowCallbackC) terminalRefreshWindowClosure :: TerminalRefreshWindowCallback -> IO Closure terminalRefreshWindowClosure cb = newCClosure =<< mkTerminalRefreshWindowCallback wrapped where wrapped = terminalRefreshWindowCallbackWrapper cb terminalRefreshWindowCallbackWrapper :: TerminalRefreshWindowCallback -> Ptr () -> Ptr () -> IO () terminalRefreshWindowCallbackWrapper _cb _ _ = do _cb onTerminalRefreshWindow :: (GObject a, MonadIO m) => a -> TerminalRefreshWindowCallback -> m SignalHandlerId onTerminalRefreshWindow obj cb = liftIO $ connectTerminalRefreshWindow obj cb SignalConnectBefore afterTerminalRefreshWindow :: (GObject a, MonadIO m) => a -> TerminalRefreshWindowCallback -> m SignalHandlerId afterTerminalRefreshWindow obj cb = connectTerminalRefreshWindow obj cb SignalConnectAfter connectTerminalRefreshWindow :: (GObject a, MonadIO m) => a -> TerminalRefreshWindowCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalRefreshWindow obj cb after = liftIO $ do cb' <- mkTerminalRefreshWindowCallback (terminalRefreshWindowCallbackWrapper cb) connectSignalFunPtr obj "refresh-window" cb' after -- signal Terminal::resize-window type TerminalResizeWindowCallback = Word32 -> Word32 -> IO () noTerminalResizeWindowCallback :: Maybe TerminalResizeWindowCallback noTerminalResizeWindowCallback = Nothing type TerminalResizeWindowCallbackC = Ptr () -> -- object Word32 -> Word32 -> Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalResizeWindowCallback :: TerminalResizeWindowCallbackC -> IO (FunPtr TerminalResizeWindowCallbackC) terminalResizeWindowClosure :: TerminalResizeWindowCallback -> IO Closure terminalResizeWindowClosure cb = newCClosure =<< mkTerminalResizeWindowCallback wrapped where wrapped = terminalResizeWindowCallbackWrapper cb terminalResizeWindowCallbackWrapper :: TerminalResizeWindowCallback -> Ptr () -> Word32 -> Word32 -> Ptr () -> IO () terminalResizeWindowCallbackWrapper _cb _ width height _ = do _cb width height onTerminalResizeWindow :: (GObject a, MonadIO m) => a -> TerminalResizeWindowCallback -> m SignalHandlerId onTerminalResizeWindow obj cb = liftIO $ connectTerminalResizeWindow obj cb SignalConnectBefore afterTerminalResizeWindow :: (GObject a, MonadIO m) => a -> TerminalResizeWindowCallback -> m SignalHandlerId afterTerminalResizeWindow obj cb = connectTerminalResizeWindow obj cb SignalConnectAfter connectTerminalResizeWindow :: (GObject a, MonadIO m) => a -> TerminalResizeWindowCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalResizeWindow obj cb after = liftIO $ do cb' <- mkTerminalResizeWindowCallback (terminalResizeWindowCallbackWrapper cb) connectSignalFunPtr obj "resize-window" cb' after -- signal Terminal::restore-window type TerminalRestoreWindowCallback = IO () noTerminalRestoreWindowCallback :: Maybe TerminalRestoreWindowCallback noTerminalRestoreWindowCallback = Nothing type TerminalRestoreWindowCallbackC = Ptr () -> -- object Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalRestoreWindowCallback :: TerminalRestoreWindowCallbackC -> IO (FunPtr TerminalRestoreWindowCallbackC) terminalRestoreWindowClosure :: TerminalRestoreWindowCallback -> IO Closure terminalRestoreWindowClosure cb = newCClosure =<< mkTerminalRestoreWindowCallback wrapped where wrapped = terminalRestoreWindowCallbackWrapper cb terminalRestoreWindowCallbackWrapper :: TerminalRestoreWindowCallback -> Ptr () -> Ptr () -> IO () terminalRestoreWindowCallbackWrapper _cb _ _ = do _cb onTerminalRestoreWindow :: (GObject a, MonadIO m) => a -> TerminalRestoreWindowCallback -> m SignalHandlerId onTerminalRestoreWindow obj cb = liftIO $ connectTerminalRestoreWindow obj cb SignalConnectBefore afterTerminalRestoreWindow :: (GObject a, MonadIO m) => a -> TerminalRestoreWindowCallback -> m SignalHandlerId afterTerminalRestoreWindow obj cb = connectTerminalRestoreWindow obj cb SignalConnectAfter connectTerminalRestoreWindow :: (GObject a, MonadIO m) => a -> TerminalRestoreWindowCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalRestoreWindow obj cb after = liftIO $ do cb' <- mkTerminalRestoreWindowCallback (terminalRestoreWindowCallbackWrapper cb) connectSignalFunPtr obj "restore-window" cb' after -- signal Terminal::selection-changed type TerminalSelectionChangedCallback = IO () noTerminalSelectionChangedCallback :: Maybe TerminalSelectionChangedCallback noTerminalSelectionChangedCallback = Nothing type TerminalSelectionChangedCallbackC = Ptr () -> -- object Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalSelectionChangedCallback :: TerminalSelectionChangedCallbackC -> IO (FunPtr TerminalSelectionChangedCallbackC) terminalSelectionChangedClosure :: TerminalSelectionChangedCallback -> IO Closure terminalSelectionChangedClosure cb = newCClosure =<< mkTerminalSelectionChangedCallback wrapped where wrapped = terminalSelectionChangedCallbackWrapper cb terminalSelectionChangedCallbackWrapper :: TerminalSelectionChangedCallback -> Ptr () -> Ptr () -> IO () terminalSelectionChangedCallbackWrapper _cb _ _ = do _cb onTerminalSelectionChanged :: (GObject a, MonadIO m) => a -> TerminalSelectionChangedCallback -> m SignalHandlerId onTerminalSelectionChanged obj cb = liftIO $ connectTerminalSelectionChanged obj cb SignalConnectBefore afterTerminalSelectionChanged :: (GObject a, MonadIO m) => a -> TerminalSelectionChangedCallback -> m SignalHandlerId afterTerminalSelectionChanged obj cb = connectTerminalSelectionChanged obj cb SignalConnectAfter connectTerminalSelectionChanged :: (GObject a, MonadIO m) => a -> TerminalSelectionChangedCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalSelectionChanged obj cb after = liftIO $ do cb' <- mkTerminalSelectionChangedCallback (terminalSelectionChangedCallbackWrapper cb) connectSignalFunPtr obj "selection-changed" cb' after -- signal Terminal::text-deleted type TerminalTextDeletedCallback = IO () noTerminalTextDeletedCallback :: Maybe TerminalTextDeletedCallback noTerminalTextDeletedCallback = Nothing type TerminalTextDeletedCallbackC = Ptr () -> -- object Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalTextDeletedCallback :: TerminalTextDeletedCallbackC -> IO (FunPtr TerminalTextDeletedCallbackC) terminalTextDeletedClosure :: TerminalTextDeletedCallback -> IO Closure terminalTextDeletedClosure cb = newCClosure =<< mkTerminalTextDeletedCallback wrapped where wrapped = terminalTextDeletedCallbackWrapper cb terminalTextDeletedCallbackWrapper :: TerminalTextDeletedCallback -> Ptr () -> Ptr () -> IO () terminalTextDeletedCallbackWrapper _cb _ _ = do _cb onTerminalTextDeleted :: (GObject a, MonadIO m) => a -> TerminalTextDeletedCallback -> m SignalHandlerId onTerminalTextDeleted obj cb = liftIO $ connectTerminalTextDeleted obj cb SignalConnectBefore afterTerminalTextDeleted :: (GObject a, MonadIO m) => a -> TerminalTextDeletedCallback -> m SignalHandlerId afterTerminalTextDeleted obj cb = connectTerminalTextDeleted obj cb SignalConnectAfter connectTerminalTextDeleted :: (GObject a, MonadIO m) => a -> TerminalTextDeletedCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalTextDeleted obj cb after = liftIO $ do cb' <- mkTerminalTextDeletedCallback (terminalTextDeletedCallbackWrapper cb) connectSignalFunPtr obj "text-deleted" cb' after -- signal Terminal::text-inserted type TerminalTextInsertedCallback = IO () noTerminalTextInsertedCallback :: Maybe TerminalTextInsertedCallback noTerminalTextInsertedCallback = Nothing type TerminalTextInsertedCallbackC = Ptr () -> -- object Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalTextInsertedCallback :: TerminalTextInsertedCallbackC -> IO (FunPtr TerminalTextInsertedCallbackC) terminalTextInsertedClosure :: TerminalTextInsertedCallback -> IO Closure terminalTextInsertedClosure cb = newCClosure =<< mkTerminalTextInsertedCallback wrapped where wrapped = terminalTextInsertedCallbackWrapper cb terminalTextInsertedCallbackWrapper :: TerminalTextInsertedCallback -> Ptr () -> Ptr () -> IO () terminalTextInsertedCallbackWrapper _cb _ _ = do _cb onTerminalTextInserted :: (GObject a, MonadIO m) => a -> TerminalTextInsertedCallback -> m SignalHandlerId onTerminalTextInserted obj cb = liftIO $ connectTerminalTextInserted obj cb SignalConnectBefore afterTerminalTextInserted :: (GObject a, MonadIO m) => a -> TerminalTextInsertedCallback -> m SignalHandlerId afterTerminalTextInserted obj cb = connectTerminalTextInserted obj cb SignalConnectAfter connectTerminalTextInserted :: (GObject a, MonadIO m) => a -> TerminalTextInsertedCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalTextInserted obj cb after = liftIO $ do cb' <- mkTerminalTextInsertedCallback (terminalTextInsertedCallbackWrapper cb) connectSignalFunPtr obj "text-inserted" cb' after -- signal Terminal::text-modified type TerminalTextModifiedCallback = IO () noTerminalTextModifiedCallback :: Maybe TerminalTextModifiedCallback noTerminalTextModifiedCallback = Nothing type TerminalTextModifiedCallbackC = Ptr () -> -- object Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalTextModifiedCallback :: TerminalTextModifiedCallbackC -> IO (FunPtr TerminalTextModifiedCallbackC) terminalTextModifiedClosure :: TerminalTextModifiedCallback -> IO Closure terminalTextModifiedClosure cb = newCClosure =<< mkTerminalTextModifiedCallback wrapped where wrapped = terminalTextModifiedCallbackWrapper cb terminalTextModifiedCallbackWrapper :: TerminalTextModifiedCallback -> Ptr () -> Ptr () -> IO () terminalTextModifiedCallbackWrapper _cb _ _ = do _cb onTerminalTextModified :: (GObject a, MonadIO m) => a -> TerminalTextModifiedCallback -> m SignalHandlerId onTerminalTextModified obj cb = liftIO $ connectTerminalTextModified obj cb SignalConnectBefore afterTerminalTextModified :: (GObject a, MonadIO m) => a -> TerminalTextModifiedCallback -> m SignalHandlerId afterTerminalTextModified obj cb = connectTerminalTextModified obj cb SignalConnectAfter connectTerminalTextModified :: (GObject a, MonadIO m) => a -> TerminalTextModifiedCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalTextModified obj cb after = liftIO $ do cb' <- mkTerminalTextModifiedCallback (terminalTextModifiedCallbackWrapper cb) connectSignalFunPtr obj "text-modified" cb' after -- signal Terminal::text-scrolled type TerminalTextScrolledCallback = Int32 -> IO () noTerminalTextScrolledCallback :: Maybe TerminalTextScrolledCallback noTerminalTextScrolledCallback = Nothing type TerminalTextScrolledCallbackC = Ptr () -> -- object Int32 -> Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalTextScrolledCallback :: TerminalTextScrolledCallbackC -> IO (FunPtr TerminalTextScrolledCallbackC) terminalTextScrolledClosure :: TerminalTextScrolledCallback -> IO Closure terminalTextScrolledClosure cb = newCClosure =<< mkTerminalTextScrolledCallback wrapped where wrapped = terminalTextScrolledCallbackWrapper cb terminalTextScrolledCallbackWrapper :: TerminalTextScrolledCallback -> Ptr () -> Int32 -> Ptr () -> IO () terminalTextScrolledCallbackWrapper _cb _ delta _ = do _cb delta onTerminalTextScrolled :: (GObject a, MonadIO m) => a -> TerminalTextScrolledCallback -> m SignalHandlerId onTerminalTextScrolled obj cb = liftIO $ connectTerminalTextScrolled obj cb SignalConnectBefore afterTerminalTextScrolled :: (GObject a, MonadIO m) => a -> TerminalTextScrolledCallback -> m SignalHandlerId afterTerminalTextScrolled obj cb = connectTerminalTextScrolled obj cb SignalConnectAfter connectTerminalTextScrolled :: (GObject a, MonadIO m) => a -> TerminalTextScrolledCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalTextScrolled obj cb after = liftIO $ do cb' <- mkTerminalTextScrolledCallback (terminalTextScrolledCallbackWrapper cb) connectSignalFunPtr obj "text-scrolled" cb' after -- signal Terminal::window-title-changed type TerminalWindowTitleChangedCallback = IO () noTerminalWindowTitleChangedCallback :: Maybe TerminalWindowTitleChangedCallback noTerminalWindowTitleChangedCallback = Nothing type TerminalWindowTitleChangedCallbackC = Ptr () -> -- object Ptr () -> -- user_data IO () foreign import ccall "wrapper" mkTerminalWindowTitleChangedCallback :: TerminalWindowTitleChangedCallbackC -> IO (FunPtr TerminalWindowTitleChangedCallbackC) terminalWindowTitleChangedClosure :: TerminalWindowTitleChangedCallback -> IO Closure terminalWindowTitleChangedClosure cb = newCClosure =<< mkTerminalWindowTitleChangedCallback wrapped where wrapped = terminalWindowTitleChangedCallbackWrapper cb terminalWindowTitleChangedCallbackWrapper :: TerminalWindowTitleChangedCallback -> Ptr () -> Ptr () -> IO () terminalWindowTitleChangedCallbackWrapper _cb _ _ = do _cb onTerminalWindowTitleChanged :: (GObject a, MonadIO m) => a -> TerminalWindowTitleChangedCallback -> m SignalHandlerId onTerminalWindowTitleChanged obj cb = liftIO $ connectTerminalWindowTitleChanged obj cb SignalConnectBefore afterTerminalWindowTitleChanged :: (GObject a, MonadIO m) => a -> TerminalWindowTitleChangedCallback -> m SignalHandlerId afterTerminalWindowTitleChanged obj cb = connectTerminalWindowTitleChanged obj cb SignalConnectAfter connectTerminalWindowTitleChanged :: (GObject a, MonadIO m) => a -> TerminalWindowTitleChangedCallback -> SignalConnectMode -> m SignalHandlerId connectTerminalWindowTitleChanged obj cb after = liftIO $ do cb' <- mkTerminalWindowTitleChangedCallback (terminalWindowTitleChangedCallbackWrapper cb) connectSignalFunPtr obj "window-title-changed" cb' after -- VVV Prop "allow-bold" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] -- Nullable: (Just False,Just False) getTerminalAllowBold :: (MonadIO m, TerminalK o) => o -> m Bool getTerminalAllowBold obj = liftIO $ getObjectPropertyBool obj "allow-bold" setTerminalAllowBold :: (MonadIO m, TerminalK o) => o -> Bool -> m () setTerminalAllowBold obj val = liftIO $ setObjectPropertyBool obj "allow-bold" val constructTerminalAllowBold :: Bool -> IO ([Char], GValue) constructTerminalAllowBold val = constructObjectPropertyBool "allow-bold" val data TerminalAllowBoldPropertyInfo instance AttrInfo TerminalAllowBoldPropertyInfo where type AttrAllowedOps TerminalAllowBoldPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint TerminalAllowBoldPropertyInfo = (~) Bool type AttrBaseTypeConstraint TerminalAllowBoldPropertyInfo = TerminalK type AttrGetType TerminalAllowBoldPropertyInfo = Bool type AttrLabel TerminalAllowBoldPropertyInfo = "allow-bold" attrGet _ = getTerminalAllowBold attrSet _ = setTerminalAllowBold attrConstruct _ = constructTerminalAllowBold attrClear _ = undefined -- VVV Prop "audible-bell" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] -- Nullable: (Just False,Just False) getTerminalAudibleBell :: (MonadIO m, TerminalK o) => o -> m Bool getTerminalAudibleBell obj = liftIO $ getObjectPropertyBool obj "audible-bell" setTerminalAudibleBell :: (MonadIO m, TerminalK o) => o -> Bool -> m () setTerminalAudibleBell obj val = liftIO $ setObjectPropertyBool obj "audible-bell" val constructTerminalAudibleBell :: Bool -> IO ([Char], GValue) constructTerminalAudibleBell val = constructObjectPropertyBool "audible-bell" val data TerminalAudibleBellPropertyInfo instance AttrInfo TerminalAudibleBellPropertyInfo where type AttrAllowedOps TerminalAudibleBellPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint TerminalAudibleBellPropertyInfo = (~) Bool type AttrBaseTypeConstraint TerminalAudibleBellPropertyInfo = TerminalK type AttrGetType TerminalAudibleBellPropertyInfo = Bool type AttrLabel TerminalAudibleBellPropertyInfo = "audible-bell" attrGet _ = getTerminalAudibleBell attrSet _ = setTerminalAudibleBell attrConstruct _ = constructTerminalAudibleBell attrClear _ = undefined -- VVV Prop "backspace-binding" -- Type: TInterface "Vte" "EraseBinding" -- Flags: [PropertyReadable,PropertyWritable] -- Nullable: (Nothing,Just False) getTerminalBackspaceBinding :: (MonadIO m, TerminalK o) => o -> m EraseBinding getTerminalBackspaceBinding obj = liftIO $ getObjectPropertyEnum obj "backspace-binding" setTerminalBackspaceBinding :: (MonadIO m, TerminalK o) => o -> EraseBinding -> m () setTerminalBackspaceBinding obj val = liftIO $ setObjectPropertyEnum obj "backspace-binding" val constructTerminalBackspaceBinding :: EraseBinding -> IO ([Char], GValue) constructTerminalBackspaceBinding val = constructObjectPropertyEnum "backspace-binding" val data TerminalBackspaceBindingPropertyInfo instance AttrInfo TerminalBackspaceBindingPropertyInfo where type AttrAllowedOps TerminalBackspaceBindingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint TerminalBackspaceBindingPropertyInfo = (~) EraseBinding type AttrBaseTypeConstraint TerminalBackspaceBindingPropertyInfo = TerminalK type AttrGetType TerminalBackspaceBindingPropertyInfo = EraseBinding type AttrLabel TerminalBackspaceBindingPropertyInfo = "backspace-binding" attrGet _ = getTerminalBackspaceBinding attrSet _ = setTerminalBackspaceBinding attrConstruct _ = constructTerminalBackspaceBinding attrClear _ = undefined -- VVV Prop "cjk-ambiguous-width" -- Type: TBasicType TInt -- Flags: [PropertyReadable,PropertyWritable] -- Nullable: (Just False,Just False) getTerminalCjkAmbiguousWidth :: (MonadIO m, TerminalK o) => o -> m Int32 getTerminalCjkAmbiguousWidth obj = liftIO $ getObjectPropertyInt32 obj "cjk-ambiguous-width" setTerminalCjkAmbiguousWidth :: (MonadIO m, TerminalK o) => o -> Int32 -> m () setTerminalCjkAmbiguousWidth obj val = liftIO $ setObjectPropertyInt32 obj "cjk-ambiguous-width" val constructTerminalCjkAmbiguousWidth :: Int32 -> IO ([Char], GValue) constructTerminalCjkAmbiguousWidth val = constructObjectPropertyInt32 "cjk-ambiguous-width" val data TerminalCjkAmbiguousWidthPropertyInfo instance AttrInfo TerminalCjkAmbiguousWidthPropertyInfo where type AttrAllowedOps TerminalCjkAmbiguousWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint TerminalCjkAmbiguousWidthPropertyInfo = (~) Int32 type AttrBaseTypeConstraint TerminalCjkAmbiguousWidthPropertyInfo = TerminalK type AttrGetType TerminalCjkAmbiguousWidthPropertyInfo = Int32 type AttrLabel TerminalCjkAmbiguousWidthPropertyInfo = "cjk-ambiguous-width" attrGet _ = getTerminalCjkAmbiguousWidth attrSet _ = setTerminalCjkAmbiguousWidth attrConstruct _ = constructTerminalCjkAmbiguousWidth attrClear _ = undefined -- VVV Prop "current-directory-uri" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] -- Nullable: (Just False,Nothing) getTerminalCurrentDirectoryUri :: (MonadIO m, TerminalK o) => o -> m T.Text getTerminalCurrentDirectoryUri obj = liftIO $ checkUnexpectedNothing "getTerminalCurrentDirectoryUri" $ getObjectPropertyString obj "current-directory-uri" data TerminalCurrentDirectoryUriPropertyInfo instance AttrInfo TerminalCurrentDirectoryUriPropertyInfo where type AttrAllowedOps TerminalCurrentDirectoryUriPropertyInfo = '[ 'AttrGet, 'AttrClear] type AttrSetTypeConstraint TerminalCurrentDirectoryUriPropertyInfo = (~) () type AttrBaseTypeConstraint TerminalCurrentDirectoryUriPropertyInfo = TerminalK type AttrGetType TerminalCurrentDirectoryUriPropertyInfo = T.Text type AttrLabel TerminalCurrentDirectoryUriPropertyInfo = "current-directory-uri" attrGet _ = getTerminalCurrentDirectoryUri attrSet _ = undefined attrConstruct _ = undefined attrClear _ = undefined -- VVV Prop "current-file-uri" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] -- Nullable: (Just False,Nothing) getTerminalCurrentFileUri :: (MonadIO m, TerminalK o) => o -> m T.Text getTerminalCurrentFileUri obj = liftIO $ checkUnexpectedNothing "getTerminalCurrentFileUri" $ getObjectPropertyString obj "current-file-uri" data TerminalCurrentFileUriPropertyInfo instance AttrInfo TerminalCurrentFileUriPropertyInfo where type AttrAllowedOps TerminalCurrentFileUriPropertyInfo = '[ 'AttrGet, 'AttrClear] type AttrSetTypeConstraint TerminalCurrentFileUriPropertyInfo = (~) () type AttrBaseTypeConstraint TerminalCurrentFileUriPropertyInfo = TerminalK type AttrGetType TerminalCurrentFileUriPropertyInfo = T.Text type AttrLabel TerminalCurrentFileUriPropertyInfo = "current-file-uri" attrGet _ = getTerminalCurrentFileUri attrSet _ = undefined attrConstruct _ = undefined attrClear _ = undefined -- VVV Prop "cursor-blink-mode" -- Type: TInterface "Vte" "CursorBlinkMode" -- Flags: [PropertyReadable,PropertyWritable] -- Nullable: (Just False,Just False) getTerminalCursorBlinkMode :: (MonadIO m, TerminalK o) => o -> m CursorBlinkMode getTerminalCursorBlinkMode obj = liftIO $ getObjectPropertyEnum obj "cursor-blink-mode" setTerminalCursorBlinkMode :: (MonadIO m, TerminalK o) => o -> CursorBlinkMode -> m () setTerminalCursorBlinkMode obj val = liftIO $ setObjectPropertyEnum obj "cursor-blink-mode" val constructTerminalCursorBlinkMode :: CursorBlinkMode -> IO ([Char], GValue) constructTerminalCursorBlinkMode val = constructObjectPropertyEnum "cursor-blink-mode" val data TerminalCursorBlinkModePropertyInfo instance AttrInfo TerminalCursorBlinkModePropertyInfo where type AttrAllowedOps TerminalCursorBlinkModePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint TerminalCursorBlinkModePropertyInfo = (~) CursorBlinkMode type AttrBaseTypeConstraint TerminalCursorBlinkModePropertyInfo = TerminalK type AttrGetType TerminalCursorBlinkModePropertyInfo = CursorBlinkMode type AttrLabel TerminalCursorBlinkModePropertyInfo = "cursor-blink-mode" attrGet _ = getTerminalCursorBlinkMode attrSet _ = setTerminalCursorBlinkMode attrConstruct _ = constructTerminalCursorBlinkMode attrClear _ = undefined -- VVV Prop "cursor-shape" -- Type: TInterface "Vte" "CursorShape" -- Flags: [PropertyReadable,PropertyWritable] -- Nullable: (Just False,Just False) getTerminalCursorShape :: (MonadIO m, TerminalK o) => o -> m CursorShape getTerminalCursorShape obj = liftIO $ getObjectPropertyEnum obj "cursor-shape" setTerminalCursorShape :: (MonadIO m, TerminalK o) => o -> CursorShape -> m () setTerminalCursorShape obj val = liftIO $ setObjectPropertyEnum obj "cursor-shape" val constructTerminalCursorShape :: CursorShape -> IO ([Char], GValue) constructTerminalCursorShape val = constructObjectPropertyEnum "cursor-shape" val data TerminalCursorShapePropertyInfo instance AttrInfo TerminalCursorShapePropertyInfo where type AttrAllowedOps TerminalCursorShapePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint TerminalCursorShapePropertyInfo = (~) CursorShape type AttrBaseTypeConstraint TerminalCursorShapePropertyInfo = TerminalK type AttrGetType TerminalCursorShapePropertyInfo = CursorShape type AttrLabel TerminalCursorShapePropertyInfo = "cursor-shape" attrGet _ = getTerminalCursorShape attrSet _ = setTerminalCursorShape attrConstruct _ = constructTerminalCursorShape attrClear _ = undefined -- VVV Prop "delete-binding" -- Type: TInterface "Vte" "EraseBinding" -- Flags: [PropertyReadable,PropertyWritable] -- Nullable: (Nothing,Just False) getTerminalDeleteBinding :: (MonadIO m, TerminalK o) => o -> m EraseBinding getTerminalDeleteBinding obj = liftIO $ getObjectPropertyEnum obj "delete-binding" setTerminalDeleteBinding :: (MonadIO m, TerminalK o) => o -> EraseBinding -> m () setTerminalDeleteBinding obj val = liftIO $ setObjectPropertyEnum obj "delete-binding" val constructTerminalDeleteBinding :: EraseBinding -> IO ([Char], GValue) constructTerminalDeleteBinding val = constructObjectPropertyEnum "delete-binding" val data TerminalDeleteBindingPropertyInfo instance AttrInfo TerminalDeleteBindingPropertyInfo where type AttrAllowedOps TerminalDeleteBindingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint TerminalDeleteBindingPropertyInfo = (~) EraseBinding type AttrBaseTypeConstraint TerminalDeleteBindingPropertyInfo = TerminalK type AttrGetType TerminalDeleteBindingPropertyInfo = EraseBinding type AttrLabel TerminalDeleteBindingPropertyInfo = "delete-binding" attrGet _ = getTerminalDeleteBinding attrSet _ = setTerminalDeleteBinding attrConstruct _ = constructTerminalDeleteBinding attrClear _ = undefined -- VVV Prop "encoding" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] -- Nullable: (Just False,Nothing) getTerminalEncoding :: (MonadIO m, TerminalK o) => o -> m T.Text getTerminalEncoding obj = liftIO $ checkUnexpectedNothing "getTerminalEncoding" $ getObjectPropertyString obj "encoding" setTerminalEncoding :: (MonadIO m, TerminalK o) => o -> T.Text -> m () setTerminalEncoding obj val = liftIO $ setObjectPropertyString obj "encoding" (Just val) constructTerminalEncoding :: T.Text -> IO ([Char], GValue) constructTerminalEncoding val = constructObjectPropertyString "encoding" (Just val) clearTerminalEncoding :: (MonadIO m, TerminalK o) => o -> m () clearTerminalEncoding obj = liftIO $ setObjectPropertyString obj "encoding" (Nothing :: Maybe T.Text) data TerminalEncodingPropertyInfo instance AttrInfo TerminalEncodingPropertyInfo where type AttrAllowedOps TerminalEncodingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear] type AttrSetTypeConstraint TerminalEncodingPropertyInfo = (~) T.Text type AttrBaseTypeConstraint TerminalEncodingPropertyInfo = TerminalK type AttrGetType TerminalEncodingPropertyInfo = T.Text type AttrLabel TerminalEncodingPropertyInfo = "encoding" attrGet _ = getTerminalEncoding attrSet _ = setTerminalEncoding attrConstruct _ = constructTerminalEncoding attrClear _ = clearTerminalEncoding -- VVV Prop "font-desc" -- Type: TInterface "Pango" "FontDescription" -- Flags: [PropertyReadable,PropertyWritable] -- Nullable: (Nothing,Nothing) getTerminalFontDesc :: (MonadIO m, TerminalK o) => o -> m (Maybe Pango.FontDescription) getTerminalFontDesc obj = liftIO $ getObjectPropertyBoxed obj "font-desc" Pango.FontDescription setTerminalFontDesc :: (MonadIO m, TerminalK o) => o -> Pango.FontDescription -> m () setTerminalFontDesc obj val = liftIO $ setObjectPropertyBoxed obj "font-desc" (Just val) constructTerminalFontDesc :: Pango.FontDescription -> IO ([Char], GValue) constructTerminalFontDesc val = constructObjectPropertyBoxed "font-desc" (Just val) clearTerminalFontDesc :: (MonadIO m, TerminalK o) => o -> m () clearTerminalFontDesc obj = liftIO $ setObjectPropertyBoxed obj "font-desc" (Nothing :: Maybe Pango.FontDescription) data TerminalFontDescPropertyInfo instance AttrInfo TerminalFontDescPropertyInfo where type AttrAllowedOps TerminalFontDescPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear] type AttrSetTypeConstraint TerminalFontDescPropertyInfo = (~) Pango.FontDescription type AttrBaseTypeConstraint TerminalFontDescPropertyInfo = TerminalK type AttrGetType TerminalFontDescPropertyInfo = (Maybe Pango.FontDescription) type AttrLabel TerminalFontDescPropertyInfo = "font-desc" attrGet _ = getTerminalFontDesc attrSet _ = setTerminalFontDesc attrConstruct _ = constructTerminalFontDesc attrClear _ = clearTerminalFontDesc -- VVV Prop "font-scale" -- Type: TBasicType TDouble -- Flags: [PropertyReadable,PropertyWritable] -- Nullable: (Just False,Just False) getTerminalFontScale :: (MonadIO m, TerminalK o) => o -> m Double getTerminalFontScale obj = liftIO $ getObjectPropertyDouble obj "font-scale" setTerminalFontScale :: (MonadIO m, TerminalK o) => o -> Double -> m () setTerminalFontScale obj val = liftIO $ setObjectPropertyDouble obj "font-scale" val constructTerminalFontScale :: Double -> IO ([Char], GValue) constructTerminalFontScale val = constructObjectPropertyDouble "font-scale" val data TerminalFontScalePropertyInfo instance AttrInfo TerminalFontScalePropertyInfo where type AttrAllowedOps TerminalFontScalePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint TerminalFontScalePropertyInfo = (~) Double type AttrBaseTypeConstraint TerminalFontScalePropertyInfo = TerminalK type AttrGetType TerminalFontScalePropertyInfo = Double type AttrLabel TerminalFontScalePropertyInfo = "font-scale" attrGet _ = getTerminalFontScale attrSet _ = setTerminalFontScale attrConstruct _ = constructTerminalFontScale attrClear _ = undefined -- VVV Prop "icon-title" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] -- Nullable: (Just False,Nothing) getTerminalIconTitle :: (MonadIO m, TerminalK o) => o -> m T.Text getTerminalIconTitle obj = liftIO $ checkUnexpectedNothing "getTerminalIconTitle" $ getObjectPropertyString obj "icon-title" data TerminalIconTitlePropertyInfo instance AttrInfo TerminalIconTitlePropertyInfo where type AttrAllowedOps TerminalIconTitlePropertyInfo = '[ 'AttrGet, 'AttrClear] type AttrSetTypeConstraint TerminalIconTitlePropertyInfo = (~) () type AttrBaseTypeConstraint TerminalIconTitlePropertyInfo = TerminalK type AttrGetType TerminalIconTitlePropertyInfo = T.Text type AttrLabel TerminalIconTitlePropertyInfo = "icon-title" attrGet _ = getTerminalIconTitle attrSet _ = undefined attrConstruct _ = undefined attrClear _ = undefined -- VVV Prop "input-enabled" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] -- Nullable: (Just False,Just False) getTerminalInputEnabled :: (MonadIO m, TerminalK o) => o -> m Bool getTerminalInputEnabled obj = liftIO $ getObjectPropertyBool obj "input-enabled" setTerminalInputEnabled :: (MonadIO m, TerminalK o) => o -> Bool -> m () setTerminalInputEnabled obj val = liftIO $ setObjectPropertyBool obj "input-enabled" val constructTerminalInputEnabled :: Bool -> IO ([Char], GValue) constructTerminalInputEnabled val = constructObjectPropertyBool "input-enabled" val data TerminalInputEnabledPropertyInfo instance AttrInfo TerminalInputEnabledPropertyInfo where type AttrAllowedOps TerminalInputEnabledPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint TerminalInputEnabledPropertyInfo = (~) Bool type AttrBaseTypeConstraint TerminalInputEnabledPropertyInfo = TerminalK type AttrGetType TerminalInputEnabledPropertyInfo = Bool type AttrLabel TerminalInputEnabledPropertyInfo = "input-enabled" attrGet _ = getTerminalInputEnabled attrSet _ = setTerminalInputEnabled attrConstruct _ = constructTerminalInputEnabled attrClear _ = undefined -- VVV Prop "pointer-autohide" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] -- Nullable: (Nothing,Nothing) getTerminalPointerAutohide :: (MonadIO m, TerminalK o) => o -> m Bool getTerminalPointerAutohide obj = liftIO $ getObjectPropertyBool obj "pointer-autohide" setTerminalPointerAutohide :: (MonadIO m, TerminalK o) => o -> Bool -> m () setTerminalPointerAutohide obj val = liftIO $ setObjectPropertyBool obj "pointer-autohide" val constructTerminalPointerAutohide :: Bool -> IO ([Char], GValue) constructTerminalPointerAutohide val = constructObjectPropertyBool "pointer-autohide" val data TerminalPointerAutohidePropertyInfo instance AttrInfo TerminalPointerAutohidePropertyInfo where type AttrAllowedOps TerminalPointerAutohidePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint TerminalPointerAutohidePropertyInfo = (~) Bool type AttrBaseTypeConstraint TerminalPointerAutohidePropertyInfo = TerminalK type AttrGetType TerminalPointerAutohidePropertyInfo = Bool type AttrLabel TerminalPointerAutohidePropertyInfo = "pointer-autohide" attrGet _ = getTerminalPointerAutohide attrSet _ = setTerminalPointerAutohide attrConstruct _ = constructTerminalPointerAutohide attrClear _ = undefined -- VVV Prop "pty" -- Type: TInterface "Vte" "Pty" -- Flags: [PropertyReadable,PropertyWritable] -- Nullable: (Just False,Just True) getTerminalPty :: (MonadIO m, TerminalK o) => o -> m Pty getTerminalPty obj = liftIO $ checkUnexpectedNothing "getTerminalPty" $ getObjectPropertyObject obj "pty" Pty setTerminalPty :: (MonadIO m, TerminalK o, PtyK a) => o -> a -> m () setTerminalPty obj val = liftIO $ setObjectPropertyObject obj "pty" (Just val) constructTerminalPty :: (PtyK a) => a -> IO ([Char], GValue) constructTerminalPty val = constructObjectPropertyObject "pty" (Just val) clearTerminalPty :: (MonadIO m, TerminalK o) => o -> m () clearTerminalPty obj = liftIO $ setObjectPropertyObject obj "pty" (Nothing :: Maybe Pty) data TerminalPtyPropertyInfo instance AttrInfo TerminalPtyPropertyInfo where type AttrAllowedOps TerminalPtyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear] type AttrSetTypeConstraint TerminalPtyPropertyInfo = PtyK type AttrBaseTypeConstraint TerminalPtyPropertyInfo = TerminalK type AttrGetType TerminalPtyPropertyInfo = Pty type AttrLabel TerminalPtyPropertyInfo = "pty" attrGet _ = getTerminalPty attrSet _ = setTerminalPty attrConstruct _ = constructTerminalPty attrClear _ = clearTerminalPty -- VVV Prop "rewrap-on-resize" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] -- Nullable: (Just False,Just False) getTerminalRewrapOnResize :: (MonadIO m, TerminalK o) => o -> m Bool getTerminalRewrapOnResize obj = liftIO $ getObjectPropertyBool obj "rewrap-on-resize" setTerminalRewrapOnResize :: (MonadIO m, TerminalK o) => o -> Bool -> m () setTerminalRewrapOnResize obj val = liftIO $ setObjectPropertyBool obj "rewrap-on-resize" val constructTerminalRewrapOnResize :: Bool -> IO ([Char], GValue) constructTerminalRewrapOnResize val = constructObjectPropertyBool "rewrap-on-resize" val data TerminalRewrapOnResizePropertyInfo instance AttrInfo TerminalRewrapOnResizePropertyInfo where type AttrAllowedOps TerminalRewrapOnResizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint TerminalRewrapOnResizePropertyInfo = (~) Bool type AttrBaseTypeConstraint TerminalRewrapOnResizePropertyInfo = TerminalK type AttrGetType TerminalRewrapOnResizePropertyInfo = Bool type AttrLabel TerminalRewrapOnResizePropertyInfo = "rewrap-on-resize" attrGet _ = getTerminalRewrapOnResize attrSet _ = setTerminalRewrapOnResize attrConstruct _ = constructTerminalRewrapOnResize attrClear _ = undefined -- VVV Prop "scroll-on-keystroke" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] -- Nullable: (Nothing,Just False) getTerminalScrollOnKeystroke :: (MonadIO m, TerminalK o) => o -> m Bool getTerminalScrollOnKeystroke obj = liftIO $ getObjectPropertyBool obj "scroll-on-keystroke" setTerminalScrollOnKeystroke :: (MonadIO m, TerminalK o) => o -> Bool -> m () setTerminalScrollOnKeystroke obj val = liftIO $ setObjectPropertyBool obj "scroll-on-keystroke" val constructTerminalScrollOnKeystroke :: Bool -> IO ([Char], GValue) constructTerminalScrollOnKeystroke val = constructObjectPropertyBool "scroll-on-keystroke" val data TerminalScrollOnKeystrokePropertyInfo instance AttrInfo TerminalScrollOnKeystrokePropertyInfo where type AttrAllowedOps TerminalScrollOnKeystrokePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint TerminalScrollOnKeystrokePropertyInfo = (~) Bool type AttrBaseTypeConstraint TerminalScrollOnKeystrokePropertyInfo = TerminalK type AttrGetType TerminalScrollOnKeystrokePropertyInfo = Bool type AttrLabel TerminalScrollOnKeystrokePropertyInfo = "scroll-on-keystroke" attrGet _ = getTerminalScrollOnKeystroke attrSet _ = setTerminalScrollOnKeystroke attrConstruct _ = constructTerminalScrollOnKeystroke attrClear _ = undefined -- VVV Prop "scroll-on-output" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] -- Nullable: (Nothing,Just False) getTerminalScrollOnOutput :: (MonadIO m, TerminalK o) => o -> m Bool getTerminalScrollOnOutput obj = liftIO $ getObjectPropertyBool obj "scroll-on-output" setTerminalScrollOnOutput :: (MonadIO m, TerminalK o) => o -> Bool -> m () setTerminalScrollOnOutput obj val = liftIO $ setObjectPropertyBool obj "scroll-on-output" val constructTerminalScrollOnOutput :: Bool -> IO ([Char], GValue) constructTerminalScrollOnOutput val = constructObjectPropertyBool "scroll-on-output" val data TerminalScrollOnOutputPropertyInfo instance AttrInfo TerminalScrollOnOutputPropertyInfo where type AttrAllowedOps TerminalScrollOnOutputPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint TerminalScrollOnOutputPropertyInfo = (~) Bool type AttrBaseTypeConstraint TerminalScrollOnOutputPropertyInfo = TerminalK type AttrGetType TerminalScrollOnOutputPropertyInfo = Bool type AttrLabel TerminalScrollOnOutputPropertyInfo = "scroll-on-output" attrGet _ = getTerminalScrollOnOutput attrSet _ = setTerminalScrollOnOutput attrConstruct _ = constructTerminalScrollOnOutput attrClear _ = undefined -- VVV Prop "scrollback-lines" -- Type: TBasicType TUInt -- Flags: [PropertyReadable,PropertyWritable] -- Nullable: (Nothing,Nothing) getTerminalScrollbackLines :: (MonadIO m, TerminalK o) => o -> m Word32 getTerminalScrollbackLines obj = liftIO $ getObjectPropertyUInt32 obj "scrollback-lines" setTerminalScrollbackLines :: (MonadIO m, TerminalK o) => o -> Word32 -> m () setTerminalScrollbackLines obj val = liftIO $ setObjectPropertyUInt32 obj "scrollback-lines" val constructTerminalScrollbackLines :: Word32 -> IO ([Char], GValue) constructTerminalScrollbackLines val = constructObjectPropertyUInt32 "scrollback-lines" val data TerminalScrollbackLinesPropertyInfo instance AttrInfo TerminalScrollbackLinesPropertyInfo where type AttrAllowedOps TerminalScrollbackLinesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] type AttrSetTypeConstraint TerminalScrollbackLinesPropertyInfo = (~) Word32 type AttrBaseTypeConstraint TerminalScrollbackLinesPropertyInfo = TerminalK type AttrGetType TerminalScrollbackLinesPropertyInfo = Word32 type AttrLabel TerminalScrollbackLinesPropertyInfo = "scrollback-lines" attrGet _ = getTerminalScrollbackLines attrSet _ = setTerminalScrollbackLines attrConstruct _ = constructTerminalScrollbackLines attrClear _ = undefined -- VVV Prop "window-title" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] -- Nullable: (Just False,Nothing) getTerminalWindowTitle :: (MonadIO m, TerminalK o) => o -> m T.Text getTerminalWindowTitle obj = liftIO $ checkUnexpectedNothing "getTerminalWindowTitle" $ getObjectPropertyString obj "window-title" data TerminalWindowTitlePropertyInfo instance AttrInfo TerminalWindowTitlePropertyInfo where type AttrAllowedOps TerminalWindowTitlePropertyInfo = '[ 'AttrGet, 'AttrClear] type AttrSetTypeConstraint TerminalWindowTitlePropertyInfo = (~) () type AttrBaseTypeConstraint TerminalWindowTitlePropertyInfo = TerminalK type AttrGetType TerminalWindowTitlePropertyInfo = T.Text type AttrLabel TerminalWindowTitlePropertyInfo = "window-title" attrGet _ = getTerminalWindowTitle attrSet _ = undefined attrConstruct _ = undefined attrClear _ = undefined -- VVV Prop "word-char-exceptions" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] -- Nullable: (Just False,Just False) getTerminalWordCharExceptions :: (MonadIO m, TerminalK o) => o -> m T.Text getTerminalWordCharExceptions obj = liftIO $ checkUnexpectedNothing "getTerminalWordCharExceptions" $ getObjectPropertyString obj "word-char-exceptions" data TerminalWordCharExceptionsPropertyInfo instance AttrInfo TerminalWordCharExceptionsPropertyInfo where type AttrAllowedOps TerminalWordCharExceptionsPropertyInfo = '[ 'AttrGet] type AttrSetTypeConstraint TerminalWordCharExceptionsPropertyInfo = (~) () type AttrBaseTypeConstraint TerminalWordCharExceptionsPropertyInfo = TerminalK type AttrGetType TerminalWordCharExceptionsPropertyInfo = T.Text type AttrLabel TerminalWordCharExceptionsPropertyInfo = "word-char-exceptions" attrGet _ = getTerminalWordCharExceptions attrSet _ = undefined attrConstruct _ = undefined attrClear _ = undefined type instance AttributeList Terminal = TerminalAttributeList type TerminalAttributeList = ('[ '("allowBold", TerminalAllowBoldPropertyInfo), '("appPaintable", Gtk.WidgetAppPaintablePropertyInfo), '("audibleBell", TerminalAudibleBellPropertyInfo), '("backspaceBinding", TerminalBackspaceBindingPropertyInfo), '("canDefault", Gtk.WidgetCanDefaultPropertyInfo), '("canFocus", Gtk.WidgetCanFocusPropertyInfo), '("cjkAmbiguousWidth", TerminalCjkAmbiguousWidthPropertyInfo), '("compositeChild", Gtk.WidgetCompositeChildPropertyInfo), '("currentDirectoryUri", TerminalCurrentDirectoryUriPropertyInfo), '("currentFileUri", TerminalCurrentFileUriPropertyInfo), '("cursorBlinkMode", TerminalCursorBlinkModePropertyInfo), '("cursorShape", TerminalCursorShapePropertyInfo), '("deleteBinding", TerminalDeleteBindingPropertyInfo), '("doubleBuffered", Gtk.WidgetDoubleBufferedPropertyInfo), '("encoding", TerminalEncodingPropertyInfo), '("events", Gtk.WidgetEventsPropertyInfo), '("expand", Gtk.WidgetExpandPropertyInfo), '("fontDesc", TerminalFontDescPropertyInfo), '("fontScale", TerminalFontScalePropertyInfo), '("hadjustment", Gtk.ScrollableHadjustmentPropertyInfo), '("halign", Gtk.WidgetHalignPropertyInfo), '("hasDefault", Gtk.WidgetHasDefaultPropertyInfo), '("hasFocus", Gtk.WidgetHasFocusPropertyInfo), '("hasTooltip", Gtk.WidgetHasTooltipPropertyInfo), '("heightRequest", Gtk.WidgetHeightRequestPropertyInfo), '("hexpand", Gtk.WidgetHexpandPropertyInfo), '("hexpandSet", Gtk.WidgetHexpandSetPropertyInfo), '("hscrollPolicy", Gtk.ScrollableHscrollPolicyPropertyInfo), '("iconTitle", TerminalIconTitlePropertyInfo), '("inputEnabled", TerminalInputEnabledPropertyInfo), '("isFocus", Gtk.WidgetIsFocusPropertyInfo), '("margin", Gtk.WidgetMarginPropertyInfo), '("marginBottom", Gtk.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.WidgetMarginEndPropertyInfo), '("marginLeft", Gtk.WidgetMarginLeftPropertyInfo), '("marginRight", Gtk.WidgetMarginRightPropertyInfo), '("marginStart", Gtk.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.WidgetMarginTopPropertyInfo), '("name", Gtk.WidgetNamePropertyInfo), '("noShowAll", Gtk.WidgetNoShowAllPropertyInfo), '("opacity", Gtk.WidgetOpacityPropertyInfo), '("parent", Gtk.WidgetParentPropertyInfo), '("pointerAutohide", TerminalPointerAutohidePropertyInfo), '("pty", TerminalPtyPropertyInfo), '("receivesDefault", Gtk.WidgetReceivesDefaultPropertyInfo), '("rewrapOnResize", TerminalRewrapOnResizePropertyInfo), '("scaleFactor", Gtk.WidgetScaleFactorPropertyInfo), '("scrollOnKeystroke", TerminalScrollOnKeystrokePropertyInfo), '("scrollOnOutput", TerminalScrollOnOutputPropertyInfo), '("scrollbackLines", TerminalScrollbackLinesPropertyInfo), '("sensitive", Gtk.WidgetSensitivePropertyInfo), '("style", Gtk.WidgetStylePropertyInfo), '("tooltipMarkup", Gtk.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.WidgetTooltipTextPropertyInfo), '("vadjustment", Gtk.ScrollableVadjustmentPropertyInfo), '("valign", Gtk.WidgetValignPropertyInfo), '("vexpand", Gtk.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.WidgetVexpandSetPropertyInfo), '("visible", Gtk.WidgetVisiblePropertyInfo), '("vscrollPolicy", Gtk.ScrollableVscrollPolicyPropertyInfo), '("widthRequest", Gtk.WidgetWidthRequestPropertyInfo), '("window", Gtk.WidgetWindowPropertyInfo), '("windowTitle", TerminalWindowTitlePropertyInfo), '("wordCharExceptions", TerminalWordCharExceptionsPropertyInfo)] :: [(Symbol, *)]) terminalAllowBold :: AttrLabelProxy "allowBold" terminalAllowBold = AttrLabelProxy terminalAudibleBell :: AttrLabelProxy "audibleBell" terminalAudibleBell = AttrLabelProxy terminalBackspaceBinding :: AttrLabelProxy "backspaceBinding" terminalBackspaceBinding = AttrLabelProxy terminalCjkAmbiguousWidth :: AttrLabelProxy "cjkAmbiguousWidth" terminalCjkAmbiguousWidth = AttrLabelProxy terminalCurrentDirectoryUri :: AttrLabelProxy "currentDirectoryUri" terminalCurrentDirectoryUri = AttrLabelProxy terminalCurrentFileUri :: AttrLabelProxy "currentFileUri" terminalCurrentFileUri = AttrLabelProxy terminalCursorBlinkMode :: AttrLabelProxy "cursorBlinkMode" terminalCursorBlinkMode = AttrLabelProxy terminalCursorShape :: AttrLabelProxy "cursorShape" terminalCursorShape = AttrLabelProxy terminalDeleteBinding :: AttrLabelProxy "deleteBinding" terminalDeleteBinding = AttrLabelProxy terminalEncoding :: AttrLabelProxy "encoding" terminalEncoding = AttrLabelProxy terminalFontDesc :: AttrLabelProxy "fontDesc" terminalFontDesc = AttrLabelProxy terminalFontScale :: AttrLabelProxy "fontScale" terminalFontScale = AttrLabelProxy terminalIconTitle :: AttrLabelProxy "iconTitle" terminalIconTitle = AttrLabelProxy terminalInputEnabled :: AttrLabelProxy "inputEnabled" terminalInputEnabled = AttrLabelProxy terminalPointerAutohide :: AttrLabelProxy "pointerAutohide" terminalPointerAutohide = AttrLabelProxy terminalPty :: AttrLabelProxy "pty" terminalPty = AttrLabelProxy terminalRewrapOnResize :: AttrLabelProxy "rewrapOnResize" terminalRewrapOnResize = AttrLabelProxy terminalScrollOnKeystroke :: AttrLabelProxy "scrollOnKeystroke" terminalScrollOnKeystroke = AttrLabelProxy terminalScrollOnOutput :: AttrLabelProxy "scrollOnOutput" terminalScrollOnOutput = AttrLabelProxy terminalScrollbackLines :: AttrLabelProxy "scrollbackLines" terminalScrollbackLines = AttrLabelProxy terminalWindowTitle :: AttrLabelProxy "windowTitle" terminalWindowTitle = AttrLabelProxy terminalWordCharExceptions :: AttrLabelProxy "wordCharExceptions" terminalWordCharExceptions = AttrLabelProxy data TerminalBellSignalInfo instance SignalInfo TerminalBellSignalInfo where type HaskellCallbackType TerminalBellSignalInfo = TerminalBellCallback connectSignal _ = connectTerminalBell data TerminalCharSizeChangedSignalInfo instance SignalInfo TerminalCharSizeChangedSignalInfo where type HaskellCallbackType TerminalCharSizeChangedSignalInfo = TerminalCharSizeChangedCallback connectSignal _ = connectTerminalCharSizeChanged data TerminalChildExitedSignalInfo instance SignalInfo TerminalChildExitedSignalInfo where type HaskellCallbackType TerminalChildExitedSignalInfo = TerminalChildExitedCallback connectSignal _ = connectTerminalChildExited data TerminalCommitSignalInfo instance SignalInfo TerminalCommitSignalInfo where type HaskellCallbackType TerminalCommitSignalInfo = TerminalCommitCallback connectSignal _ = connectTerminalCommit data TerminalContentsChangedSignalInfo instance SignalInfo TerminalContentsChangedSignalInfo where type HaskellCallbackType TerminalContentsChangedSignalInfo = TerminalContentsChangedCallback connectSignal _ = connectTerminalContentsChanged data TerminalCopyClipboardSignalInfo instance SignalInfo TerminalCopyClipboardSignalInfo where type HaskellCallbackType TerminalCopyClipboardSignalInfo = TerminalCopyClipboardCallback connectSignal _ = connectTerminalCopyClipboard data TerminalCurrentDirectoryUriChangedSignalInfo instance SignalInfo TerminalCurrentDirectoryUriChangedSignalInfo where type HaskellCallbackType TerminalCurrentDirectoryUriChangedSignalInfo = TerminalCurrentDirectoryUriChangedCallback connectSignal _ = connectTerminalCurrentDirectoryUriChanged data TerminalCurrentFileUriChangedSignalInfo instance SignalInfo TerminalCurrentFileUriChangedSignalInfo where type HaskellCallbackType TerminalCurrentFileUriChangedSignalInfo = TerminalCurrentFileUriChangedCallback connectSignal _ = connectTerminalCurrentFileUriChanged data TerminalCursorMovedSignalInfo instance SignalInfo TerminalCursorMovedSignalInfo where type HaskellCallbackType TerminalCursorMovedSignalInfo = TerminalCursorMovedCallback connectSignal _ = connectTerminalCursorMoved data TerminalDecreaseFontSizeSignalInfo instance SignalInfo TerminalDecreaseFontSizeSignalInfo where type HaskellCallbackType TerminalDecreaseFontSizeSignalInfo = TerminalDecreaseFontSizeCallback connectSignal _ = connectTerminalDecreaseFontSize data TerminalDeiconifyWindowSignalInfo instance SignalInfo TerminalDeiconifyWindowSignalInfo where type HaskellCallbackType TerminalDeiconifyWindowSignalInfo = TerminalDeiconifyWindowCallback connectSignal _ = connectTerminalDeiconifyWindow data TerminalEncodingChangedSignalInfo instance SignalInfo TerminalEncodingChangedSignalInfo where type HaskellCallbackType TerminalEncodingChangedSignalInfo = TerminalEncodingChangedCallback connectSignal _ = connectTerminalEncodingChanged data TerminalEofSignalInfo instance SignalInfo TerminalEofSignalInfo where type HaskellCallbackType TerminalEofSignalInfo = TerminalEofCallback connectSignal _ = connectTerminalEof data TerminalIconTitleChangedSignalInfo instance SignalInfo TerminalIconTitleChangedSignalInfo where type HaskellCallbackType TerminalIconTitleChangedSignalInfo = TerminalIconTitleChangedCallback connectSignal _ = connectTerminalIconTitleChanged data TerminalIconifyWindowSignalInfo instance SignalInfo TerminalIconifyWindowSignalInfo where type HaskellCallbackType TerminalIconifyWindowSignalInfo = TerminalIconifyWindowCallback connectSignal _ = connectTerminalIconifyWindow data TerminalIncreaseFontSizeSignalInfo instance SignalInfo TerminalIncreaseFontSizeSignalInfo where type HaskellCallbackType TerminalIncreaseFontSizeSignalInfo = TerminalIncreaseFontSizeCallback connectSignal _ = connectTerminalIncreaseFontSize data TerminalLowerWindowSignalInfo instance SignalInfo TerminalLowerWindowSignalInfo where type HaskellCallbackType TerminalLowerWindowSignalInfo = TerminalLowerWindowCallback connectSignal _ = connectTerminalLowerWindow data TerminalMaximizeWindowSignalInfo instance SignalInfo TerminalMaximizeWindowSignalInfo where type HaskellCallbackType TerminalMaximizeWindowSignalInfo = TerminalMaximizeWindowCallback connectSignal _ = connectTerminalMaximizeWindow data TerminalMoveWindowSignalInfo instance SignalInfo TerminalMoveWindowSignalInfo where type HaskellCallbackType TerminalMoveWindowSignalInfo = TerminalMoveWindowCallback connectSignal _ = connectTerminalMoveWindow data TerminalNotificationReceivedSignalInfo instance SignalInfo TerminalNotificationReceivedSignalInfo where type HaskellCallbackType TerminalNotificationReceivedSignalInfo = TerminalNotificationReceivedCallback connectSignal _ = connectTerminalNotificationReceived data TerminalPasteClipboardSignalInfo instance SignalInfo TerminalPasteClipboardSignalInfo where type HaskellCallbackType TerminalPasteClipboardSignalInfo = TerminalPasteClipboardCallback connectSignal _ = connectTerminalPasteClipboard data TerminalRaiseWindowSignalInfo instance SignalInfo TerminalRaiseWindowSignalInfo where type HaskellCallbackType TerminalRaiseWindowSignalInfo = TerminalRaiseWindowCallback connectSignal _ = connectTerminalRaiseWindow data TerminalRefreshWindowSignalInfo instance SignalInfo TerminalRefreshWindowSignalInfo where type HaskellCallbackType TerminalRefreshWindowSignalInfo = TerminalRefreshWindowCallback connectSignal _ = connectTerminalRefreshWindow data TerminalResizeWindowSignalInfo instance SignalInfo TerminalResizeWindowSignalInfo where type HaskellCallbackType TerminalResizeWindowSignalInfo = TerminalResizeWindowCallback connectSignal _ = connectTerminalResizeWindow data TerminalRestoreWindowSignalInfo instance SignalInfo TerminalRestoreWindowSignalInfo where type HaskellCallbackType TerminalRestoreWindowSignalInfo = TerminalRestoreWindowCallback connectSignal _ = connectTerminalRestoreWindow data TerminalSelectionChangedSignalInfo instance SignalInfo TerminalSelectionChangedSignalInfo where type HaskellCallbackType TerminalSelectionChangedSignalInfo = TerminalSelectionChangedCallback connectSignal _ = connectTerminalSelectionChanged data TerminalTextDeletedSignalInfo instance SignalInfo TerminalTextDeletedSignalInfo where type HaskellCallbackType TerminalTextDeletedSignalInfo = TerminalTextDeletedCallback connectSignal _ = connectTerminalTextDeleted data TerminalTextInsertedSignalInfo instance SignalInfo TerminalTextInsertedSignalInfo where type HaskellCallbackType TerminalTextInsertedSignalInfo = TerminalTextInsertedCallback connectSignal _ = connectTerminalTextInserted data TerminalTextModifiedSignalInfo instance SignalInfo TerminalTextModifiedSignalInfo where type HaskellCallbackType TerminalTextModifiedSignalInfo = TerminalTextModifiedCallback connectSignal _ = connectTerminalTextModified data TerminalTextScrolledSignalInfo instance SignalInfo TerminalTextScrolledSignalInfo where type HaskellCallbackType TerminalTextScrolledSignalInfo = TerminalTextScrolledCallback connectSignal _ = connectTerminalTextScrolled data TerminalWindowTitleChangedSignalInfo instance SignalInfo TerminalWindowTitleChangedSignalInfo where type HaskellCallbackType TerminalWindowTitleChangedSignalInfo = TerminalWindowTitleChangedCallback connectSignal _ = connectTerminalWindowTitleChanged type instance SignalList Terminal = TerminalSignalList type TerminalSignalList = ('[ '("accelClosuresChanged", Gtk.WidgetAccelClosuresChangedSignalInfo), '("bell", TerminalBellSignalInfo), '("buttonPressEvent", Gtk.WidgetButtonPressEventSignalInfo), '("buttonReleaseEvent", Gtk.WidgetButtonReleaseEventSignalInfo), '("canActivateAccel", Gtk.WidgetCanActivateAccelSignalInfo), '("charSizeChanged", TerminalCharSizeChangedSignalInfo), '("childExited", TerminalChildExitedSignalInfo), '("childNotify", Gtk.WidgetChildNotifySignalInfo), '("commit", TerminalCommitSignalInfo), '("compositedChanged", Gtk.WidgetCompositedChangedSignalInfo), '("configureEvent", Gtk.WidgetConfigureEventSignalInfo), '("contentsChanged", TerminalContentsChangedSignalInfo), '("copyClipboard", TerminalCopyClipboardSignalInfo), '("currentDirectoryUriChanged", TerminalCurrentDirectoryUriChangedSignalInfo), '("currentFileUriChanged", TerminalCurrentFileUriChangedSignalInfo), '("cursorMoved", TerminalCursorMovedSignalInfo), '("damageEvent", Gtk.WidgetDamageEventSignalInfo), '("decreaseFontSize", TerminalDecreaseFontSizeSignalInfo), '("deiconifyWindow", TerminalDeiconifyWindowSignalInfo), '("deleteEvent", Gtk.WidgetDeleteEventSignalInfo), '("destroy", Gtk.WidgetDestroySignalInfo), '("destroyEvent", Gtk.WidgetDestroyEventSignalInfo), '("directionChanged", Gtk.WidgetDirectionChangedSignalInfo), '("dragBegin", Gtk.WidgetDragBeginSignalInfo), '("dragDataDelete", Gtk.WidgetDragDataDeleteSignalInfo), '("dragDataGet", Gtk.WidgetDragDataGetSignalInfo), '("dragDataReceived", Gtk.WidgetDragDataReceivedSignalInfo), '("dragDrop", Gtk.WidgetDragDropSignalInfo), '("dragEnd", Gtk.WidgetDragEndSignalInfo), '("dragFailed", Gtk.WidgetDragFailedSignalInfo), '("dragLeave", Gtk.WidgetDragLeaveSignalInfo), '("dragMotion", Gtk.WidgetDragMotionSignalInfo), '("draw", Gtk.WidgetDrawSignalInfo), '("encodingChanged", TerminalEncodingChangedSignalInfo), '("enterNotifyEvent", Gtk.WidgetEnterNotifyEventSignalInfo), '("eof", TerminalEofSignalInfo), '("event", Gtk.WidgetEventSignalInfo), '("eventAfter", Gtk.WidgetEventAfterSignalInfo), '("focus", Gtk.WidgetFocusSignalInfo), '("focusInEvent", Gtk.WidgetFocusInEventSignalInfo), '("focusOutEvent", Gtk.WidgetFocusOutEventSignalInfo), '("grabBrokenEvent", Gtk.WidgetGrabBrokenEventSignalInfo), '("grabFocus", Gtk.WidgetGrabFocusSignalInfo), '("grabNotify", Gtk.WidgetGrabNotifySignalInfo), '("hide", Gtk.WidgetHideSignalInfo), '("hierarchyChanged", Gtk.WidgetHierarchyChangedSignalInfo), '("iconTitleChanged", TerminalIconTitleChangedSignalInfo), '("iconifyWindow", TerminalIconifyWindowSignalInfo), '("increaseFontSize", TerminalIncreaseFontSizeSignalInfo), '("keyPressEvent", Gtk.WidgetKeyPressEventSignalInfo), '("keyReleaseEvent", Gtk.WidgetKeyReleaseEventSignalInfo), '("keynavFailed", Gtk.WidgetKeynavFailedSignalInfo), '("leaveNotifyEvent", Gtk.WidgetLeaveNotifyEventSignalInfo), '("lowerWindow", TerminalLowerWindowSignalInfo), '("map", Gtk.WidgetMapSignalInfo), '("mapEvent", Gtk.WidgetMapEventSignalInfo), '("maximizeWindow", TerminalMaximizeWindowSignalInfo), '("mnemonicActivate", Gtk.WidgetMnemonicActivateSignalInfo), '("motionNotifyEvent", Gtk.WidgetMotionNotifyEventSignalInfo), '("moveFocus", Gtk.WidgetMoveFocusSignalInfo), '("moveWindow", TerminalMoveWindowSignalInfo), '("notificationReceived", TerminalNotificationReceivedSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("parentSet", Gtk.WidgetParentSetSignalInfo), '("pasteClipboard", TerminalPasteClipboardSignalInfo), '("popupMenu", Gtk.WidgetPopupMenuSignalInfo), '("propertyNotifyEvent", Gtk.WidgetPropertyNotifyEventSignalInfo), '("proximityInEvent", Gtk.WidgetProximityInEventSignalInfo), '("proximityOutEvent", Gtk.WidgetProximityOutEventSignalInfo), '("queryTooltip", Gtk.WidgetQueryTooltipSignalInfo), '("raiseWindow", TerminalRaiseWindowSignalInfo), '("realize", Gtk.WidgetRealizeSignalInfo), '("refreshWindow", TerminalRefreshWindowSignalInfo), '("resizeWindow", TerminalResizeWindowSignalInfo), '("restoreWindow", TerminalRestoreWindowSignalInfo), '("screenChanged", Gtk.WidgetScreenChangedSignalInfo), '("scrollEvent", Gtk.WidgetScrollEventSignalInfo), '("selectionChanged", TerminalSelectionChangedSignalInfo), '("selectionClearEvent", Gtk.WidgetSelectionClearEventSignalInfo), '("selectionGet", Gtk.WidgetSelectionGetSignalInfo), '("selectionNotifyEvent", Gtk.WidgetSelectionNotifyEventSignalInfo), '("selectionReceived", Gtk.WidgetSelectionReceivedSignalInfo), '("selectionRequestEvent", Gtk.WidgetSelectionRequestEventSignalInfo), '("show", Gtk.WidgetShowSignalInfo), '("showHelp", Gtk.WidgetShowHelpSignalInfo), '("sizeAllocate", Gtk.WidgetSizeAllocateSignalInfo), '("stateChanged", Gtk.WidgetStateChangedSignalInfo), '("stateFlagsChanged", Gtk.WidgetStateFlagsChangedSignalInfo), '("styleSet", Gtk.WidgetStyleSetSignalInfo), '("styleUpdated", Gtk.WidgetStyleUpdatedSignalInfo), '("textDeleted", TerminalTextDeletedSignalInfo), '("textInserted", TerminalTextInsertedSignalInfo), '("textModified", TerminalTextModifiedSignalInfo), '("textScrolled", TerminalTextScrolledSignalInfo), '("touchEvent", Gtk.WidgetTouchEventSignalInfo), '("unmap", Gtk.WidgetUnmapSignalInfo), '("unmapEvent", Gtk.WidgetUnmapEventSignalInfo), '("unrealize", Gtk.WidgetUnrealizeSignalInfo), '("visibilityNotifyEvent", Gtk.WidgetVisibilityNotifyEventSignalInfo), '("windowStateEvent", Gtk.WidgetWindowStateEventSignalInfo), '("windowTitleChanged", TerminalWindowTitleChangedSignalInfo)] :: [(Symbol, *)]) -- method Terminal::new -- method type : Constructor -- Args : [] -- Lengths : [] -- returnType : Just (TInterface "Vte" "Terminal") -- throws : False -- Skip return : False foreign import ccall "vte_terminal_new" vte_terminal_new :: IO (Ptr Terminal) terminalNew :: (MonadIO m) => m Terminal -- result terminalNew = liftIO $ do result <- vte_terminal_new checkUnexpectedReturnNULL "vte_terminal_new" result result' <- (newObject Terminal) result return result' -- method Terminal::copy_clipboard -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_copy_clipboard" vte_terminal_copy_clipboard :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO () terminalCopyClipboard :: (MonadIO m, TerminalK a) => a -- _obj -> m () -- result terminalCopyClipboard _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj vte_terminal_copy_clipboard _obj' touchManagedPtr _obj return () data TerminalCopyClipboardMethodInfo instance (signature ~ (m ()), MonadIO m, TerminalK a) => MethodInfo TerminalCopyClipboardMethodInfo a signature where overloadedMethod _ = terminalCopyClipboard -- method Terminal::copy_primary -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_copy_primary" vte_terminal_copy_primary :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO () terminalCopyPrimary :: (MonadIO m, TerminalK a) => a -- _obj -> m () -- result terminalCopyPrimary _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj vte_terminal_copy_primary _obj' touchManagedPtr _obj return () data TerminalCopyPrimaryMethodInfo instance (signature ~ (m ()), MonadIO m, TerminalK a) => MethodInfo TerminalCopyPrimaryMethodInfo a signature where overloadedMethod _ = terminalCopyPrimary -- method Terminal::feed -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "data", argType = TCArray False (-1) 2 (TBasicType TUInt8), direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "length", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [Arg {argCName = "length", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_feed" vte_terminal_feed :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" Ptr Word8 -> -- data : TCArray False (-1) 2 (TBasicType TUInt8) Int64 -> -- length : TBasicType TInt64 IO () terminalFeed :: (MonadIO m, TerminalK a) => a -- _obj -> ByteString -- data_ -> m () -- result terminalFeed _obj data_ = liftIO $ do let length_ = fromIntegral $ B.length data_ let _obj' = unsafeManagedPtrCastPtr _obj data_' <- packByteString data_ vte_terminal_feed _obj' data_' length_ touchManagedPtr _obj freeMem data_' return () data TerminalFeedMethodInfo instance (signature ~ (ByteString -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalFeedMethodInfo a signature where overloadedMethod _ = terminalFeed -- method Terminal::feed_child -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "text", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "length", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_feed_child" vte_terminal_feed_child :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" CString -> -- text : TBasicType TUTF8 Int64 -> -- length : TBasicType TInt64 IO () terminalFeedChild :: (MonadIO m, TerminalK a) => a -- _obj -> T.Text -- text -> Int64 -- length_ -> m () -- result terminalFeedChild _obj text length_ = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj text' <- textToCString text vte_terminal_feed_child _obj' text' length_ touchManagedPtr _obj freeMem text' return () data TerminalFeedChildMethodInfo instance (signature ~ (T.Text -> Int64 -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalFeedChildMethodInfo a signature where overloadedMethod _ = terminalFeedChild -- method Terminal::feed_child_binary -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "data", argType = TBasicType TUInt8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "length", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_feed_child_binary" vte_terminal_feed_child_binary :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" Word8 -> -- data : TBasicType TUInt8 Word64 -> -- length : TBasicType TUInt64 IO () terminalFeedChildBinary :: (MonadIO m, TerminalK a) => a -- _obj -> Word8 -- data_ -> Word64 -- length_ -> m () -- result terminalFeedChildBinary _obj data_ length_ = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj vte_terminal_feed_child_binary _obj' data_ length_ touchManagedPtr _obj return () data TerminalFeedChildBinaryMethodInfo instance (signature ~ (Word8 -> Word64 -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalFeedChildBinaryMethodInfo a signature where overloadedMethod _ = terminalFeedChildBinary -- method Terminal::get_allow_bold -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TBoolean) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_allow_bold" vte_terminal_get_allow_bold :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO CInt terminalGetAllowBold :: (MonadIO m, TerminalK a) => a -- _obj -> m Bool -- result terminalGetAllowBold _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- vte_terminal_get_allow_bold _obj' let result' = (/= 0) result touchManagedPtr _obj return result' data TerminalGetAllowBoldMethodInfo instance (signature ~ (m Bool), MonadIO m, TerminalK a) => MethodInfo TerminalGetAllowBoldMethodInfo a signature where overloadedMethod _ = terminalGetAllowBold -- method Terminal::get_audible_bell -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TBoolean) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_audible_bell" vte_terminal_get_audible_bell :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO CInt terminalGetAudibleBell :: (MonadIO m, TerminalK a) => a -- _obj -> m Bool -- result terminalGetAudibleBell _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- vte_terminal_get_audible_bell _obj' let result' = (/= 0) result touchManagedPtr _obj return result' data TerminalGetAudibleBellMethodInfo instance (signature ~ (m Bool), MonadIO m, TerminalK a) => MethodInfo TerminalGetAudibleBellMethodInfo a signature where overloadedMethod _ = terminalGetAudibleBell -- method Terminal::get_char_height -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TLong) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_char_height" vte_terminal_get_char_height :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO CLong terminalGetCharHeight :: (MonadIO m, TerminalK a) => a -- _obj -> m CLong -- result terminalGetCharHeight _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- vte_terminal_get_char_height _obj' touchManagedPtr _obj return result data TerminalGetCharHeightMethodInfo instance (signature ~ (m CLong), MonadIO m, TerminalK a) => MethodInfo TerminalGetCharHeightMethodInfo a signature where overloadedMethod _ = terminalGetCharHeight -- method Terminal::get_char_width -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TLong) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_char_width" vte_terminal_get_char_width :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO CLong terminalGetCharWidth :: (MonadIO m, TerminalK a) => a -- _obj -> m CLong -- result terminalGetCharWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- vte_terminal_get_char_width _obj' touchManagedPtr _obj return result data TerminalGetCharWidthMethodInfo instance (signature ~ (m CLong), MonadIO m, TerminalK a) => MethodInfo TerminalGetCharWidthMethodInfo a signature where overloadedMethod _ = terminalGetCharWidth -- method Terminal::get_cjk_ambiguous_width -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TInt) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_cjk_ambiguous_width" vte_terminal_get_cjk_ambiguous_width :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO Int32 terminalGetCjkAmbiguousWidth :: (MonadIO m, TerminalK a) => a -- _obj -> m Int32 -- result terminalGetCjkAmbiguousWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- vte_terminal_get_cjk_ambiguous_width _obj' touchManagedPtr _obj return result data TerminalGetCjkAmbiguousWidthMethodInfo instance (signature ~ (m Int32), MonadIO m, TerminalK a) => MethodInfo TerminalGetCjkAmbiguousWidthMethodInfo a signature where overloadedMethod _ = terminalGetCjkAmbiguousWidth -- method Terminal::get_column_count -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TLong) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_column_count" vte_terminal_get_column_count :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO CLong terminalGetColumnCount :: (MonadIO m, TerminalK a) => a -- _obj -> m CLong -- result terminalGetColumnCount _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- vte_terminal_get_column_count _obj' touchManagedPtr _obj return result data TerminalGetColumnCountMethodInfo instance (signature ~ (m CLong), MonadIO m, TerminalK a) => MethodInfo TerminalGetColumnCountMethodInfo a signature where overloadedMethod _ = terminalGetColumnCount -- method Terminal::get_current_directory_uri -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TUTF8) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_current_directory_uri" vte_terminal_get_current_directory_uri :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO CString terminalGetCurrentDirectoryUri :: (MonadIO m, TerminalK a) => a -- _obj -> m T.Text -- result terminalGetCurrentDirectoryUri _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- vte_terminal_get_current_directory_uri _obj' checkUnexpectedReturnNULL "vte_terminal_get_current_directory_uri" result result' <- cstringToText result touchManagedPtr _obj return result' data TerminalGetCurrentDirectoryUriMethodInfo instance (signature ~ (m T.Text), MonadIO m, TerminalK a) => MethodInfo TerminalGetCurrentDirectoryUriMethodInfo a signature where overloadedMethod _ = terminalGetCurrentDirectoryUri -- method Terminal::get_current_file_uri -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TUTF8) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_current_file_uri" vte_terminal_get_current_file_uri :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO CString terminalGetCurrentFileUri :: (MonadIO m, TerminalK a) => a -- _obj -> m T.Text -- result terminalGetCurrentFileUri _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- vte_terminal_get_current_file_uri _obj' checkUnexpectedReturnNULL "vte_terminal_get_current_file_uri" result result' <- cstringToText result touchManagedPtr _obj return result' data TerminalGetCurrentFileUriMethodInfo instance (signature ~ (m T.Text), MonadIO m, TerminalK a) => MethodInfo TerminalGetCurrentFileUriMethodInfo a signature where overloadedMethod _ = terminalGetCurrentFileUri -- method Terminal::get_cursor_blink_mode -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TInterface "Vte" "CursorBlinkMode") -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_cursor_blink_mode" vte_terminal_get_cursor_blink_mode :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO CUInt terminalGetCursorBlinkMode :: (MonadIO m, TerminalK a) => a -- _obj -> m CursorBlinkMode -- result terminalGetCursorBlinkMode _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- vte_terminal_get_cursor_blink_mode _obj' let result' = (toEnum . fromIntegral) result touchManagedPtr _obj return result' data TerminalGetCursorBlinkModeMethodInfo instance (signature ~ (m CursorBlinkMode), MonadIO m, TerminalK a) => MethodInfo TerminalGetCursorBlinkModeMethodInfo a signature where overloadedMethod _ = terminalGetCursorBlinkMode -- method Terminal::get_cursor_position -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "column", argType = TBasicType TLong, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything},Arg {argCName = "row", argType = TBasicType TLong, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_cursor_position" vte_terminal_get_cursor_position :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" Ptr CLong -> -- column : TBasicType TLong Ptr CLong -> -- row : TBasicType TLong IO () terminalGetCursorPosition :: (MonadIO m, TerminalK a) => a -- _obj -> m (CLong,CLong) -- result terminalGetCursorPosition _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj column <- allocMem :: IO (Ptr CLong) row <- allocMem :: IO (Ptr CLong) vte_terminal_get_cursor_position _obj' column row column' <- peek column row' <- peek row touchManagedPtr _obj freeMem column freeMem row return (column', row') data TerminalGetCursorPositionMethodInfo instance (signature ~ (m (CLong,CLong)), MonadIO m, TerminalK a) => MethodInfo TerminalGetCursorPositionMethodInfo a signature where overloadedMethod _ = terminalGetCursorPosition -- method Terminal::get_cursor_shape -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TInterface "Vte" "CursorShape") -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_cursor_shape" vte_terminal_get_cursor_shape :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO CUInt terminalGetCursorShape :: (MonadIO m, TerminalK a) => a -- _obj -> m CursorShape -- result terminalGetCursorShape _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- vte_terminal_get_cursor_shape _obj' let result' = (toEnum . fromIntegral) result touchManagedPtr _obj return result' data TerminalGetCursorShapeMethodInfo instance (signature ~ (m CursorShape), MonadIO m, TerminalK a) => MethodInfo TerminalGetCursorShapeMethodInfo a signature where overloadedMethod _ = terminalGetCursorShape -- method Terminal::get_encoding -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TUTF8) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_encoding" vte_terminal_get_encoding :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO CString terminalGetEncoding :: (MonadIO m, TerminalK a) => a -- _obj -> m T.Text -- result terminalGetEncoding _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- vte_terminal_get_encoding _obj' checkUnexpectedReturnNULL "vte_terminal_get_encoding" result result' <- cstringToText result touchManagedPtr _obj return result' data TerminalGetEncodingMethodInfo instance (signature ~ (m T.Text), MonadIO m, TerminalK a) => MethodInfo TerminalGetEncodingMethodInfo a signature where overloadedMethod _ = terminalGetEncoding -- method Terminal::get_font -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TInterface "Pango" "FontDescription") -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_font" vte_terminal_get_font :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO (Ptr Pango.FontDescription) terminalGetFont :: (MonadIO m, TerminalK a) => a -- _obj -> m Pango.FontDescription -- result terminalGetFont _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- vte_terminal_get_font _obj' checkUnexpectedReturnNULL "vte_terminal_get_font" result result' <- (newBoxed Pango.FontDescription) result touchManagedPtr _obj return result' data TerminalGetFontMethodInfo instance (signature ~ (m Pango.FontDescription), MonadIO m, TerminalK a) => MethodInfo TerminalGetFontMethodInfo a signature where overloadedMethod _ = terminalGetFont -- method Terminal::get_font_scale -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TDouble) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_font_scale" vte_terminal_get_font_scale :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO CDouble terminalGetFontScale :: (MonadIO m, TerminalK a) => a -- _obj -> m Double -- result terminalGetFontScale _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- vte_terminal_get_font_scale _obj' let result' = realToFrac result touchManagedPtr _obj return result' data TerminalGetFontScaleMethodInfo instance (signature ~ (m Double), MonadIO m, TerminalK a) => MethodInfo TerminalGetFontScaleMethodInfo a signature where overloadedMethod _ = terminalGetFontScale -- method Terminal::get_geometry_hints -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "hints", argType = TInterface "Gdk" "Geometry", direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = True, transfer = TransferNothing},Arg {argCName = "min_rows", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "min_columns", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_geometry_hints" vte_terminal_get_geometry_hints :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" Ptr Gdk.Geometry -> -- hints : TInterface "Gdk" "Geometry" Int32 -> -- min_rows : TBasicType TInt Int32 -> -- min_columns : TBasicType TInt IO () terminalGetGeometryHints :: (MonadIO m, TerminalK a) => a -- _obj -> Int32 -- minRows -> Int32 -- minColumns -> m (Gdk.Geometry) -- result terminalGetGeometryHints _obj minRows minColumns = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj hints <- callocBytes 56 :: IO (Ptr Gdk.Geometry) vte_terminal_get_geometry_hints _obj' hints minRows minColumns hints' <- (wrapPtr Gdk.Geometry) hints touchManagedPtr _obj return hints' data TerminalGetGeometryHintsMethodInfo instance (signature ~ (Int32 -> Int32 -> m (Gdk.Geometry)), MonadIO m, TerminalK a) => MethodInfo TerminalGetGeometryHintsMethodInfo a signature where overloadedMethod _ = terminalGetGeometryHints -- method Terminal::get_has_selection -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TBoolean) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_has_selection" vte_terminal_get_has_selection :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO CInt terminalGetHasSelection :: (MonadIO m, TerminalK a) => a -- _obj -> m Bool -- result terminalGetHasSelection _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- vte_terminal_get_has_selection _obj' let result' = (/= 0) result touchManagedPtr _obj return result' data TerminalGetHasSelectionMethodInfo instance (signature ~ (m Bool), MonadIO m, TerminalK a) => MethodInfo TerminalGetHasSelectionMethodInfo a signature where overloadedMethod _ = terminalGetHasSelection -- method Terminal::get_icon_title -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TUTF8) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_icon_title" vte_terminal_get_icon_title :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO CString terminalGetIconTitle :: (MonadIO m, TerminalK a) => a -- _obj -> m T.Text -- result terminalGetIconTitle _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- vte_terminal_get_icon_title _obj' checkUnexpectedReturnNULL "vte_terminal_get_icon_title" result result' <- cstringToText result touchManagedPtr _obj return result' data TerminalGetIconTitleMethodInfo instance (signature ~ (m T.Text), MonadIO m, TerminalK a) => MethodInfo TerminalGetIconTitleMethodInfo a signature where overloadedMethod _ = terminalGetIconTitle -- method Terminal::get_input_enabled -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TBoolean) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_input_enabled" vte_terminal_get_input_enabled :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO CInt terminalGetInputEnabled :: (MonadIO m, TerminalK a) => a -- _obj -> m Bool -- result terminalGetInputEnabled _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- vte_terminal_get_input_enabled _obj' let result' = (/= 0) result touchManagedPtr _obj return result' data TerminalGetInputEnabledMethodInfo instance (signature ~ (m Bool), MonadIO m, TerminalK a) => MethodInfo TerminalGetInputEnabledMethodInfo a signature where overloadedMethod _ = terminalGetInputEnabled -- method Terminal::get_mouse_autohide -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TBoolean) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_mouse_autohide" vte_terminal_get_mouse_autohide :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO CInt terminalGetMouseAutohide :: (MonadIO m, TerminalK a) => a -- _obj -> m Bool -- result terminalGetMouseAutohide _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- vte_terminal_get_mouse_autohide _obj' let result' = (/= 0) result touchManagedPtr _obj return result' data TerminalGetMouseAutohideMethodInfo instance (signature ~ (m Bool), MonadIO m, TerminalK a) => MethodInfo TerminalGetMouseAutohideMethodInfo a signature where overloadedMethod _ = terminalGetMouseAutohide -- method Terminal::get_pty -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TInterface "Vte" "Pty") -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_pty" vte_terminal_get_pty :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO (Ptr Pty) terminalGetPty :: (MonadIO m, TerminalK a) => a -- _obj -> m Pty -- result terminalGetPty _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- vte_terminal_get_pty _obj' checkUnexpectedReturnNULL "vte_terminal_get_pty" result result' <- (newObject Pty) result touchManagedPtr _obj return result' data TerminalGetPtyMethodInfo instance (signature ~ (m Pty), MonadIO m, TerminalK a) => MethodInfo TerminalGetPtyMethodInfo a signature where overloadedMethod _ = terminalGetPty -- method Terminal::get_rewrap_on_resize -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TBoolean) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_rewrap_on_resize" vte_terminal_get_rewrap_on_resize :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO CInt terminalGetRewrapOnResize :: (MonadIO m, TerminalK a) => a -- _obj -> m Bool -- result terminalGetRewrapOnResize _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- vte_terminal_get_rewrap_on_resize _obj' let result' = (/= 0) result touchManagedPtr _obj return result' data TerminalGetRewrapOnResizeMethodInfo instance (signature ~ (m Bool), MonadIO m, TerminalK a) => MethodInfo TerminalGetRewrapOnResizeMethodInfo a signature where overloadedMethod _ = terminalGetRewrapOnResize -- method Terminal::get_row_count -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TLong) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_row_count" vte_terminal_get_row_count :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO CLong terminalGetRowCount :: (MonadIO m, TerminalK a) => a -- _obj -> m CLong -- result terminalGetRowCount _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- vte_terminal_get_row_count _obj' touchManagedPtr _obj return result data TerminalGetRowCountMethodInfo instance (signature ~ (m CLong), MonadIO m, TerminalK a) => MethodInfo TerminalGetRowCountMethodInfo a signature where overloadedMethod _ = terminalGetRowCount -- method Terminal::get_text -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "is_selected", argType = TInterface "Vte" "SelectionFunc", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeCall, argClosure = 2, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "user_data", argType = TBasicType TPtr, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "attributes", argType = TGArray (TInterface "Vte" "CharAttributes"), direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = True, transfer = TransferEverything}] -- Lengths : [] -- returnType : Just (TBasicType TUTF8) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_text" vte_terminal_get_text :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" FunPtr SelectionFuncC -> -- is_selected : TInterface "Vte" "SelectionFunc" Ptr () -> -- user_data : TBasicType TPtr Ptr (Ptr (GArray (Ptr CharAttributes))) -> -- attributes : TGArray (TInterface "Vte" "CharAttributes") IO CString terminalGetText :: (MonadIO m, TerminalK a) => a -- _obj -> Maybe (SelectionFunc) -- isSelected -> m (T.Text,[CharAttributes]) -- result terminalGetText _obj isSelected = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj maybeIsSelected <- case isSelected of Nothing -> return (castPtrToFunPtr nullPtr) Just jIsSelected -> do jIsSelected' <- mkSelectionFunc (selectionFuncWrapper Nothing jIsSelected) return jIsSelected' attributes <- allocMem :: IO (Ptr (Ptr (GArray (Ptr CharAttributes)))) let userData = nullPtr result <- vte_terminal_get_text _obj' maybeIsSelected userData attributes checkUnexpectedReturnNULL "vte_terminal_get_text" result result' <- cstringToText result freeMem result attributes' <- peek attributes attributes'' <- unpackGArray attributes' attributes''' <- mapM (wrapPtr CharAttributes) attributes'' unrefGArray attributes' safeFreeFunPtr $ castFunPtrToPtr maybeIsSelected touchManagedPtr _obj freeMem attributes return (result', attributes''') data TerminalGetTextMethodInfo instance (signature ~ (Maybe (SelectionFunc) -> m (T.Text,[CharAttributes])), MonadIO m, TerminalK a) => MethodInfo TerminalGetTextMethodInfo a signature where overloadedMethod _ = terminalGetText -- method Terminal::get_text_include_trailing_spaces -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "is_selected", argType = TInterface "Vte" "SelectionFunc", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeCall, argClosure = 2, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "user_data", argType = TBasicType TPtr, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "attributes", argType = TGArray (TInterface "Vte" "CharAttributes"), direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = True, transfer = TransferEverything}] -- Lengths : [] -- returnType : Just (TBasicType TUTF8) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_text_include_trailing_spaces" vte_terminal_get_text_include_trailing_spaces :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" FunPtr SelectionFuncC -> -- is_selected : TInterface "Vte" "SelectionFunc" Ptr () -> -- user_data : TBasicType TPtr Ptr (Ptr (GArray (Ptr CharAttributes))) -> -- attributes : TGArray (TInterface "Vte" "CharAttributes") IO CString terminalGetTextIncludeTrailingSpaces :: (MonadIO m, TerminalK a) => a -- _obj -> Maybe (SelectionFunc) -- isSelected -> m (T.Text,[CharAttributes]) -- result terminalGetTextIncludeTrailingSpaces _obj isSelected = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj maybeIsSelected <- case isSelected of Nothing -> return (castPtrToFunPtr nullPtr) Just jIsSelected -> do jIsSelected' <- mkSelectionFunc (selectionFuncWrapper Nothing jIsSelected) return jIsSelected' attributes <- allocMem :: IO (Ptr (Ptr (GArray (Ptr CharAttributes)))) let userData = nullPtr result <- vte_terminal_get_text_include_trailing_spaces _obj' maybeIsSelected userData attributes checkUnexpectedReturnNULL "vte_terminal_get_text_include_trailing_spaces" result result' <- cstringToText result freeMem result attributes' <- peek attributes attributes'' <- unpackGArray attributes' attributes''' <- mapM (wrapPtr CharAttributes) attributes'' unrefGArray attributes' safeFreeFunPtr $ castFunPtrToPtr maybeIsSelected touchManagedPtr _obj freeMem attributes return (result', attributes''') data TerminalGetTextIncludeTrailingSpacesMethodInfo instance (signature ~ (Maybe (SelectionFunc) -> m (T.Text,[CharAttributes])), MonadIO m, TerminalK a) => MethodInfo TerminalGetTextIncludeTrailingSpacesMethodInfo a signature where overloadedMethod _ = terminalGetTextIncludeTrailingSpaces -- method Terminal::get_text_range -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "start_row", argType = TBasicType TLong, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "start_col", argType = TBasicType TLong, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "end_row", argType = TBasicType TLong, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "end_col", argType = TBasicType TLong, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "is_selected", argType = TInterface "Vte" "SelectionFunc", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeCall, argClosure = 6, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "user_data", argType = TBasicType TPtr, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "attributes", argType = TGArray (TInterface "Vte" "CharAttributes"), direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = True, transfer = TransferEverything}] -- Lengths : [] -- returnType : Just (TBasicType TUTF8) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_text_range" vte_terminal_get_text_range :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" CLong -> -- start_row : TBasicType TLong CLong -> -- start_col : TBasicType TLong CLong -> -- end_row : TBasicType TLong CLong -> -- end_col : TBasicType TLong FunPtr SelectionFuncC -> -- is_selected : TInterface "Vte" "SelectionFunc" Ptr () -> -- user_data : TBasicType TPtr Ptr (Ptr (GArray (Ptr CharAttributes))) -> -- attributes : TGArray (TInterface "Vte" "CharAttributes") IO CString terminalGetTextRange :: (MonadIO m, TerminalK a) => a -- _obj -> CLong -- startRow -> CLong -- startCol -> CLong -- endRow -> CLong -- endCol -> Maybe (SelectionFunc) -- isSelected -> m (T.Text,[CharAttributes]) -- result terminalGetTextRange _obj startRow startCol endRow endCol isSelected = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj maybeIsSelected <- case isSelected of Nothing -> return (castPtrToFunPtr nullPtr) Just jIsSelected -> do jIsSelected' <- mkSelectionFunc (selectionFuncWrapper Nothing jIsSelected) return jIsSelected' attributes <- allocMem :: IO (Ptr (Ptr (GArray (Ptr CharAttributes)))) let userData = nullPtr result <- vte_terminal_get_text_range _obj' startRow startCol endRow endCol maybeIsSelected userData attributes checkUnexpectedReturnNULL "vte_terminal_get_text_range" result result' <- cstringToText result freeMem result attributes' <- peek attributes attributes'' <- unpackGArray attributes' attributes''' <- mapM (wrapPtr CharAttributes) attributes'' unrefGArray attributes' safeFreeFunPtr $ castFunPtrToPtr maybeIsSelected touchManagedPtr _obj freeMem attributes return (result', attributes''') data TerminalGetTextRangeMethodInfo instance (signature ~ (CLong -> CLong -> CLong -> CLong -> Maybe (SelectionFunc) -> m (T.Text,[CharAttributes])), MonadIO m, TerminalK a) => MethodInfo TerminalGetTextRangeMethodInfo a signature where overloadedMethod _ = terminalGetTextRange -- method Terminal::get_window_title -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TUTF8) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_window_title" vte_terminal_get_window_title :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO CString terminalGetWindowTitle :: (MonadIO m, TerminalK a) => a -- _obj -> m T.Text -- result terminalGetWindowTitle _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- vte_terminal_get_window_title _obj' checkUnexpectedReturnNULL "vte_terminal_get_window_title" result result' <- cstringToText result touchManagedPtr _obj return result' data TerminalGetWindowTitleMethodInfo instance (signature ~ (m T.Text), MonadIO m, TerminalK a) => MethodInfo TerminalGetWindowTitleMethodInfo a signature where overloadedMethod _ = terminalGetWindowTitle -- method Terminal::get_word_char_exceptions -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TUTF8) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_get_word_char_exceptions" vte_terminal_get_word_char_exceptions :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO CString terminalGetWordCharExceptions :: (MonadIO m, TerminalK a) => a -- _obj -> m T.Text -- result terminalGetWordCharExceptions _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- vte_terminal_get_word_char_exceptions _obj' checkUnexpectedReturnNULL "vte_terminal_get_word_char_exceptions" result result' <- cstringToText result touchManagedPtr _obj return result' data TerminalGetWordCharExceptionsMethodInfo instance (signature ~ (m T.Text), MonadIO m, TerminalK a) => MethodInfo TerminalGetWordCharExceptionsMethodInfo a signature where overloadedMethod _ = terminalGetWordCharExceptions -- method Terminal::match_add_gregex -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "regex", argType = TInterface "GLib" "Regex", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "flags", argType = TInterface "GLib" "RegexMatchFlags", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TInt) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_match_add_gregex" vte_terminal_match_add_gregex :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" Ptr GLib.Regex -> -- regex : TInterface "GLib" "Regex" CUInt -> -- flags : TInterface "GLib" "RegexMatchFlags" IO Int32 terminalMatchAddGregex :: (MonadIO m, TerminalK a) => a -- _obj -> GLib.Regex -- regex -> [GLib.RegexMatchFlags] -- flags -> m Int32 -- result terminalMatchAddGregex _obj regex flags = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let regex' = unsafeManagedPtrGetPtr regex let flags' = gflagsToWord flags result <- vte_terminal_match_add_gregex _obj' regex' flags' touchManagedPtr _obj touchManagedPtr regex return result data TerminalMatchAddGregexMethodInfo instance (signature ~ (GLib.Regex -> [GLib.RegexMatchFlags] -> m Int32), MonadIO m, TerminalK a) => MethodInfo TerminalMatchAddGregexMethodInfo a signature where overloadedMethod _ = terminalMatchAddGregex -- method Terminal::match_check -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "column", argType = TBasicType TLong, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "row", argType = TBasicType TLong, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "tag", argType = TBasicType TInt, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything}] -- Lengths : [] -- returnType : Just (TBasicType TUTF8) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_match_check" vte_terminal_match_check :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" CLong -> -- column : TBasicType TLong CLong -> -- row : TBasicType TLong Ptr Int32 -> -- tag : TBasicType TInt IO CString terminalMatchCheck :: (MonadIO m, TerminalK a) => a -- _obj -> CLong -- column -> CLong -- row -> m (T.Text,Int32) -- result terminalMatchCheck _obj column row = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj tag <- allocMem :: IO (Ptr Int32) result <- vte_terminal_match_check _obj' column row tag checkUnexpectedReturnNULL "vte_terminal_match_check" result result' <- cstringToText result freeMem result tag' <- peek tag touchManagedPtr _obj freeMem tag return (result', tag') data TerminalMatchCheckMethodInfo instance (signature ~ (CLong -> CLong -> m (T.Text,Int32)), MonadIO m, TerminalK a) => MethodInfo TerminalMatchCheckMethodInfo a signature where overloadedMethod _ = terminalMatchCheck -- method Terminal::match_check_event -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "event", argType = TInterface "Gdk" "Event", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "tag", argType = TBasicType TInt, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything}] -- Lengths : [] -- returnType : Just (TBasicType TUTF8) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_match_check_event" vte_terminal_match_check_event :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" Ptr Gdk.Event -> -- event : TInterface "Gdk" "Event" Ptr Int32 -> -- tag : TBasicType TInt IO CString terminalMatchCheckEvent :: (MonadIO m, TerminalK a) => a -- _obj -> Gdk.Event -- event -> m (T.Text,Int32) -- result terminalMatchCheckEvent _obj event = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let event' = unsafeManagedPtrGetPtr event tag <- allocMem :: IO (Ptr Int32) result <- vte_terminal_match_check_event _obj' event' tag checkUnexpectedReturnNULL "vte_terminal_match_check_event" result result' <- cstringToText result freeMem result tag' <- peek tag touchManagedPtr _obj touchManagedPtr event freeMem tag return (result', tag') data TerminalMatchCheckEventMethodInfo instance (signature ~ (Gdk.Event -> m (T.Text,Int32)), MonadIO m, TerminalK a) => MethodInfo TerminalMatchCheckEventMethodInfo a signature where overloadedMethod _ = terminalMatchCheckEvent -- method Terminal::match_remove -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "tag", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_match_remove" vte_terminal_match_remove :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" Int32 -> -- tag : TBasicType TInt IO () terminalMatchRemove :: (MonadIO m, TerminalK a) => a -- _obj -> Int32 -- tag -> m () -- result terminalMatchRemove _obj tag = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj vte_terminal_match_remove _obj' tag touchManagedPtr _obj return () data TerminalMatchRemoveMethodInfo instance (signature ~ (Int32 -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalMatchRemoveMethodInfo a signature where overloadedMethod _ = terminalMatchRemove -- method Terminal::match_remove_all -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_match_remove_all" vte_terminal_match_remove_all :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO () terminalMatchRemoveAll :: (MonadIO m, TerminalK a) => a -- _obj -> m () -- result terminalMatchRemoveAll _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj vte_terminal_match_remove_all _obj' touchManagedPtr _obj return () data TerminalMatchRemoveAllMethodInfo instance (signature ~ (m ()), MonadIO m, TerminalK a) => MethodInfo TerminalMatchRemoveAllMethodInfo a signature where overloadedMethod _ = terminalMatchRemoveAll -- method Terminal::match_set_cursor_name -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "tag", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "cursor_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_match_set_cursor_name" vte_terminal_match_set_cursor_name :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" Int32 -> -- tag : TBasicType TInt CString -> -- cursor_name : TBasicType TUTF8 IO () terminalMatchSetCursorName :: (MonadIO m, TerminalK a) => a -- _obj -> Int32 -- tag -> T.Text -- cursorName -> m () -- result terminalMatchSetCursorName _obj tag cursorName = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj cursorName' <- textToCString cursorName vte_terminal_match_set_cursor_name _obj' tag cursorName' touchManagedPtr _obj freeMem cursorName' return () data TerminalMatchSetCursorNameMethodInfo instance (signature ~ (Int32 -> T.Text -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalMatchSetCursorNameMethodInfo a signature where overloadedMethod _ = terminalMatchSetCursorName -- method Terminal::match_set_cursor_type -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "tag", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "cursor_type", argType = TInterface "Gdk" "CursorType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_match_set_cursor_type" vte_terminal_match_set_cursor_type :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" Int32 -> -- tag : TBasicType TInt CUInt -> -- cursor_type : TInterface "Gdk" "CursorType" IO () terminalMatchSetCursorType :: (MonadIO m, TerminalK a) => a -- _obj -> Int32 -- tag -> Gdk.CursorType -- cursorType -> m () -- result terminalMatchSetCursorType _obj tag cursorType = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let cursorType' = (fromIntegral . fromEnum) cursorType vte_terminal_match_set_cursor_type _obj' tag cursorType' touchManagedPtr _obj return () data TerminalMatchSetCursorTypeMethodInfo instance (signature ~ (Int32 -> Gdk.CursorType -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalMatchSetCursorTypeMethodInfo a signature where overloadedMethod _ = terminalMatchSetCursorType -- method Terminal::paste_clipboard -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_paste_clipboard" vte_terminal_paste_clipboard :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO () terminalPasteClipboard :: (MonadIO m, TerminalK a) => a -- _obj -> m () -- result terminalPasteClipboard _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj vte_terminal_paste_clipboard _obj' touchManagedPtr _obj return () data TerminalPasteClipboardMethodInfo instance (signature ~ (m ()), MonadIO m, TerminalK a) => MethodInfo TerminalPasteClipboardMethodInfo a signature where overloadedMethod _ = terminalPasteClipboard -- method Terminal::paste_primary -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_paste_primary" vte_terminal_paste_primary :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO () terminalPastePrimary :: (MonadIO m, TerminalK a) => a -- _obj -> m () -- result terminalPastePrimary _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj vte_terminal_paste_primary _obj' touchManagedPtr _obj return () data TerminalPastePrimaryMethodInfo instance (signature ~ (m ()), MonadIO m, TerminalK a) => MethodInfo TerminalPastePrimaryMethodInfo a signature where overloadedMethod _ = terminalPastePrimary -- method Terminal::pty_new_sync -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "flags", argType = TInterface "Vte" "PtyFlags", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "cancellable", argType = TInterface "Gio" "Cancellable", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TInterface "Vte" "Pty") -- throws : True -- Skip return : False foreign import ccall "vte_terminal_pty_new_sync" vte_terminal_pty_new_sync :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" CUInt -> -- flags : TInterface "Vte" "PtyFlags" Ptr Gio.Cancellable -> -- cancellable : TInterface "Gio" "Cancellable" Ptr (Ptr GError) -> -- error IO (Ptr Pty) terminalPtyNewSync :: (MonadIO m, TerminalK a, Gio.CancellableK b) => a -- _obj -> [PtyFlags] -- flags -> Maybe (b) -- cancellable -> m Pty -- result terminalPtyNewSync _obj flags cancellable = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let flags' = gflagsToWord flags maybeCancellable <- case cancellable of Nothing -> return nullPtr Just jCancellable -> do let jCancellable' = unsafeManagedPtrCastPtr jCancellable return jCancellable' onException (do result <- propagateGError $ vte_terminal_pty_new_sync _obj' flags' maybeCancellable checkUnexpectedReturnNULL "vte_terminal_pty_new_sync" result result' <- (wrapObject Pty) result touchManagedPtr _obj whenJust cancellable touchManagedPtr return result' ) (do return () ) data TerminalPtyNewSyncMethodInfo instance (signature ~ ([PtyFlags] -> Maybe (b) -> m Pty), MonadIO m, TerminalK a, Gio.CancellableK b) => MethodInfo TerminalPtyNewSyncMethodInfo a signature where overloadedMethod _ = terminalPtyNewSync -- method Terminal::reset -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "clear_tabstops", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "clear_history", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_reset" vte_terminal_reset :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" CInt -> -- clear_tabstops : TBasicType TBoolean CInt -> -- clear_history : TBasicType TBoolean IO () terminalReset :: (MonadIO m, TerminalK a) => a -- _obj -> Bool -- clearTabstops -> Bool -- clearHistory -> m () -- result terminalReset _obj clearTabstops clearHistory = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let clearTabstops' = (fromIntegral . fromEnum) clearTabstops let clearHistory' = (fromIntegral . fromEnum) clearHistory vte_terminal_reset _obj' clearTabstops' clearHistory' touchManagedPtr _obj return () data TerminalResetMethodInfo instance (signature ~ (Bool -> Bool -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalResetMethodInfo a signature where overloadedMethod _ = terminalReset -- method Terminal::search_find_next -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TBoolean) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_search_find_next" vte_terminal_search_find_next :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO CInt terminalSearchFindNext :: (MonadIO m, TerminalK a) => a -- _obj -> m Bool -- result terminalSearchFindNext _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- vte_terminal_search_find_next _obj' let result' = (/= 0) result touchManagedPtr _obj return result' data TerminalSearchFindNextMethodInfo instance (signature ~ (m Bool), MonadIO m, TerminalK a) => MethodInfo TerminalSearchFindNextMethodInfo a signature where overloadedMethod _ = terminalSearchFindNext -- method Terminal::search_find_previous -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TBoolean) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_search_find_previous" vte_terminal_search_find_previous :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO CInt terminalSearchFindPrevious :: (MonadIO m, TerminalK a) => a -- _obj -> m Bool -- result terminalSearchFindPrevious _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- vte_terminal_search_find_previous _obj' let result' = (/= 0) result touchManagedPtr _obj return result' data TerminalSearchFindPreviousMethodInfo instance (signature ~ (m Bool), MonadIO m, TerminalK a) => MethodInfo TerminalSearchFindPreviousMethodInfo a signature where overloadedMethod _ = terminalSearchFindPrevious -- method Terminal::search_get_gregex -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TInterface "GLib" "Regex") -- throws : False -- Skip return : False foreign import ccall "vte_terminal_search_get_gregex" vte_terminal_search_get_gregex :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO (Ptr GLib.Regex) terminalSearchGetGregex :: (MonadIO m, TerminalK a) => a -- _obj -> m GLib.Regex -- result terminalSearchGetGregex _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- vte_terminal_search_get_gregex _obj' checkUnexpectedReturnNULL "vte_terminal_search_get_gregex" result result' <- (newBoxed GLib.Regex) result touchManagedPtr _obj return result' data TerminalSearchGetGregexMethodInfo instance (signature ~ (m GLib.Regex), MonadIO m, TerminalK a) => MethodInfo TerminalSearchGetGregexMethodInfo a signature where overloadedMethod _ = terminalSearchGetGregex -- method Terminal::search_get_wrap_around -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TBoolean) -- throws : False -- Skip return : False foreign import ccall "vte_terminal_search_get_wrap_around" vte_terminal_search_get_wrap_around :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO CInt terminalSearchGetWrapAround :: (MonadIO m, TerminalK a) => a -- _obj -> m Bool -- result terminalSearchGetWrapAround _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- vte_terminal_search_get_wrap_around _obj' let result' = (/= 0) result touchManagedPtr _obj return result' data TerminalSearchGetWrapAroundMethodInfo instance (signature ~ (m Bool), MonadIO m, TerminalK a) => MethodInfo TerminalSearchGetWrapAroundMethodInfo a signature where overloadedMethod _ = terminalSearchGetWrapAround -- method Terminal::search_set_gregex -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "regex", argType = TInterface "GLib" "Regex", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "flags", argType = TInterface "GLib" "RegexMatchFlags", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_search_set_gregex" vte_terminal_search_set_gregex :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" Ptr GLib.Regex -> -- regex : TInterface "GLib" "Regex" CUInt -> -- flags : TInterface "GLib" "RegexMatchFlags" IO () terminalSearchSetGregex :: (MonadIO m, TerminalK a) => a -- _obj -> Maybe (GLib.Regex) -- regex -> [GLib.RegexMatchFlags] -- flags -> m () -- result terminalSearchSetGregex _obj regex flags = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj maybeRegex <- case regex of Nothing -> return nullPtr Just jRegex -> do let jRegex' = unsafeManagedPtrGetPtr jRegex return jRegex' let flags' = gflagsToWord flags vte_terminal_search_set_gregex _obj' maybeRegex flags' touchManagedPtr _obj whenJust regex touchManagedPtr return () data TerminalSearchSetGregexMethodInfo instance (signature ~ (Maybe (GLib.Regex) -> [GLib.RegexMatchFlags] -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSearchSetGregexMethodInfo a signature where overloadedMethod _ = terminalSearchSetGregex -- method Terminal::search_set_wrap_around -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "wrap_around", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_search_set_wrap_around" vte_terminal_search_set_wrap_around :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" CInt -> -- wrap_around : TBasicType TBoolean IO () terminalSearchSetWrapAround :: (MonadIO m, TerminalK a) => a -- _obj -> Bool -- wrapAround -> m () -- result terminalSearchSetWrapAround _obj wrapAround = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let wrapAround' = (fromIntegral . fromEnum) wrapAround vte_terminal_search_set_wrap_around _obj' wrapAround' touchManagedPtr _obj return () data TerminalSearchSetWrapAroundMethodInfo instance (signature ~ (Bool -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSearchSetWrapAroundMethodInfo a signature where overloadedMethod _ = terminalSearchSetWrapAround -- method Terminal::select_all -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_select_all" vte_terminal_select_all :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO () terminalSelectAll :: (MonadIO m, TerminalK a) => a -- _obj -> m () -- result terminalSelectAll _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj vte_terminal_select_all _obj' touchManagedPtr _obj return () data TerminalSelectAllMethodInfo instance (signature ~ (m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSelectAllMethodInfo a signature where overloadedMethod _ = terminalSelectAll -- method Terminal::set_allow_bold -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "allow_bold", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_allow_bold" vte_terminal_set_allow_bold :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" CInt -> -- allow_bold : TBasicType TBoolean IO () terminalSetAllowBold :: (MonadIO m, TerminalK a) => a -- _obj -> Bool -- allowBold -> m () -- result terminalSetAllowBold _obj allowBold = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let allowBold' = (fromIntegral . fromEnum) allowBold vte_terminal_set_allow_bold _obj' allowBold' touchManagedPtr _obj return () data TerminalSetAllowBoldMethodInfo instance (signature ~ (Bool -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSetAllowBoldMethodInfo a signature where overloadedMethod _ = terminalSetAllowBold -- method Terminal::set_audible_bell -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "is_audible", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_audible_bell" vte_terminal_set_audible_bell :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" CInt -> -- is_audible : TBasicType TBoolean IO () terminalSetAudibleBell :: (MonadIO m, TerminalK a) => a -- _obj -> Bool -- isAudible -> m () -- result terminalSetAudibleBell _obj isAudible = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let isAudible' = (fromIntegral . fromEnum) isAudible vte_terminal_set_audible_bell _obj' isAudible' touchManagedPtr _obj return () data TerminalSetAudibleBellMethodInfo instance (signature ~ (Bool -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSetAudibleBellMethodInfo a signature where overloadedMethod _ = terminalSetAudibleBell -- method Terminal::set_backspace_binding -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "binding", argType = TInterface "Vte" "EraseBinding", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_backspace_binding" vte_terminal_set_backspace_binding :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" CUInt -> -- binding : TInterface "Vte" "EraseBinding" IO () terminalSetBackspaceBinding :: (MonadIO m, TerminalK a) => a -- _obj -> EraseBinding -- binding -> m () -- result terminalSetBackspaceBinding _obj binding = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let binding' = (fromIntegral . fromEnum) binding vte_terminal_set_backspace_binding _obj' binding' touchManagedPtr _obj return () data TerminalSetBackspaceBindingMethodInfo instance (signature ~ (EraseBinding -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSetBackspaceBindingMethodInfo a signature where overloadedMethod _ = terminalSetBackspaceBinding -- method Terminal::set_cjk_ambiguous_width -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "width", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_cjk_ambiguous_width" vte_terminal_set_cjk_ambiguous_width :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" Int32 -> -- width : TBasicType TInt IO () terminalSetCjkAmbiguousWidth :: (MonadIO m, TerminalK a) => a -- _obj -> Int32 -- width -> m () -- result terminalSetCjkAmbiguousWidth _obj width = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj vte_terminal_set_cjk_ambiguous_width _obj' width touchManagedPtr _obj return () data TerminalSetCjkAmbiguousWidthMethodInfo instance (signature ~ (Int32 -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSetCjkAmbiguousWidthMethodInfo a signature where overloadedMethod _ = terminalSetCjkAmbiguousWidth -- method Terminal::set_color_background -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "background", argType = TInterface "Gdk" "RGBA", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_color_background" vte_terminal_set_color_background :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" Ptr Gdk.RGBA -> -- background : TInterface "Gdk" "RGBA" IO () terminalSetColorBackground :: (MonadIO m, TerminalK a) => a -- _obj -> Gdk.RGBA -- background -> m () -- result terminalSetColorBackground _obj background = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let background' = unsafeManagedPtrGetPtr background vte_terminal_set_color_background _obj' background' touchManagedPtr _obj touchManagedPtr background return () data TerminalSetColorBackgroundMethodInfo instance (signature ~ (Gdk.RGBA -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSetColorBackgroundMethodInfo a signature where overloadedMethod _ = terminalSetColorBackground -- method Terminal::set_color_bold -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "bold", argType = TInterface "Gdk" "RGBA", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_color_bold" vte_terminal_set_color_bold :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" Ptr Gdk.RGBA -> -- bold : TInterface "Gdk" "RGBA" IO () terminalSetColorBold :: (MonadIO m, TerminalK a) => a -- _obj -> Maybe (Gdk.RGBA) -- bold -> m () -- result terminalSetColorBold _obj bold = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj maybeBold <- case bold of Nothing -> return nullPtr Just jBold -> do let jBold' = unsafeManagedPtrGetPtr jBold return jBold' vte_terminal_set_color_bold _obj' maybeBold touchManagedPtr _obj whenJust bold touchManagedPtr return () data TerminalSetColorBoldMethodInfo instance (signature ~ (Maybe (Gdk.RGBA) -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSetColorBoldMethodInfo a signature where overloadedMethod _ = terminalSetColorBold -- method Terminal::set_color_cursor -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "cursor_background", argType = TInterface "Gdk" "RGBA", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_color_cursor" vte_terminal_set_color_cursor :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" Ptr Gdk.RGBA -> -- cursor_background : TInterface "Gdk" "RGBA" IO () terminalSetColorCursor :: (MonadIO m, TerminalK a) => a -- _obj -> Maybe (Gdk.RGBA) -- cursorBackground -> m () -- result terminalSetColorCursor _obj cursorBackground = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj maybeCursorBackground <- case cursorBackground of Nothing -> return nullPtr Just jCursorBackground -> do let jCursorBackground' = unsafeManagedPtrGetPtr jCursorBackground return jCursorBackground' vte_terminal_set_color_cursor _obj' maybeCursorBackground touchManagedPtr _obj whenJust cursorBackground touchManagedPtr return () data TerminalSetColorCursorMethodInfo instance (signature ~ (Maybe (Gdk.RGBA) -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSetColorCursorMethodInfo a signature where overloadedMethod _ = terminalSetColorCursor -- method Terminal::set_color_foreground -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "foreground", argType = TInterface "Gdk" "RGBA", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_color_foreground" vte_terminal_set_color_foreground :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" Ptr Gdk.RGBA -> -- foreground : TInterface "Gdk" "RGBA" IO () terminalSetColorForeground :: (MonadIO m, TerminalK a) => a -- _obj -> Gdk.RGBA -- foreground -> m () -- result terminalSetColorForeground _obj foreground = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let foreground' = unsafeManagedPtrGetPtr foreground vte_terminal_set_color_foreground _obj' foreground' touchManagedPtr _obj touchManagedPtr foreground return () data TerminalSetColorForegroundMethodInfo instance (signature ~ (Gdk.RGBA -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSetColorForegroundMethodInfo a signature where overloadedMethod _ = terminalSetColorForeground -- method Terminal::set_color_highlight -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "highlight_background", argType = TInterface "Gdk" "RGBA", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_color_highlight" vte_terminal_set_color_highlight :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" Ptr Gdk.RGBA -> -- highlight_background : TInterface "Gdk" "RGBA" IO () terminalSetColorHighlight :: (MonadIO m, TerminalK a) => a -- _obj -> Maybe (Gdk.RGBA) -- highlightBackground -> m () -- result terminalSetColorHighlight _obj highlightBackground = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj maybeHighlightBackground <- case highlightBackground of Nothing -> return nullPtr Just jHighlightBackground -> do let jHighlightBackground' = unsafeManagedPtrGetPtr jHighlightBackground return jHighlightBackground' vte_terminal_set_color_highlight _obj' maybeHighlightBackground touchManagedPtr _obj whenJust highlightBackground touchManagedPtr return () data TerminalSetColorHighlightMethodInfo instance (signature ~ (Maybe (Gdk.RGBA) -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSetColorHighlightMethodInfo a signature where overloadedMethod _ = terminalSetColorHighlight -- method Terminal::set_color_highlight_foreground -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "highlight_foreground", argType = TInterface "Gdk" "RGBA", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_color_highlight_foreground" vte_terminal_set_color_highlight_foreground :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" Ptr Gdk.RGBA -> -- highlight_foreground : TInterface "Gdk" "RGBA" IO () terminalSetColorHighlightForeground :: (MonadIO m, TerminalK a) => a -- _obj -> Maybe (Gdk.RGBA) -- highlightForeground -> m () -- result terminalSetColorHighlightForeground _obj highlightForeground = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj maybeHighlightForeground <- case highlightForeground of Nothing -> return nullPtr Just jHighlightForeground -> do let jHighlightForeground' = unsafeManagedPtrGetPtr jHighlightForeground return jHighlightForeground' vte_terminal_set_color_highlight_foreground _obj' maybeHighlightForeground touchManagedPtr _obj whenJust highlightForeground touchManagedPtr return () data TerminalSetColorHighlightForegroundMethodInfo instance (signature ~ (Maybe (Gdk.RGBA) -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSetColorHighlightForegroundMethodInfo a signature where overloadedMethod _ = terminalSetColorHighlightForeground -- method Terminal::set_colors -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "foreground", argType = TInterface "Gdk" "RGBA", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "background", argType = TInterface "Gdk" "RGBA", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "palette", argType = TCArray False (-1) 4 (TInterface "Gdk" "RGBA"), direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "palette_size", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [Arg {argCName = "palette_size", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_colors" vte_terminal_set_colors :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" Ptr Gdk.RGBA -> -- foreground : TInterface "Gdk" "RGBA" Ptr Gdk.RGBA -> -- background : TInterface "Gdk" "RGBA" Ptr Gdk.RGBA -> -- palette : TCArray False (-1) 4 (TInterface "Gdk" "RGBA") Word64 -> -- palette_size : TBasicType TUInt64 IO () terminalSetColors :: (MonadIO m, TerminalK a) => a -- _obj -> Maybe (Gdk.RGBA) -- foreground -> Maybe (Gdk.RGBA) -- background -> Maybe ([Gdk.RGBA]) -- palette -> m () -- result terminalSetColors _obj foreground background palette = liftIO $ do let paletteSize = case palette of Nothing -> 0 Just jPalette -> fromIntegral $ length jPalette let _obj' = unsafeManagedPtrCastPtr _obj maybeForeground <- case foreground of Nothing -> return nullPtr Just jForeground -> do let jForeground' = unsafeManagedPtrGetPtr jForeground return jForeground' maybeBackground <- case background of Nothing -> return nullPtr Just jBackground -> do let jBackground' = unsafeManagedPtrGetPtr jBackground return jBackground' maybePalette <- case palette of Nothing -> return nullPtr Just jPalette -> do let jPalette' = map unsafeManagedPtrGetPtr jPalette jPalette'' <- packBlockArray 32 jPalette' return jPalette'' vte_terminal_set_colors _obj' maybeForeground maybeBackground maybePalette paletteSize touchManagedPtr _obj whenJust foreground touchManagedPtr whenJust background touchManagedPtr whenJust palette (mapM_ touchManagedPtr) freeMem maybePalette return () data TerminalSetColorsMethodInfo instance (signature ~ (Maybe (Gdk.RGBA) -> Maybe (Gdk.RGBA) -> Maybe ([Gdk.RGBA]) -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSetColorsMethodInfo a signature where overloadedMethod _ = terminalSetColors -- method Terminal::set_cursor_blink_mode -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "mode", argType = TInterface "Vte" "CursorBlinkMode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_cursor_blink_mode" vte_terminal_set_cursor_blink_mode :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" CUInt -> -- mode : TInterface "Vte" "CursorBlinkMode" IO () terminalSetCursorBlinkMode :: (MonadIO m, TerminalK a) => a -- _obj -> CursorBlinkMode -- mode -> m () -- result terminalSetCursorBlinkMode _obj mode = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let mode' = (fromIntegral . fromEnum) mode vte_terminal_set_cursor_blink_mode _obj' mode' touchManagedPtr _obj return () data TerminalSetCursorBlinkModeMethodInfo instance (signature ~ (CursorBlinkMode -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSetCursorBlinkModeMethodInfo a signature where overloadedMethod _ = terminalSetCursorBlinkMode -- method Terminal::set_cursor_shape -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "shape", argType = TInterface "Vte" "CursorShape", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_cursor_shape" vte_terminal_set_cursor_shape :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" CUInt -> -- shape : TInterface "Vte" "CursorShape" IO () terminalSetCursorShape :: (MonadIO m, TerminalK a) => a -- _obj -> CursorShape -- shape -> m () -- result terminalSetCursorShape _obj shape = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let shape' = (fromIntegral . fromEnum) shape vte_terminal_set_cursor_shape _obj' shape' touchManagedPtr _obj return () data TerminalSetCursorShapeMethodInfo instance (signature ~ (CursorShape -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSetCursorShapeMethodInfo a signature where overloadedMethod _ = terminalSetCursorShape -- method Terminal::set_default_colors -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_default_colors" vte_terminal_set_default_colors :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO () terminalSetDefaultColors :: (MonadIO m, TerminalK a) => a -- _obj -> m () -- result terminalSetDefaultColors _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj vte_terminal_set_default_colors _obj' touchManagedPtr _obj return () data TerminalSetDefaultColorsMethodInfo instance (signature ~ (m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSetDefaultColorsMethodInfo a signature where overloadedMethod _ = terminalSetDefaultColors -- method Terminal::set_delete_binding -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "binding", argType = TInterface "Vte" "EraseBinding", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_delete_binding" vte_terminal_set_delete_binding :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" CUInt -> -- binding : TInterface "Vte" "EraseBinding" IO () terminalSetDeleteBinding :: (MonadIO m, TerminalK a) => a -- _obj -> EraseBinding -- binding -> m () -- result terminalSetDeleteBinding _obj binding = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let binding' = (fromIntegral . fromEnum) binding vte_terminal_set_delete_binding _obj' binding' touchManagedPtr _obj return () data TerminalSetDeleteBindingMethodInfo instance (signature ~ (EraseBinding -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSetDeleteBindingMethodInfo a signature where overloadedMethod _ = terminalSetDeleteBinding -- method Terminal::set_encoding -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "codeset", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TBoolean) -- throws : True -- Skip return : False foreign import ccall "vte_terminal_set_encoding" vte_terminal_set_encoding :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" CString -> -- codeset : TBasicType TUTF8 Ptr (Ptr GError) -> -- error IO CInt terminalSetEncoding :: (MonadIO m, TerminalK a) => a -- _obj -> Maybe (T.Text) -- codeset -> m () -- result terminalSetEncoding _obj codeset = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj maybeCodeset <- case codeset of Nothing -> return nullPtr Just jCodeset -> do jCodeset' <- textToCString jCodeset return jCodeset' onException (do _ <- propagateGError $ vte_terminal_set_encoding _obj' maybeCodeset touchManagedPtr _obj freeMem maybeCodeset return () ) (do freeMem maybeCodeset ) data TerminalSetEncodingMethodInfo instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSetEncodingMethodInfo a signature where overloadedMethod _ = terminalSetEncoding -- method Terminal::set_font -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "font_desc", argType = TInterface "Pango" "FontDescription", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_font" vte_terminal_set_font :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" Ptr Pango.FontDescription -> -- font_desc : TInterface "Pango" "FontDescription" IO () terminalSetFont :: (MonadIO m, TerminalK a) => a -- _obj -> Maybe (Pango.FontDescription) -- fontDesc -> m () -- result terminalSetFont _obj fontDesc = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj maybeFontDesc <- case fontDesc of Nothing -> return nullPtr Just jFontDesc -> do let jFontDesc' = unsafeManagedPtrGetPtr jFontDesc return jFontDesc' vte_terminal_set_font _obj' maybeFontDesc touchManagedPtr _obj whenJust fontDesc touchManagedPtr return () data TerminalSetFontMethodInfo instance (signature ~ (Maybe (Pango.FontDescription) -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSetFontMethodInfo a signature where overloadedMethod _ = terminalSetFont -- method Terminal::set_font_scale -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "scale", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_font_scale" vte_terminal_set_font_scale :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" CDouble -> -- scale : TBasicType TDouble IO () terminalSetFontScale :: (MonadIO m, TerminalK a) => a -- _obj -> Double -- scale -> m () -- result terminalSetFontScale _obj scale = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let scale' = realToFrac scale vte_terminal_set_font_scale _obj' scale' touchManagedPtr _obj return () data TerminalSetFontScaleMethodInfo instance (signature ~ (Double -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSetFontScaleMethodInfo a signature where overloadedMethod _ = terminalSetFontScale -- method Terminal::set_geometry_hints_for_window -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "window", argType = TInterface "Gtk" "Window", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_geometry_hints_for_window" vte_terminal_set_geometry_hints_for_window :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" Ptr Gtk.Window -> -- window : TInterface "Gtk" "Window" IO () terminalSetGeometryHintsForWindow :: (MonadIO m, TerminalK a, Gtk.WindowK b) => a -- _obj -> b -- window -> m () -- result terminalSetGeometryHintsForWindow _obj window = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let window' = unsafeManagedPtrCastPtr window vte_terminal_set_geometry_hints_for_window _obj' window' touchManagedPtr _obj touchManagedPtr window return () data TerminalSetGeometryHintsForWindowMethodInfo instance (signature ~ (b -> m ()), MonadIO m, TerminalK a, Gtk.WindowK b) => MethodInfo TerminalSetGeometryHintsForWindowMethodInfo a signature where overloadedMethod _ = terminalSetGeometryHintsForWindow -- method Terminal::set_input_enabled -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_input_enabled" vte_terminal_set_input_enabled :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" CInt -> -- enabled : TBasicType TBoolean IO () terminalSetInputEnabled :: (MonadIO m, TerminalK a) => a -- _obj -> Bool -- enabled -> m () -- result terminalSetInputEnabled _obj enabled = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let enabled' = (fromIntegral . fromEnum) enabled vte_terminal_set_input_enabled _obj' enabled' touchManagedPtr _obj return () data TerminalSetInputEnabledMethodInfo instance (signature ~ (Bool -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSetInputEnabledMethodInfo a signature where overloadedMethod _ = terminalSetInputEnabled -- method Terminal::set_mouse_autohide -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "setting", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_mouse_autohide" vte_terminal_set_mouse_autohide :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" CInt -> -- setting : TBasicType TBoolean IO () terminalSetMouseAutohide :: (MonadIO m, TerminalK a) => a -- _obj -> Bool -- setting -> m () -- result terminalSetMouseAutohide _obj setting = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let setting' = (fromIntegral . fromEnum) setting vte_terminal_set_mouse_autohide _obj' setting' touchManagedPtr _obj return () data TerminalSetMouseAutohideMethodInfo instance (signature ~ (Bool -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSetMouseAutohideMethodInfo a signature where overloadedMethod _ = terminalSetMouseAutohide -- method Terminal::set_pty -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "pty", argType = TInterface "Vte" "Pty", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_pty" vte_terminal_set_pty :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" Ptr Pty -> -- pty : TInterface "Vte" "Pty" IO () terminalSetPty :: (MonadIO m, TerminalK a, PtyK b) => a -- _obj -> Maybe (b) -- pty -> m () -- result terminalSetPty _obj pty = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj maybePty <- case pty of Nothing -> return nullPtr Just jPty -> do let jPty' = unsafeManagedPtrCastPtr jPty return jPty' vte_terminal_set_pty _obj' maybePty touchManagedPtr _obj whenJust pty touchManagedPtr return () data TerminalSetPtyMethodInfo instance (signature ~ (Maybe (b) -> m ()), MonadIO m, TerminalK a, PtyK b) => MethodInfo TerminalSetPtyMethodInfo a signature where overloadedMethod _ = terminalSetPty -- method Terminal::set_rewrap_on_resize -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "rewrap", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_rewrap_on_resize" vte_terminal_set_rewrap_on_resize :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" CInt -> -- rewrap : TBasicType TBoolean IO () terminalSetRewrapOnResize :: (MonadIO m, TerminalK a) => a -- _obj -> Bool -- rewrap -> m () -- result terminalSetRewrapOnResize _obj rewrap = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let rewrap' = (fromIntegral . fromEnum) rewrap vte_terminal_set_rewrap_on_resize _obj' rewrap' touchManagedPtr _obj return () data TerminalSetRewrapOnResizeMethodInfo instance (signature ~ (Bool -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSetRewrapOnResizeMethodInfo a signature where overloadedMethod _ = terminalSetRewrapOnResize -- method Terminal::set_scroll_on_keystroke -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "scroll", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_scroll_on_keystroke" vte_terminal_set_scroll_on_keystroke :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" CInt -> -- scroll : TBasicType TBoolean IO () terminalSetScrollOnKeystroke :: (MonadIO m, TerminalK a) => a -- _obj -> Bool -- scroll -> m () -- result terminalSetScrollOnKeystroke _obj scroll = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let scroll' = (fromIntegral . fromEnum) scroll vte_terminal_set_scroll_on_keystroke _obj' scroll' touchManagedPtr _obj return () data TerminalSetScrollOnKeystrokeMethodInfo instance (signature ~ (Bool -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSetScrollOnKeystrokeMethodInfo a signature where overloadedMethod _ = terminalSetScrollOnKeystroke -- method Terminal::set_scroll_on_output -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "scroll", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_scroll_on_output" vte_terminal_set_scroll_on_output :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" CInt -> -- scroll : TBasicType TBoolean IO () terminalSetScrollOnOutput :: (MonadIO m, TerminalK a) => a -- _obj -> Bool -- scroll -> m () -- result terminalSetScrollOnOutput _obj scroll = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let scroll' = (fromIntegral . fromEnum) scroll vte_terminal_set_scroll_on_output _obj' scroll' touchManagedPtr _obj return () data TerminalSetScrollOnOutputMethodInfo instance (signature ~ (Bool -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSetScrollOnOutputMethodInfo a signature where overloadedMethod _ = terminalSetScrollOnOutput -- method Terminal::set_scrollback_lines -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "lines", argType = TBasicType TLong, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_scrollback_lines" vte_terminal_set_scrollback_lines :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" CLong -> -- lines : TBasicType TLong IO () terminalSetScrollbackLines :: (MonadIO m, TerminalK a) => a -- _obj -> CLong -- lines -> m () -- result terminalSetScrollbackLines _obj lines = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj vte_terminal_set_scrollback_lines _obj' lines touchManagedPtr _obj return () data TerminalSetScrollbackLinesMethodInfo instance (signature ~ (CLong -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSetScrollbackLinesMethodInfo a signature where overloadedMethod _ = terminalSetScrollbackLines -- method Terminal::set_size -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "columns", argType = TBasicType TLong, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "rows", argType = TBasicType TLong, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_size" vte_terminal_set_size :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" CLong -> -- columns : TBasicType TLong CLong -> -- rows : TBasicType TLong IO () terminalSetSize :: (MonadIO m, TerminalK a) => a -- _obj -> CLong -- columns -> CLong -- rows -> m () -- result terminalSetSize _obj columns rows = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj vte_terminal_set_size _obj' columns rows touchManagedPtr _obj return () data TerminalSetSizeMethodInfo instance (signature ~ (CLong -> CLong -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSetSizeMethodInfo a signature where overloadedMethod _ = terminalSetSize -- method Terminal::set_word_char_exceptions -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "exceptions", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_set_word_char_exceptions" vte_terminal_set_word_char_exceptions :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" CString -> -- exceptions : TBasicType TUTF8 IO () terminalSetWordCharExceptions :: (MonadIO m, TerminalK a) => a -- _obj -> T.Text -- exceptions -> m () -- result terminalSetWordCharExceptions _obj exceptions = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj exceptions' <- textToCString exceptions vte_terminal_set_word_char_exceptions _obj' exceptions' touchManagedPtr _obj freeMem exceptions' return () data TerminalSetWordCharExceptionsMethodInfo instance (signature ~ (T.Text -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalSetWordCharExceptionsMethodInfo a signature where overloadedMethod _ = terminalSetWordCharExceptions -- method Terminal::spawn_sync -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "pty_flags", argType = TInterface "Vte" "PtyFlags", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "working_directory", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "argv", argType = TCArray True (-1) (-1) (TBasicType TFileName), direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "envv", argType = TCArray True (-1) (-1) (TBasicType TFileName), direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "spawn_flags", argType = TInterface "GLib" "SpawnFlags", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "child_setup", argType = TInterface "GLib" "SpawnChildSetupFunc", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeCall, argClosure = 7, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "child_setup_data", argType = TBasicType TPtr, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "child_pid", argType = TBasicType TInt, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything},Arg {argCName = "cancellable", argType = TInterface "Gio" "Cancellable", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TBoolean) -- throws : True -- Skip return : False foreign import ccall "vte_terminal_spawn_sync" vte_terminal_spawn_sync :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" CUInt -> -- pty_flags : TInterface "Vte" "PtyFlags" CString -> -- working_directory : TBasicType TUTF8 Ptr CString -> -- argv : TCArray True (-1) (-1) (TBasicType TFileName) Ptr CString -> -- envv : TCArray True (-1) (-1) (TBasicType TFileName) CUInt -> -- spawn_flags : TInterface "GLib" "SpawnFlags" FunPtr GLib.SpawnChildSetupFuncC -> -- child_setup : TInterface "GLib" "SpawnChildSetupFunc" Ptr () -> -- child_setup_data : TBasicType TPtr Ptr Int32 -> -- child_pid : TBasicType TInt Ptr Gio.Cancellable -> -- cancellable : TInterface "Gio" "Cancellable" Ptr (Ptr GError) -> -- error IO CInt terminalSpawnSync :: (MonadIO m, TerminalK a, Gio.CancellableK b) => a -- _obj -> [PtyFlags] -- ptyFlags -> Maybe (T.Text) -- workingDirectory -> [[Char]] -- argv -> Maybe ([[Char]]) -- envv -> [GLib.SpawnFlags] -- spawnFlags -> Maybe (GLib.SpawnChildSetupFunc) -- childSetup -> Maybe (b) -- cancellable -> m (Int32) -- result terminalSpawnSync _obj ptyFlags workingDirectory argv envv spawnFlags childSetup cancellable = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let ptyFlags' = gflagsToWord ptyFlags maybeWorkingDirectory <- case workingDirectory of Nothing -> return nullPtr Just jWorkingDirectory -> do jWorkingDirectory' <- textToCString jWorkingDirectory return jWorkingDirectory' argv' <- packZeroTerminatedFileNameArray argv maybeEnvv <- case envv of Nothing -> return nullPtr Just jEnvv -> do jEnvv' <- packZeroTerminatedFileNameArray jEnvv return jEnvv' let spawnFlags' = gflagsToWord spawnFlags maybeChildSetup <- case childSetup of Nothing -> return (castPtrToFunPtr nullPtr) Just jChildSetup -> do jChildSetup' <- GLib.mkSpawnChildSetupFunc (GLib.spawnChildSetupFuncWrapper Nothing jChildSetup) return jChildSetup' childPid <- allocMem :: IO (Ptr Int32) maybeCancellable <- case cancellable of Nothing -> return nullPtr Just jCancellable -> do let jCancellable' = unsafeManagedPtrCastPtr jCancellable return jCancellable' let childSetupData = nullPtr onException (do _ <- propagateGError $ vte_terminal_spawn_sync _obj' ptyFlags' maybeWorkingDirectory argv' maybeEnvv spawnFlags' maybeChildSetup childSetupData childPid maybeCancellable childPid' <- peek childPid safeFreeFunPtr $ castFunPtrToPtr maybeChildSetup touchManagedPtr _obj whenJust cancellable touchManagedPtr freeMem maybeWorkingDirectory mapZeroTerminatedCArray freeMem argv' freeMem argv' mapZeroTerminatedCArray freeMem maybeEnvv freeMem maybeEnvv freeMem childPid return childPid' ) (do safeFreeFunPtr $ castFunPtrToPtr maybeChildSetup freeMem maybeWorkingDirectory mapZeroTerminatedCArray freeMem argv' freeMem argv' mapZeroTerminatedCArray freeMem maybeEnvv freeMem maybeEnvv freeMem childPid ) data TerminalSpawnSyncMethodInfo instance (signature ~ ([PtyFlags] -> Maybe (T.Text) -> [[Char]] -> Maybe ([[Char]]) -> [GLib.SpawnFlags] -> Maybe (GLib.SpawnChildSetupFunc) -> Maybe (b) -> m (Int32)), MonadIO m, TerminalK a, Gio.CancellableK b) => MethodInfo TerminalSpawnSyncMethodInfo a signature where overloadedMethod _ = terminalSpawnSync -- method Terminal::unselect_all -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_unselect_all" vte_terminal_unselect_all :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" IO () terminalUnselectAll :: (MonadIO m, TerminalK a) => a -- _obj -> m () -- result terminalUnselectAll _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj vte_terminal_unselect_all _obj' touchManagedPtr _obj return () data TerminalUnselectAllMethodInfo instance (signature ~ (m ()), MonadIO m, TerminalK a) => MethodInfo TerminalUnselectAllMethodInfo a signature where overloadedMethod _ = terminalUnselectAll -- method Terminal::watch_child -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "child_pid", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Nothing -- throws : False -- Skip return : False foreign import ccall "vte_terminal_watch_child" vte_terminal_watch_child :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" Int32 -> -- child_pid : TBasicType TInt IO () terminalWatchChild :: (MonadIO m, TerminalK a) => a -- _obj -> Int32 -- childPid -> m () -- result terminalWatchChild _obj childPid = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj vte_terminal_watch_child _obj' childPid touchManagedPtr _obj return () data TerminalWatchChildMethodInfo instance (signature ~ (Int32 -> m ()), MonadIO m, TerminalK a) => MethodInfo TerminalWatchChildMethodInfo a signature where overloadedMethod _ = terminalWatchChild -- method Terminal::write_contents_sync -- method type : OrdinaryMethod -- Args : [Arg {argCName = "_obj", argType = TInterface "Vte" "Terminal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "stream", argType = TInterface "Gio" "OutputStream", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "flags", argType = TInterface "Vte" "WriteFlags", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "cancellable", argType = TInterface "Gio" "Cancellable", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] -- returnType : Just (TBasicType TBoolean) -- throws : True -- Skip return : False foreign import ccall "vte_terminal_write_contents_sync" vte_terminal_write_contents_sync :: Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal" Ptr Gio.OutputStream -> -- stream : TInterface "Gio" "OutputStream" CUInt -> -- flags : TInterface "Vte" "WriteFlags" Ptr Gio.Cancellable -> -- cancellable : TInterface "Gio" "Cancellable" Ptr (Ptr GError) -> -- error IO CInt terminalWriteContentsSync :: (MonadIO m, TerminalK a, Gio.OutputStreamK b, Gio.CancellableK c) => a -- _obj -> b -- stream -> WriteFlags -- flags -> Maybe (c) -- cancellable -> m () -- result terminalWriteContentsSync _obj stream flags cancellable = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let stream' = unsafeManagedPtrCastPtr stream let flags' = (fromIntegral . fromEnum) flags maybeCancellable <- case cancellable of Nothing -> return nullPtr Just jCancellable -> do let jCancellable' = unsafeManagedPtrCastPtr jCancellable return jCancellable' onException (do _ <- propagateGError $ vte_terminal_write_contents_sync _obj' stream' flags' maybeCancellable touchManagedPtr _obj touchManagedPtr stream whenJust cancellable touchManagedPtr return () ) (do return () ) data TerminalWriteContentsSyncMethodInfo instance (signature ~ (b -> WriteFlags -> Maybe (c) -> m ()), MonadIO m, TerminalK a, Gio.OutputStreamK b, Gio.CancellableK c) => MethodInfo TerminalWriteContentsSyncMethodInfo a signature where overloadedMethod _ = terminalWriteContentsSync