gi-vte-0.0.42.13: GI/Vte/Objects/Terminal.hs
{- |
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 ,
-- ** AudibleBell
TerminalAudibleBellPropertyInfo ,
constructTerminalAudibleBell ,
getTerminalAudibleBell ,
setTerminalAudibleBell ,
-- ** BackspaceBinding
TerminalBackspaceBindingPropertyInfo ,
constructTerminalBackspaceBinding ,
getTerminalBackspaceBinding ,
setTerminalBackspaceBinding ,
-- ** CjkAmbiguousWidth
TerminalCjkAmbiguousWidthPropertyInfo ,
constructTerminalCjkAmbiguousWidth ,
getTerminalCjkAmbiguousWidth ,
setTerminalCjkAmbiguousWidth ,
-- ** CurrentDirectoryUri
TerminalCurrentDirectoryUriPropertyInfo ,
getTerminalCurrentDirectoryUri ,
-- ** CurrentFileUri
TerminalCurrentFileUriPropertyInfo ,
getTerminalCurrentFileUri ,
-- ** CursorBlinkMode
TerminalCursorBlinkModePropertyInfo ,
constructTerminalCursorBlinkMode ,
getTerminalCursorBlinkMode ,
setTerminalCursorBlinkMode ,
-- ** CursorShape
TerminalCursorShapePropertyInfo ,
constructTerminalCursorShape ,
getTerminalCursorShape ,
setTerminalCursorShape ,
-- ** DeleteBinding
TerminalDeleteBindingPropertyInfo ,
constructTerminalDeleteBinding ,
getTerminalDeleteBinding ,
setTerminalDeleteBinding ,
-- ** Encoding
TerminalEncodingPropertyInfo ,
constructTerminalEncoding ,
getTerminalEncoding ,
setTerminalEncoding ,
-- ** FontDesc
TerminalFontDescPropertyInfo ,
constructTerminalFontDesc ,
getTerminalFontDesc ,
setTerminalFontDesc ,
-- ** FontScale
TerminalFontScalePropertyInfo ,
constructTerminalFontScale ,
getTerminalFontScale ,
setTerminalFontScale ,
-- ** IconTitle
TerminalIconTitlePropertyInfo ,
getTerminalIconTitle ,
-- ** InputEnabled
TerminalInputEnabledPropertyInfo ,
constructTerminalInputEnabled ,
getTerminalInputEnabled ,
setTerminalInputEnabled ,
-- ** PointerAutohide
TerminalPointerAutohidePropertyInfo ,
constructTerminalPointerAutohide ,
getTerminalPointerAutohide ,
setTerminalPointerAutohide ,
-- ** Pty
TerminalPtyPropertyInfo ,
constructTerminalPty ,
getTerminalPty ,
setTerminalPty ,
-- ** RewrapOnResize
TerminalRewrapOnResizePropertyInfo ,
constructTerminalRewrapOnResize ,
getTerminalRewrapOnResize ,
setTerminalRewrapOnResize ,
-- ** ScrollOnKeystroke
TerminalScrollOnKeystrokePropertyInfo ,
constructTerminalScrollOnKeystroke ,
getTerminalScrollOnKeystroke ,
setTerminalScrollOnKeystroke ,
-- ** ScrollOnOutput
TerminalScrollOnOutputPropertyInfo ,
constructTerminalScrollOnOutput ,
getTerminalScrollOnOutput ,
setTerminalScrollOnOutput ,
-- ** ScrollbackLines
TerminalScrollbackLinesPropertyInfo ,
constructTerminalScrollbackLines ,
getTerminalScrollbackLines ,
setTerminalScrollbackLines ,
-- ** WindowTitle
TerminalWindowTitlePropertyInfo ,
getTerminalWindowTitle ,
-- ** WordCharExceptions
TerminalWordCharExceptionsPropertyInfo ,
getTerminalWordCharExceptions ,
-- * 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 Prelude ()
import Data.GI.Base.ShortPrelude
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]
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
-- VVV Prop "audible-bell"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
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
-- VVV Prop "backspace-binding"
-- Type: TInterface "Vte" "EraseBinding"
-- Flags: [PropertyReadable,PropertyWritable]
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
-- VVV Prop "cjk-ambiguous-width"
-- Type: TBasicType TInt32
-- Flags: [PropertyReadable,PropertyWritable]
getTerminalCjkAmbiguousWidth :: (MonadIO m, TerminalK o) => o -> m Int32
getTerminalCjkAmbiguousWidth obj = liftIO $ getObjectPropertyCInt obj "cjk-ambiguous-width"
setTerminalCjkAmbiguousWidth :: (MonadIO m, TerminalK o) => o -> Int32 -> m ()
setTerminalCjkAmbiguousWidth obj val = liftIO $ setObjectPropertyCInt obj "cjk-ambiguous-width" val
constructTerminalCjkAmbiguousWidth :: Int32 -> IO ([Char], GValue)
constructTerminalCjkAmbiguousWidth val = constructObjectPropertyCInt "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
-- VVV Prop "current-directory-uri"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable]
getTerminalCurrentDirectoryUri :: (MonadIO m, TerminalK o) => o -> m T.Text
getTerminalCurrentDirectoryUri obj = liftIO $ getObjectPropertyString obj "current-directory-uri"
data TerminalCurrentDirectoryUriPropertyInfo
instance AttrInfo TerminalCurrentDirectoryUriPropertyInfo where
type AttrAllowedOps TerminalCurrentDirectoryUriPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint TerminalCurrentDirectoryUriPropertyInfo = (~) ()
type AttrBaseTypeConstraint TerminalCurrentDirectoryUriPropertyInfo = TerminalK
type AttrGetType TerminalCurrentDirectoryUriPropertyInfo = T.Text
type AttrLabel TerminalCurrentDirectoryUriPropertyInfo = "current-directory-uri"
attrGet _ = getTerminalCurrentDirectoryUri
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "current-file-uri"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable]
getTerminalCurrentFileUri :: (MonadIO m, TerminalK o) => o -> m T.Text
getTerminalCurrentFileUri obj = liftIO $ getObjectPropertyString obj "current-file-uri"
data TerminalCurrentFileUriPropertyInfo
instance AttrInfo TerminalCurrentFileUriPropertyInfo where
type AttrAllowedOps TerminalCurrentFileUriPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint TerminalCurrentFileUriPropertyInfo = (~) ()
type AttrBaseTypeConstraint TerminalCurrentFileUriPropertyInfo = TerminalK
type AttrGetType TerminalCurrentFileUriPropertyInfo = T.Text
type AttrLabel TerminalCurrentFileUriPropertyInfo = "current-file-uri"
attrGet _ = getTerminalCurrentFileUri
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "cursor-blink-mode"
-- Type: TInterface "Vte" "CursorBlinkMode"
-- Flags: [PropertyReadable,PropertyWritable]
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
-- VVV Prop "cursor-shape"
-- Type: TInterface "Vte" "CursorShape"
-- Flags: [PropertyReadable,PropertyWritable]
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
-- VVV Prop "delete-binding"
-- Type: TInterface "Vte" "EraseBinding"
-- Flags: [PropertyReadable,PropertyWritable]
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
-- VVV Prop "encoding"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable,PropertyWritable]
getTerminalEncoding :: (MonadIO m, TerminalK o) => o -> m T.Text
getTerminalEncoding obj = liftIO $ getObjectPropertyString obj "encoding"
setTerminalEncoding :: (MonadIO m, TerminalK o) => o -> T.Text -> m ()
setTerminalEncoding obj val = liftIO $ setObjectPropertyString obj "encoding" val
constructTerminalEncoding :: T.Text -> IO ([Char], GValue)
constructTerminalEncoding val = constructObjectPropertyString "encoding" val
data TerminalEncodingPropertyInfo
instance AttrInfo TerminalEncodingPropertyInfo where
type AttrAllowedOps TerminalEncodingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint TerminalEncodingPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint TerminalEncodingPropertyInfo = TerminalK
type AttrGetType TerminalEncodingPropertyInfo = T.Text
type AttrLabel TerminalEncodingPropertyInfo = "encoding"
attrGet _ = getTerminalEncoding
attrSet _ = setTerminalEncoding
attrConstruct _ = constructTerminalEncoding
-- VVV Prop "font-desc"
-- Type: TInterface "Pango" "FontDescription"
-- Flags: [PropertyReadable,PropertyWritable]
getTerminalFontDesc :: (MonadIO m, TerminalK o) => o -> m 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" val
constructTerminalFontDesc :: Pango.FontDescription -> IO ([Char], GValue)
constructTerminalFontDesc val = constructObjectPropertyBoxed "font-desc" val
data TerminalFontDescPropertyInfo
instance AttrInfo TerminalFontDescPropertyInfo where
type AttrAllowedOps TerminalFontDescPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint TerminalFontDescPropertyInfo = (~) Pango.FontDescription
type AttrBaseTypeConstraint TerminalFontDescPropertyInfo = TerminalK
type AttrGetType TerminalFontDescPropertyInfo = Pango.FontDescription
type AttrLabel TerminalFontDescPropertyInfo = "font-desc"
attrGet _ = getTerminalFontDesc
attrSet _ = setTerminalFontDesc
attrConstruct _ = constructTerminalFontDesc
-- VVV Prop "font-scale"
-- Type: TBasicType TDouble
-- Flags: [PropertyReadable,PropertyWritable]
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
-- VVV Prop "icon-title"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable]
getTerminalIconTitle :: (MonadIO m, TerminalK o) => o -> m T.Text
getTerminalIconTitle obj = liftIO $ getObjectPropertyString obj "icon-title"
data TerminalIconTitlePropertyInfo
instance AttrInfo TerminalIconTitlePropertyInfo where
type AttrAllowedOps TerminalIconTitlePropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint TerminalIconTitlePropertyInfo = (~) ()
type AttrBaseTypeConstraint TerminalIconTitlePropertyInfo = TerminalK
type AttrGetType TerminalIconTitlePropertyInfo = T.Text
type AttrLabel TerminalIconTitlePropertyInfo = "icon-title"
attrGet _ = getTerminalIconTitle
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "input-enabled"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
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
-- VVV Prop "pointer-autohide"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
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
-- VVV Prop "pty"
-- Type: TInterface "Vte" "Pty"
-- Flags: [PropertyReadable,PropertyWritable]
getTerminalPty :: (MonadIO m, TerminalK o) => o -> m Pty
getTerminalPty obj = liftIO $ getObjectPropertyObject obj "pty" Pty
setTerminalPty :: (MonadIO m, TerminalK o, PtyK a) => o -> a -> m ()
setTerminalPty obj val = liftIO $ setObjectPropertyObject obj "pty" val
constructTerminalPty :: (PtyK a) => a -> IO ([Char], GValue)
constructTerminalPty val = constructObjectPropertyObject "pty" val
data TerminalPtyPropertyInfo
instance AttrInfo TerminalPtyPropertyInfo where
type AttrAllowedOps TerminalPtyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint TerminalPtyPropertyInfo = PtyK
type AttrBaseTypeConstraint TerminalPtyPropertyInfo = TerminalK
type AttrGetType TerminalPtyPropertyInfo = Pty
type AttrLabel TerminalPtyPropertyInfo = "pty"
attrGet _ = getTerminalPty
attrSet _ = setTerminalPty
attrConstruct _ = constructTerminalPty
-- VVV Prop "rewrap-on-resize"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
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
-- VVV Prop "scroll-on-keystroke"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
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
-- VVV Prop "scroll-on-output"
-- Type: TBasicType TBoolean
-- Flags: [PropertyReadable,PropertyWritable]
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
-- VVV Prop "scrollback-lines"
-- Type: TBasicType TUInt32
-- Flags: [PropertyReadable,PropertyWritable]
getTerminalScrollbackLines :: (MonadIO m, TerminalK o) => o -> m Word32
getTerminalScrollbackLines obj = liftIO $ getObjectPropertyCUInt obj "scrollback-lines"
setTerminalScrollbackLines :: (MonadIO m, TerminalK o) => o -> Word32 -> m ()
setTerminalScrollbackLines obj val = liftIO $ setObjectPropertyCUInt obj "scrollback-lines" val
constructTerminalScrollbackLines :: Word32 -> IO ([Char], GValue)
constructTerminalScrollbackLines val = constructObjectPropertyCUInt "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
-- VVV Prop "window-title"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable]
getTerminalWindowTitle :: (MonadIO m, TerminalK o) => o -> m T.Text
getTerminalWindowTitle obj = liftIO $ getObjectPropertyString obj "window-title"
data TerminalWindowTitlePropertyInfo
instance AttrInfo TerminalWindowTitlePropertyInfo where
type AttrAllowedOps TerminalWindowTitlePropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint TerminalWindowTitlePropertyInfo = (~) ()
type AttrBaseTypeConstraint TerminalWindowTitlePropertyInfo = TerminalK
type AttrGetType TerminalWindowTitlePropertyInfo = T.Text
type AttrLabel TerminalWindowTitlePropertyInfo = "window-title"
attrGet _ = getTerminalWindowTitle
attrSet _ = undefined
attrConstruct _ = undefined
-- VVV Prop "word-char-exceptions"
-- Type: TBasicType TUTF8
-- Flags: [PropertyReadable]
getTerminalWordCharExceptions :: (MonadIO m, TerminalK o) => o -> m T.Text
getTerminalWordCharExceptions obj = liftIO $ 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
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, *)])
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 : 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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 : 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 : 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 : TBasicType TInt64
-- 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 Int64
terminalGetCharHeight ::
(MonadIO m, TerminalK a) =>
a -- _obj
-> m Int64 -- 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 Int64), 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 : TBasicType TInt64
-- 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 Int64
terminalGetCharWidth ::
(MonadIO m, TerminalK a) =>
a -- _obj
-> m Int64 -- 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 Int64), 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 : TBasicType TInt32
-- 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 : TBasicType TInt64
-- 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 Int64
terminalGetColumnCount ::
(MonadIO m, TerminalK a) =>
a -- _obj
-> m Int64 -- 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 Int64), 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 : 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 : 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 : 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 TInt64, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything},Arg {argCName = "row", argType = TBasicType TInt64, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything}]
-- Lengths : []
-- returnType : TBasicType TVoid
-- 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 Int64 -> -- column : TBasicType TInt64
Ptr Int64 -> -- row : TBasicType TInt64
IO ()
terminalGetCursorPosition ::
(MonadIO m, TerminalK a) =>
a -- _obj
-> m (Int64,Int64) -- result
terminalGetCursorPosition _obj = liftIO $ do
let _obj' = unsafeManagedPtrCastPtr _obj
column <- allocMem :: IO (Ptr Int64)
row <- allocMem :: IO (Ptr Int64)
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 (Int64,Int64)), 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 : 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 : 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 : 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 : 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 TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "min_columns", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TVoid
-- 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 TInt32
Int32 -> -- min_columns : TBasicType TInt32
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 : 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 : 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 : 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 : 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 : 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 : 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 : TBasicType TInt64
-- 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 Int64
terminalGetRowCount ::
(MonadIO m, TerminalK a) =>
a -- _obj
-> m Int64 -- 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 Int64), 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 TVoid, 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 : 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 TVoid
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 TVoid, 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 : 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 TVoid
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 TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "start_col", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "end_row", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "end_col", argType = TBasicType TInt64, 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 TVoid, 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 : 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"
Int64 -> -- start_row : TBasicType TInt64
Int64 -> -- start_col : TBasicType TInt64
Int64 -> -- end_row : TBasicType TInt64
Int64 -> -- end_col : TBasicType TInt64
FunPtr SelectionFuncC -> -- is_selected : TInterface "Vte" "SelectionFunc"
Ptr () -> -- user_data : TBasicType TVoid
Ptr (Ptr (GArray (Ptr CharAttributes))) -> -- attributes : TGArray (TInterface "Vte" "CharAttributes")
IO CString
terminalGetTextRange ::
(MonadIO m, TerminalK a) =>
a -- _obj
-> Int64 -- startRow
-> Int64 -- startCol
-> Int64 -- endRow
-> Int64 -- 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 ~ (Int64 -> Int64 -> Int64 -> Int64 -> 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 : 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 : 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 : TBasicType TInt32
-- 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 TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "row", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "tag", argType = TBasicType TInt32, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything}]
-- Lengths : []
-- returnType : TBasicType TUTF8
-- throws : False
-- Skip return : False
foreign import ccall "vte_terminal_match_check" vte_terminal_match_check ::
Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal"
Int64 -> -- column : TBasicType TInt64
Int64 -> -- row : TBasicType TInt64
Ptr Int32 -> -- tag : TBasicType TInt32
IO CString
terminalMatchCheck ::
(MonadIO m, TerminalK a) =>
a -- _obj
-> Int64 -- column
-> Int64 -- 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 ~ (Int64 -> Int64 -> 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 TInt32, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything}]
-- Lengths : []
-- returnType : 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 TInt32
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 TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TVoid
-- 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 TInt32
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 : TBasicType TVoid
-- 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 TInt32, 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 : TBasicType TVoid
-- 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 TInt32
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 TInt32, 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 : TBasicType TVoid
-- 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 TInt32
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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 : 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 : TBasicType TVoid
-- 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 : 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 : 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 : 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 : 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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TVoid
-- 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 TInt32
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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 : 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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 : TBasicType TVoid
-- 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 TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "vte_terminal_set_scrollback_lines" vte_terminal_set_scrollback_lines ::
Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal"
Int64 -> -- lines : TBasicType TInt64
IO ()
terminalSetScrollbackLines ::
(MonadIO m, TerminalK a) =>
a -- _obj
-> Int64 -- 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 ~ (Int64 -> 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 TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "rows", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False
foreign import ccall "vte_terminal_set_size" vte_terminal_set_size ::
Ptr Terminal -> -- _obj : TInterface "Vte" "Terminal"
Int64 -> -- columns : TBasicType TInt64
Int64 -> -- rows : TBasicType TInt64
IO ()
terminalSetSize ::
(MonadIO m, TerminalK a) =>
a -- _obj
-> Int64 -- columns
-> Int64 -- 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 ~ (Int64 -> Int64 -> 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 : TBasicType TVoid
-- 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 TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "child_pid", argType = TBasicType TInt32, 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 : 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 TVoid
Ptr Int32 -> -- child_pid : TBasicType TInt32
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 : TBasicType TVoid
-- 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 TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TVoid
-- 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 TInt32
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 : 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