{-# LANGUAGE TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.Gtk.Objects.SearchEntry
(
SearchEntry(..) ,
IsSearchEntry ,
toSearchEntry ,
noSearchEntry ,
#if defined(ENABLE_OVERLOADING)
ResolveSearchEntryMethod ,
#endif
#if defined(ENABLE_OVERLOADING)
SearchEntryGetKeyCaptureWidgetMethodInfo,
#endif
searchEntryGetKeyCaptureWidget ,
searchEntryNew ,
#if defined(ENABLE_OVERLOADING)
SearchEntrySetKeyCaptureWidgetMethodInfo,
#endif
searchEntrySetKeyCaptureWidget ,
#if defined(ENABLE_OVERLOADING)
SearchEntryActivatesDefaultPropertyInfo ,
#endif
constructSearchEntryActivatesDefault ,
getSearchEntryActivatesDefault ,
#if defined(ENABLE_OVERLOADING)
searchEntryActivatesDefault ,
#endif
setSearchEntryActivatesDefault ,
#if defined(ENABLE_OVERLOADING)
SearchEntryPlaceholderTextPropertyInfo ,
#endif
clearSearchEntryPlaceholderText ,
constructSearchEntryPlaceholderText ,
getSearchEntryPlaceholderText ,
#if defined(ENABLE_OVERLOADING)
searchEntryPlaceholderText ,
#endif
setSearchEntryPlaceholderText ,
C_SearchEntryActivateCallback ,
SearchEntryActivateCallback ,
#if defined(ENABLE_OVERLOADING)
SearchEntryActivateSignalInfo ,
#endif
afterSearchEntryActivate ,
genClosure_SearchEntryActivate ,
mk_SearchEntryActivateCallback ,
noSearchEntryActivateCallback ,
onSearchEntryActivate ,
wrap_SearchEntryActivateCallback ,
C_SearchEntryNextMatchCallback ,
SearchEntryNextMatchCallback ,
#if defined(ENABLE_OVERLOADING)
SearchEntryNextMatchSignalInfo ,
#endif
afterSearchEntryNextMatch ,
genClosure_SearchEntryNextMatch ,
mk_SearchEntryNextMatchCallback ,
noSearchEntryNextMatchCallback ,
onSearchEntryNextMatch ,
wrap_SearchEntryNextMatchCallback ,
C_SearchEntryPreviousMatchCallback ,
SearchEntryPreviousMatchCallback ,
#if defined(ENABLE_OVERLOADING)
SearchEntryPreviousMatchSignalInfo ,
#endif
afterSearchEntryPreviousMatch ,
genClosure_SearchEntryPreviousMatch ,
mk_SearchEntryPreviousMatchCallback ,
noSearchEntryPreviousMatchCallback ,
onSearchEntryPreviousMatch ,
wrap_SearchEntryPreviousMatchCallback ,
C_SearchEntrySearchChangedCallback ,
SearchEntrySearchChangedCallback ,
#if defined(ENABLE_OVERLOADING)
SearchEntrySearchChangedSignalInfo ,
#endif
afterSearchEntrySearchChanged ,
genClosure_SearchEntrySearchChanged ,
mk_SearchEntrySearchChangedCallback ,
noSearchEntrySearchChangedCallback ,
onSearchEntrySearchChanged ,
wrap_SearchEntrySearchChangedCallback ,
C_SearchEntrySearchStartedCallback ,
SearchEntrySearchStartedCallback ,
#if defined(ENABLE_OVERLOADING)
SearchEntrySearchStartedSignalInfo ,
#endif
afterSearchEntrySearchStarted ,
genClosure_SearchEntrySearchStarted ,
mk_SearchEntrySearchStartedCallback ,
noSearchEntrySearchStartedCallback ,
onSearchEntrySearchStarted ,
wrap_SearchEntrySearchStartedCallback ,
C_SearchEntryStopSearchCallback ,
SearchEntryStopSearchCallback ,
#if defined(ENABLE_OVERLOADING)
SearchEntryStopSearchSignalInfo ,
#endif
afterSearchEntryStopSearch ,
genClosure_SearchEntryStopSearch ,
mk_SearchEntryStopSearchCallback ,
noSearchEntryStopSearchCallback ,
onSearchEntryStopSearch ,
wrap_SearchEntryStopSearchCallback ,
) where
import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P
import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
import qualified Data.GI.Base.Signals as B.Signals
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GHC.OverloadedLabels as OL
import qualified GI.Atk.Interfaces.ImplementorIface as Atk.ImplementorIface
import qualified GI.GObject.Objects.Object as GObject.Object
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Buildable as Gtk.Buildable
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Editable as Gtk.Editable
import {-# SOURCE #-} qualified GI.Gtk.Objects.Widget as Gtk.Widget
newtype SearchEntry = SearchEntry (ManagedPtr SearchEntry)
deriving (SearchEntry -> SearchEntry -> Bool
(SearchEntry -> SearchEntry -> Bool)
-> (SearchEntry -> SearchEntry -> Bool) -> Eq SearchEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: SearchEntry -> SearchEntry -> Bool
$c/= :: SearchEntry -> SearchEntry -> Bool
== :: SearchEntry -> SearchEntry -> Bool
$c== :: SearchEntry -> SearchEntry -> Bool
Eq)
foreign import ccall "gtk_search_entry_get_type"
c_gtk_search_entry_get_type :: IO GType
instance GObject SearchEntry where
gobjectType :: IO GType
gobjectType = IO GType
c_gtk_search_entry_get_type
instance B.GValue.IsGValue SearchEntry where
toGValue :: SearchEntry -> IO GValue
toGValue o :: SearchEntry
o = do
GType
gtype <- IO GType
c_gtk_search_entry_get_type
SearchEntry -> (Ptr SearchEntry -> IO GValue) -> IO GValue
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr SearchEntry
o (GType
-> (GValue -> Ptr SearchEntry -> IO ())
-> Ptr SearchEntry
-> IO GValue
forall a. GType -> (GValue -> a -> IO ()) -> a -> IO GValue
B.GValue.buildGValue GType
gtype GValue -> Ptr SearchEntry -> IO ()
forall a. GObject a => GValue -> Ptr a -> IO ()
B.GValue.set_object)
fromGValue :: GValue -> IO SearchEntry
fromGValue gv :: GValue
gv = do
Ptr SearchEntry
ptr <- GValue -> IO (Ptr SearchEntry)
forall b. GObject b => GValue -> IO (Ptr b)
B.GValue.get_object GValue
gv :: IO (Ptr SearchEntry)
(ManagedPtr SearchEntry -> SearchEntry)
-> Ptr SearchEntry -> IO SearchEntry
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr SearchEntry -> SearchEntry
SearchEntry Ptr SearchEntry
ptr
class (GObject o, O.IsDescendantOf SearchEntry o) => IsSearchEntry o
instance (GObject o, O.IsDescendantOf SearchEntry o) => IsSearchEntry o
instance O.HasParentTypes SearchEntry
type instance O.ParentTypes SearchEntry = '[Gtk.Widget.Widget, GObject.Object.Object, Atk.ImplementorIface.ImplementorIface, Gtk.Buildable.Buildable, Gtk.Editable.Editable]
toSearchEntry :: (MonadIO m, IsSearchEntry o) => o -> m SearchEntry
toSearchEntry :: o -> m SearchEntry
toSearchEntry = IO SearchEntry -> m SearchEntry
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SearchEntry -> m SearchEntry)
-> (o -> IO SearchEntry) -> o -> m SearchEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr SearchEntry -> SearchEntry) -> o -> IO SearchEntry
forall o o'.
(HasCallStack, GObject o, GObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
unsafeCastTo ManagedPtr SearchEntry -> SearchEntry
SearchEntry
noSearchEntry :: Maybe SearchEntry
noSearchEntry :: Maybe SearchEntry
noSearchEntry = Maybe SearchEntry
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
type family ResolveSearchEntryMethod (t :: Symbol) (o :: *) :: * where
ResolveSearchEntryMethod "activate" o = Gtk.Widget.WidgetActivateMethodInfo
ResolveSearchEntryMethod "activateAction" o = Gtk.Widget.WidgetActivateActionMethodInfo
ResolveSearchEntryMethod "activateDefault" o = Gtk.Widget.WidgetActivateDefaultMethodInfo
ResolveSearchEntryMethod "addAccelerator" o = Gtk.Widget.WidgetAddAcceleratorMethodInfo
ResolveSearchEntryMethod "addChild" o = Gtk.Buildable.BuildableAddChildMethodInfo
ResolveSearchEntryMethod "addController" o = Gtk.Widget.WidgetAddControllerMethodInfo
ResolveSearchEntryMethod "addMnemonicLabel" o = Gtk.Widget.WidgetAddMnemonicLabelMethodInfo
ResolveSearchEntryMethod "addTickCallback" o = Gtk.Widget.WidgetAddTickCallbackMethodInfo
ResolveSearchEntryMethod "allocate" o = Gtk.Widget.WidgetAllocateMethodInfo
ResolveSearchEntryMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveSearchEntryMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveSearchEntryMethod "canActivateAccel" o = Gtk.Widget.WidgetCanActivateAccelMethodInfo
ResolveSearchEntryMethod "childFocus" o = Gtk.Widget.WidgetChildFocusMethodInfo
ResolveSearchEntryMethod "computeBounds" o = Gtk.Widget.WidgetComputeBoundsMethodInfo
ResolveSearchEntryMethod "computeExpand" o = Gtk.Widget.WidgetComputeExpandMethodInfo
ResolveSearchEntryMethod "computePoint" o = Gtk.Widget.WidgetComputePointMethodInfo
ResolveSearchEntryMethod "computeTransform" o = Gtk.Widget.WidgetComputeTransformMethodInfo
ResolveSearchEntryMethod "constructChild" o = Gtk.Buildable.BuildableConstructChildMethodInfo
ResolveSearchEntryMethod "contains" o = Gtk.Widget.WidgetContainsMethodInfo
ResolveSearchEntryMethod "createPangoContext" o = Gtk.Widget.WidgetCreatePangoContextMethodInfo
ResolveSearchEntryMethod "createPangoLayout" o = Gtk.Widget.WidgetCreatePangoLayoutMethodInfo
ResolveSearchEntryMethod "customFinished" o = Gtk.Buildable.BuildableCustomFinishedMethodInfo
ResolveSearchEntryMethod "customTagEnd" o = Gtk.Buildable.BuildableCustomTagEndMethodInfo
ResolveSearchEntryMethod "customTagStart" o = Gtk.Buildable.BuildableCustomTagStartMethodInfo
ResolveSearchEntryMethod "deleteSelection" o = Gtk.Editable.EditableDeleteSelectionMethodInfo
ResolveSearchEntryMethod "deleteText" o = Gtk.Editable.EditableDeleteTextMethodInfo
ResolveSearchEntryMethod "destroy" o = Gtk.Widget.WidgetDestroyMethodInfo
ResolveSearchEntryMethod "destroyed" o = Gtk.Widget.WidgetDestroyedMethodInfo
ResolveSearchEntryMethod "deviceIsShadowed" o = Gtk.Widget.WidgetDeviceIsShadowedMethodInfo
ResolveSearchEntryMethod "dragBegin" o = Gtk.Widget.WidgetDragBeginMethodInfo
ResolveSearchEntryMethod "dragCheckThreshold" o = Gtk.Widget.WidgetDragCheckThresholdMethodInfo
ResolveSearchEntryMethod "dragDestAddImageTargets" o = Gtk.Widget.WidgetDragDestAddImageTargetsMethodInfo
ResolveSearchEntryMethod "dragDestAddTextTargets" o = Gtk.Widget.WidgetDragDestAddTextTargetsMethodInfo
ResolveSearchEntryMethod "dragDestAddUriTargets" o = Gtk.Widget.WidgetDragDestAddUriTargetsMethodInfo
ResolveSearchEntryMethod "dragDestFindTarget" o = Gtk.Widget.WidgetDragDestFindTargetMethodInfo
ResolveSearchEntryMethod "dragDestGetTargetList" o = Gtk.Widget.WidgetDragDestGetTargetListMethodInfo
ResolveSearchEntryMethod "dragDestGetTrackMotion" o = Gtk.Widget.WidgetDragDestGetTrackMotionMethodInfo
ResolveSearchEntryMethod "dragDestSet" o = Gtk.Widget.WidgetDragDestSetMethodInfo
ResolveSearchEntryMethod "dragDestSetTargetList" o = Gtk.Widget.WidgetDragDestSetTargetListMethodInfo
ResolveSearchEntryMethod "dragDestSetTrackMotion" o = Gtk.Widget.WidgetDragDestSetTrackMotionMethodInfo
ResolveSearchEntryMethod "dragDestUnset" o = Gtk.Widget.WidgetDragDestUnsetMethodInfo
ResolveSearchEntryMethod "dragGetData" o = Gtk.Widget.WidgetDragGetDataMethodInfo
ResolveSearchEntryMethod "dragHighlight" o = Gtk.Widget.WidgetDragHighlightMethodInfo
ResolveSearchEntryMethod "dragSourceAddImageTargets" o = Gtk.Widget.WidgetDragSourceAddImageTargetsMethodInfo
ResolveSearchEntryMethod "dragSourceAddTextTargets" o = Gtk.Widget.WidgetDragSourceAddTextTargetsMethodInfo
ResolveSearchEntryMethod "dragSourceAddUriTargets" o = Gtk.Widget.WidgetDragSourceAddUriTargetsMethodInfo
ResolveSearchEntryMethod "dragSourceGetTargetList" o = Gtk.Widget.WidgetDragSourceGetTargetListMethodInfo
ResolveSearchEntryMethod "dragSourceSet" o = Gtk.Widget.WidgetDragSourceSetMethodInfo
ResolveSearchEntryMethod "dragSourceSetIconGicon" o = Gtk.Widget.WidgetDragSourceSetIconGiconMethodInfo
ResolveSearchEntryMethod "dragSourceSetIconName" o = Gtk.Widget.WidgetDragSourceSetIconNameMethodInfo
ResolveSearchEntryMethod "dragSourceSetIconPaintable" o = Gtk.Widget.WidgetDragSourceSetIconPaintableMethodInfo
ResolveSearchEntryMethod "dragSourceSetTargetList" o = Gtk.Widget.WidgetDragSourceSetTargetListMethodInfo
ResolveSearchEntryMethod "dragSourceUnset" o = Gtk.Widget.WidgetDragSourceUnsetMethodInfo
ResolveSearchEntryMethod "dragUnhighlight" o = Gtk.Widget.WidgetDragUnhighlightMethodInfo
ResolveSearchEntryMethod "errorBell" o = Gtk.Widget.WidgetErrorBellMethodInfo
ResolveSearchEntryMethod "event" o = Gtk.Widget.WidgetEventMethodInfo
ResolveSearchEntryMethod "finishDelegate" o = Gtk.Editable.EditableFinishDelegateMethodInfo
ResolveSearchEntryMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveSearchEntryMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveSearchEntryMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveSearchEntryMethod "grabAdd" o = Gtk.Widget.WidgetGrabAddMethodInfo
ResolveSearchEntryMethod "grabFocus" o = Gtk.Widget.WidgetGrabFocusMethodInfo
ResolveSearchEntryMethod "grabRemove" o = Gtk.Widget.WidgetGrabRemoveMethodInfo
ResolveSearchEntryMethod "hasDefault" o = Gtk.Widget.WidgetHasDefaultMethodInfo
ResolveSearchEntryMethod "hasFocus" o = Gtk.Widget.WidgetHasFocusMethodInfo
ResolveSearchEntryMethod "hasGrab" o = Gtk.Widget.WidgetHasGrabMethodInfo
ResolveSearchEntryMethod "hasVisibleFocus" o = Gtk.Widget.WidgetHasVisibleFocusMethodInfo
ResolveSearchEntryMethod "hide" o = Gtk.Widget.WidgetHideMethodInfo
ResolveSearchEntryMethod "inDestruction" o = Gtk.Widget.WidgetInDestructionMethodInfo
ResolveSearchEntryMethod "initDelegate" o = Gtk.Editable.EditableInitDelegateMethodInfo
ResolveSearchEntryMethod "initTemplate" o = Gtk.Widget.WidgetInitTemplateMethodInfo
ResolveSearchEntryMethod "inputShapeCombineRegion" o = Gtk.Widget.WidgetInputShapeCombineRegionMethodInfo
ResolveSearchEntryMethod "insertActionGroup" o = Gtk.Widget.WidgetInsertActionGroupMethodInfo
ResolveSearchEntryMethod "insertAfter" o = Gtk.Widget.WidgetInsertAfterMethodInfo
ResolveSearchEntryMethod "insertBefore" o = Gtk.Widget.WidgetInsertBeforeMethodInfo
ResolveSearchEntryMethod "insertText" o = Gtk.Editable.EditableInsertTextMethodInfo
ResolveSearchEntryMethod "isAncestor" o = Gtk.Widget.WidgetIsAncestorMethodInfo
ResolveSearchEntryMethod "isDrawable" o = Gtk.Widget.WidgetIsDrawableMethodInfo
ResolveSearchEntryMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveSearchEntryMethod "isFocus" o = Gtk.Widget.WidgetIsFocusMethodInfo
ResolveSearchEntryMethod "isSensitive" o = Gtk.Widget.WidgetIsSensitiveMethodInfo
ResolveSearchEntryMethod "isToplevel" o = Gtk.Widget.WidgetIsToplevelMethodInfo
ResolveSearchEntryMethod "isVisible" o = Gtk.Widget.WidgetIsVisibleMethodInfo
ResolveSearchEntryMethod "keynavFailed" o = Gtk.Widget.WidgetKeynavFailedMethodInfo
ResolveSearchEntryMethod "listAccelClosures" o = Gtk.Widget.WidgetListAccelClosuresMethodInfo
ResolveSearchEntryMethod "listActionPrefixes" o = Gtk.Widget.WidgetListActionPrefixesMethodInfo
ResolveSearchEntryMethod "listMnemonicLabels" o = Gtk.Widget.WidgetListMnemonicLabelsMethodInfo
ResolveSearchEntryMethod "map" o = Gtk.Widget.WidgetMapMethodInfo
ResolveSearchEntryMethod "measure" o = Gtk.Widget.WidgetMeasureMethodInfo
ResolveSearchEntryMethod "mnemonicActivate" o = Gtk.Widget.WidgetMnemonicActivateMethodInfo
ResolveSearchEntryMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveSearchEntryMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveSearchEntryMethod "observeChildren" o = Gtk.Widget.WidgetObserveChildrenMethodInfo
ResolveSearchEntryMethod "observeControllers" o = Gtk.Widget.WidgetObserveControllersMethodInfo
ResolveSearchEntryMethod "parserFinished" o = Gtk.Buildable.BuildableParserFinishedMethodInfo
ResolveSearchEntryMethod "pick" o = Gtk.Widget.WidgetPickMethodInfo
ResolveSearchEntryMethod "queueAllocate" o = Gtk.Widget.WidgetQueueAllocateMethodInfo
ResolveSearchEntryMethod "queueComputeExpand" o = Gtk.Widget.WidgetQueueComputeExpandMethodInfo
ResolveSearchEntryMethod "queueDraw" o = Gtk.Widget.WidgetQueueDrawMethodInfo
ResolveSearchEntryMethod "queueResize" o = Gtk.Widget.WidgetQueueResizeMethodInfo
ResolveSearchEntryMethod "queueResizeNoRedraw" o = Gtk.Widget.WidgetQueueResizeNoRedrawMethodInfo
ResolveSearchEntryMethod "realize" o = Gtk.Widget.WidgetRealizeMethodInfo
ResolveSearchEntryMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveSearchEntryMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveSearchEntryMethod "registerSurface" o = Gtk.Widget.WidgetRegisterSurfaceMethodInfo
ResolveSearchEntryMethod "removeAccelerator" o = Gtk.Widget.WidgetRemoveAcceleratorMethodInfo
ResolveSearchEntryMethod "removeController" o = Gtk.Widget.WidgetRemoveControllerMethodInfo
ResolveSearchEntryMethod "removeMnemonicLabel" o = Gtk.Widget.WidgetRemoveMnemonicLabelMethodInfo
ResolveSearchEntryMethod "removeTickCallback" o = Gtk.Widget.WidgetRemoveTickCallbackMethodInfo
ResolveSearchEntryMethod "resetStyle" o = Gtk.Widget.WidgetResetStyleMethodInfo
ResolveSearchEntryMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveSearchEntryMethod "selectRegion" o = Gtk.Editable.EditableSelectRegionMethodInfo
ResolveSearchEntryMethod "show" o = Gtk.Widget.WidgetShowMethodInfo
ResolveSearchEntryMethod "sizeAllocate" o = Gtk.Widget.WidgetSizeAllocateMethodInfo
ResolveSearchEntryMethod "snapshotChild" o = Gtk.Widget.WidgetSnapshotChildMethodInfo
ResolveSearchEntryMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveSearchEntryMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveSearchEntryMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveSearchEntryMethod "translateCoordinates" o = Gtk.Widget.WidgetTranslateCoordinatesMethodInfo
ResolveSearchEntryMethod "triggerTooltipQuery" o = Gtk.Widget.WidgetTriggerTooltipQueryMethodInfo
ResolveSearchEntryMethod "unmap" o = Gtk.Widget.WidgetUnmapMethodInfo
ResolveSearchEntryMethod "unparent" o = Gtk.Widget.WidgetUnparentMethodInfo
ResolveSearchEntryMethod "unrealize" o = Gtk.Widget.WidgetUnrealizeMethodInfo
ResolveSearchEntryMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveSearchEntryMethod "unregisterSurface" o = Gtk.Widget.WidgetUnregisterSurfaceMethodInfo
ResolveSearchEntryMethod "unsetStateFlags" o = Gtk.Widget.WidgetUnsetStateFlagsMethodInfo
ResolveSearchEntryMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveSearchEntryMethod "getAccessible" o = Gtk.Widget.WidgetGetAccessibleMethodInfo
ResolveSearchEntryMethod "getActionGroup" o = Gtk.Widget.WidgetGetActionGroupMethodInfo
ResolveSearchEntryMethod "getAlignment" o = Gtk.Editable.EditableGetAlignmentMethodInfo
ResolveSearchEntryMethod "getAllocatedBaseline" o = Gtk.Widget.WidgetGetAllocatedBaselineMethodInfo
ResolveSearchEntryMethod "getAllocatedHeight" o = Gtk.Widget.WidgetGetAllocatedHeightMethodInfo
ResolveSearchEntryMethod "getAllocatedWidth" o = Gtk.Widget.WidgetGetAllocatedWidthMethodInfo
ResolveSearchEntryMethod "getAllocation" o = Gtk.Widget.WidgetGetAllocationMethodInfo
ResolveSearchEntryMethod "getAncestor" o = Gtk.Widget.WidgetGetAncestorMethodInfo
ResolveSearchEntryMethod "getCanFocus" o = Gtk.Widget.WidgetGetCanFocusMethodInfo
ResolveSearchEntryMethod "getCanTarget" o = Gtk.Widget.WidgetGetCanTargetMethodInfo
ResolveSearchEntryMethod "getChars" o = Gtk.Editable.EditableGetCharsMethodInfo
ResolveSearchEntryMethod "getChildVisible" o = Gtk.Widget.WidgetGetChildVisibleMethodInfo
ResolveSearchEntryMethod "getClipboard" o = Gtk.Widget.WidgetGetClipboardMethodInfo
ResolveSearchEntryMethod "getCursor" o = Gtk.Widget.WidgetGetCursorMethodInfo
ResolveSearchEntryMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveSearchEntryMethod "getDirection" o = Gtk.Widget.WidgetGetDirectionMethodInfo
ResolveSearchEntryMethod "getDisplay" o = Gtk.Widget.WidgetGetDisplayMethodInfo
ResolveSearchEntryMethod "getEditable" o = Gtk.Editable.EditableGetEditableMethodInfo
ResolveSearchEntryMethod "getFirstChild" o = Gtk.Widget.WidgetGetFirstChildMethodInfo
ResolveSearchEntryMethod "getFocusChild" o = Gtk.Widget.WidgetGetFocusChildMethodInfo
ResolveSearchEntryMethod "getFocusOnClick" o = Gtk.Widget.WidgetGetFocusOnClickMethodInfo
ResolveSearchEntryMethod "getFontMap" o = Gtk.Widget.WidgetGetFontMapMethodInfo
ResolveSearchEntryMethod "getFontOptions" o = Gtk.Widget.WidgetGetFontOptionsMethodInfo
ResolveSearchEntryMethod "getFrameClock" o = Gtk.Widget.WidgetGetFrameClockMethodInfo
ResolveSearchEntryMethod "getHalign" o = Gtk.Widget.WidgetGetHalignMethodInfo
ResolveSearchEntryMethod "getHasSurface" o = Gtk.Widget.WidgetGetHasSurfaceMethodInfo
ResolveSearchEntryMethod "getHasTooltip" o = Gtk.Widget.WidgetGetHasTooltipMethodInfo
ResolveSearchEntryMethod "getHeight" o = Gtk.Widget.WidgetGetHeightMethodInfo
ResolveSearchEntryMethod "getHexpand" o = Gtk.Widget.WidgetGetHexpandMethodInfo
ResolveSearchEntryMethod "getHexpandSet" o = Gtk.Widget.WidgetGetHexpandSetMethodInfo
ResolveSearchEntryMethod "getInternalChild" o = Gtk.Buildable.BuildableGetInternalChildMethodInfo
ResolveSearchEntryMethod "getKeyCaptureWidget" o = SearchEntryGetKeyCaptureWidgetMethodInfo
ResolveSearchEntryMethod "getLastChild" o = Gtk.Widget.WidgetGetLastChildMethodInfo
ResolveSearchEntryMethod "getLayoutManager" o = Gtk.Widget.WidgetGetLayoutManagerMethodInfo
ResolveSearchEntryMethod "getMapped" o = Gtk.Widget.WidgetGetMappedMethodInfo
ResolveSearchEntryMethod "getMarginBottom" o = Gtk.Widget.WidgetGetMarginBottomMethodInfo
ResolveSearchEntryMethod "getMarginEnd" o = Gtk.Widget.WidgetGetMarginEndMethodInfo
ResolveSearchEntryMethod "getMarginStart" o = Gtk.Widget.WidgetGetMarginStartMethodInfo
ResolveSearchEntryMethod "getMarginTop" o = Gtk.Widget.WidgetGetMarginTopMethodInfo
ResolveSearchEntryMethod "getMaxWidthChars" o = Gtk.Editable.EditableGetMaxWidthCharsMethodInfo
ResolveSearchEntryMethod "getModifierMask" o = Gtk.Widget.WidgetGetModifierMaskMethodInfo
ResolveSearchEntryMethod "getName" o = Gtk.Widget.WidgetGetNameMethodInfo
ResolveSearchEntryMethod "getNextSibling" o = Gtk.Widget.WidgetGetNextSiblingMethodInfo
ResolveSearchEntryMethod "getOpacity" o = Gtk.Widget.WidgetGetOpacityMethodInfo
ResolveSearchEntryMethod "getOverflow" o = Gtk.Widget.WidgetGetOverflowMethodInfo
ResolveSearchEntryMethod "getPangoContext" o = Gtk.Widget.WidgetGetPangoContextMethodInfo
ResolveSearchEntryMethod "getParent" o = Gtk.Widget.WidgetGetParentMethodInfo
ResolveSearchEntryMethod "getPath" o = Gtk.Widget.WidgetGetPathMethodInfo
ResolveSearchEntryMethod "getPosition" o = Gtk.Editable.EditableGetPositionMethodInfo
ResolveSearchEntryMethod "getPreferredSize" o = Gtk.Widget.WidgetGetPreferredSizeMethodInfo
ResolveSearchEntryMethod "getPrevSibling" o = Gtk.Widget.WidgetGetPrevSiblingMethodInfo
ResolveSearchEntryMethod "getPrimaryClipboard" o = Gtk.Widget.WidgetGetPrimaryClipboardMethodInfo
ResolveSearchEntryMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveSearchEntryMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveSearchEntryMethod "getRealized" o = Gtk.Widget.WidgetGetRealizedMethodInfo
ResolveSearchEntryMethod "getReceivesDefault" o = Gtk.Widget.WidgetGetReceivesDefaultMethodInfo
ResolveSearchEntryMethod "getRequestMode" o = Gtk.Widget.WidgetGetRequestModeMethodInfo
ResolveSearchEntryMethod "getRoot" o = Gtk.Widget.WidgetGetRootMethodInfo
ResolveSearchEntryMethod "getScaleFactor" o = Gtk.Widget.WidgetGetScaleFactorMethodInfo
ResolveSearchEntryMethod "getSelectionBounds" o = Gtk.Editable.EditableGetSelectionBoundsMethodInfo
ResolveSearchEntryMethod "getSensitive" o = Gtk.Widget.WidgetGetSensitiveMethodInfo
ResolveSearchEntryMethod "getSettings" o = Gtk.Widget.WidgetGetSettingsMethodInfo
ResolveSearchEntryMethod "getSizeRequest" o = Gtk.Widget.WidgetGetSizeRequestMethodInfo
ResolveSearchEntryMethod "getStateFlags" o = Gtk.Widget.WidgetGetStateFlagsMethodInfo
ResolveSearchEntryMethod "getStyleContext" o = Gtk.Widget.WidgetGetStyleContextMethodInfo
ResolveSearchEntryMethod "getSupportMultidevice" o = Gtk.Widget.WidgetGetSupportMultideviceMethodInfo
ResolveSearchEntryMethod "getSurface" o = Gtk.Widget.WidgetGetSurfaceMethodInfo
ResolveSearchEntryMethod "getTemplateChild" o = Gtk.Widget.WidgetGetTemplateChildMethodInfo
ResolveSearchEntryMethod "getText" o = Gtk.Editable.EditableGetTextMethodInfo
ResolveSearchEntryMethod "getTooltipMarkup" o = Gtk.Widget.WidgetGetTooltipMarkupMethodInfo
ResolveSearchEntryMethod "getTooltipText" o = Gtk.Widget.WidgetGetTooltipTextMethodInfo
ResolveSearchEntryMethod "getTooltipWindow" o = Gtk.Widget.WidgetGetTooltipWindowMethodInfo
ResolveSearchEntryMethod "getToplevel" o = Gtk.Widget.WidgetGetToplevelMethodInfo
ResolveSearchEntryMethod "getValign" o = Gtk.Widget.WidgetGetValignMethodInfo
ResolveSearchEntryMethod "getVexpand" o = Gtk.Widget.WidgetGetVexpandMethodInfo
ResolveSearchEntryMethod "getVexpandSet" o = Gtk.Widget.WidgetGetVexpandSetMethodInfo
ResolveSearchEntryMethod "getVisible" o = Gtk.Widget.WidgetGetVisibleMethodInfo
ResolveSearchEntryMethod "getWidth" o = Gtk.Widget.WidgetGetWidthMethodInfo
ResolveSearchEntryMethod "getWidthChars" o = Gtk.Editable.EditableGetWidthCharsMethodInfo
ResolveSearchEntryMethod "setAccelPath" o = Gtk.Widget.WidgetSetAccelPathMethodInfo
ResolveSearchEntryMethod "setAlignment" o = Gtk.Editable.EditableSetAlignmentMethodInfo
ResolveSearchEntryMethod "setBuildableProperty" o = Gtk.Buildable.BuildableSetBuildablePropertyMethodInfo
ResolveSearchEntryMethod "setCanFocus" o = Gtk.Widget.WidgetSetCanFocusMethodInfo
ResolveSearchEntryMethod "setCanTarget" o = Gtk.Widget.WidgetSetCanTargetMethodInfo
ResolveSearchEntryMethod "setChildVisible" o = Gtk.Widget.WidgetSetChildVisibleMethodInfo
ResolveSearchEntryMethod "setCursor" o = Gtk.Widget.WidgetSetCursorMethodInfo
ResolveSearchEntryMethod "setCursorFromName" o = Gtk.Widget.WidgetSetCursorFromNameMethodInfo
ResolveSearchEntryMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveSearchEntryMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveSearchEntryMethod "setDirection" o = Gtk.Widget.WidgetSetDirectionMethodInfo
ResolveSearchEntryMethod "setEditable" o = Gtk.Editable.EditableSetEditableMethodInfo
ResolveSearchEntryMethod "setFocusChild" o = Gtk.Widget.WidgetSetFocusChildMethodInfo
ResolveSearchEntryMethod "setFocusOnClick" o = Gtk.Widget.WidgetSetFocusOnClickMethodInfo
ResolveSearchEntryMethod "setFontMap" o = Gtk.Widget.WidgetSetFontMapMethodInfo
ResolveSearchEntryMethod "setFontOptions" o = Gtk.Widget.WidgetSetFontOptionsMethodInfo
ResolveSearchEntryMethod "setHalign" o = Gtk.Widget.WidgetSetHalignMethodInfo
ResolveSearchEntryMethod "setHasSurface" o = Gtk.Widget.WidgetSetHasSurfaceMethodInfo
ResolveSearchEntryMethod "setHasTooltip" o = Gtk.Widget.WidgetSetHasTooltipMethodInfo
ResolveSearchEntryMethod "setHexpand" o = Gtk.Widget.WidgetSetHexpandMethodInfo
ResolveSearchEntryMethod "setHexpandSet" o = Gtk.Widget.WidgetSetHexpandSetMethodInfo
ResolveSearchEntryMethod "setKeyCaptureWidget" o = SearchEntrySetKeyCaptureWidgetMethodInfo
ResolveSearchEntryMethod "setLayoutManager" o = Gtk.Widget.WidgetSetLayoutManagerMethodInfo
ResolveSearchEntryMethod "setMarginBottom" o = Gtk.Widget.WidgetSetMarginBottomMethodInfo
ResolveSearchEntryMethod "setMarginEnd" o = Gtk.Widget.WidgetSetMarginEndMethodInfo
ResolveSearchEntryMethod "setMarginStart" o = Gtk.Widget.WidgetSetMarginStartMethodInfo
ResolveSearchEntryMethod "setMarginTop" o = Gtk.Widget.WidgetSetMarginTopMethodInfo
ResolveSearchEntryMethod "setMaxWidthChars" o = Gtk.Editable.EditableSetMaxWidthCharsMethodInfo
ResolveSearchEntryMethod "setName" o = Gtk.Widget.WidgetSetNameMethodInfo
ResolveSearchEntryMethod "setOpacity" o = Gtk.Widget.WidgetSetOpacityMethodInfo
ResolveSearchEntryMethod "setOverflow" o = Gtk.Widget.WidgetSetOverflowMethodInfo
ResolveSearchEntryMethod "setParent" o = Gtk.Widget.WidgetSetParentMethodInfo
ResolveSearchEntryMethod "setPosition" o = Gtk.Editable.EditableSetPositionMethodInfo
ResolveSearchEntryMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveSearchEntryMethod "setReceivesDefault" o = Gtk.Widget.WidgetSetReceivesDefaultMethodInfo
ResolveSearchEntryMethod "setSensitive" o = Gtk.Widget.WidgetSetSensitiveMethodInfo
ResolveSearchEntryMethod "setSizeRequest" o = Gtk.Widget.WidgetSetSizeRequestMethodInfo
ResolveSearchEntryMethod "setStateFlags" o = Gtk.Widget.WidgetSetStateFlagsMethodInfo
ResolveSearchEntryMethod "setSupportMultidevice" o = Gtk.Widget.WidgetSetSupportMultideviceMethodInfo
ResolveSearchEntryMethod "setSurface" o = Gtk.Widget.WidgetSetSurfaceMethodInfo
ResolveSearchEntryMethod "setText" o = Gtk.Editable.EditableSetTextMethodInfo
ResolveSearchEntryMethod "setTooltipMarkup" o = Gtk.Widget.WidgetSetTooltipMarkupMethodInfo
ResolveSearchEntryMethod "setTooltipText" o = Gtk.Widget.WidgetSetTooltipTextMethodInfo
ResolveSearchEntryMethod "setTooltipWindow" o = Gtk.Widget.WidgetSetTooltipWindowMethodInfo
ResolveSearchEntryMethod "setValign" o = Gtk.Widget.WidgetSetValignMethodInfo
ResolveSearchEntryMethod "setVexpand" o = Gtk.Widget.WidgetSetVexpandMethodInfo
ResolveSearchEntryMethod "setVexpandSet" o = Gtk.Widget.WidgetSetVexpandSetMethodInfo
ResolveSearchEntryMethod "setVisible" o = Gtk.Widget.WidgetSetVisibleMethodInfo
ResolveSearchEntryMethod "setWidthChars" o = Gtk.Editable.EditableSetWidthCharsMethodInfo
ResolveSearchEntryMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveSearchEntryMethod t SearchEntry, O.MethodInfo info SearchEntry p) => OL.IsLabel t (SearchEntry -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod @info
#else
fromLabel _ = O.overloadedMethod @info
#endif
#endif
type SearchEntryActivateCallback =
IO ()
noSearchEntryActivateCallback :: Maybe SearchEntryActivateCallback
noSearchEntryActivateCallback :: Maybe (IO ())
noSearchEntryActivateCallback = Maybe (IO ())
forall a. Maybe a
Nothing
type C_SearchEntryActivateCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_SearchEntryActivateCallback :: C_SearchEntryActivateCallback -> IO (FunPtr C_SearchEntryActivateCallback)
genClosure_SearchEntryActivate :: MonadIO m => SearchEntryActivateCallback -> m (GClosure C_SearchEntryActivateCallback)
genClosure_SearchEntryActivate :: IO () -> m (GClosure C_SearchEntryActivateCallback)
genClosure_SearchEntryActivate cb :: IO ()
cb = IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback))
-> IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryActivateCallback IO ()
cb
C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntryActivateCallback C_SearchEntryActivateCallback
cb' IO (FunPtr C_SearchEntryActivateCallback)
-> (FunPtr C_SearchEntryActivateCallback
-> IO (GClosure C_SearchEntryActivateCallback))
-> IO (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_SearchEntryActivateCallback
-> IO (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_SearchEntryActivateCallback ::
SearchEntryActivateCallback ->
C_SearchEntryActivateCallback
wrap_SearchEntryActivateCallback :: IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryActivateCallback _cb :: IO ()
_cb _ _ = do
IO ()
_cb
onSearchEntryActivate :: (IsSearchEntry a, MonadIO m) => a -> SearchEntryActivateCallback -> m SignalHandlerId
onSearchEntryActivate :: a -> IO () -> m SignalHandlerId
onSearchEntryActivate obj :: a
obj cb :: IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryActivateCallback IO ()
cb
FunPtr C_SearchEntryActivateCallback
cb'' <- C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntryActivateCallback C_SearchEntryActivateCallback
cb'
a
-> Text
-> FunPtr C_SearchEntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj "activate" FunPtr C_SearchEntryActivateCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterSearchEntryActivate :: (IsSearchEntry a, MonadIO m) => a -> SearchEntryActivateCallback -> m SignalHandlerId
afterSearchEntryActivate :: a -> IO () -> m SignalHandlerId
afterSearchEntryActivate obj :: a
obj cb :: IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryActivateCallback IO ()
cb
FunPtr C_SearchEntryActivateCallback
cb'' <- C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntryActivateCallback C_SearchEntryActivateCallback
cb'
a
-> Text
-> FunPtr C_SearchEntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj "activate" FunPtr C_SearchEntryActivateCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data SearchEntryActivateSignalInfo
instance SignalInfo SearchEntryActivateSignalInfo where
type HaskellCallbackType SearchEntryActivateSignalInfo = SearchEntryActivateCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_SearchEntryActivateCallback cb
cb'' <- mk_SearchEntryActivateCallback cb'
connectSignalFunPtr obj "activate" cb'' connectMode detail
#endif
type SearchEntryNextMatchCallback =
IO ()
noSearchEntryNextMatchCallback :: Maybe SearchEntryNextMatchCallback
noSearchEntryNextMatchCallback :: Maybe (IO ())
noSearchEntryNextMatchCallback = Maybe (IO ())
forall a. Maybe a
Nothing
type C_SearchEntryNextMatchCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_SearchEntryNextMatchCallback :: C_SearchEntryNextMatchCallback -> IO (FunPtr C_SearchEntryNextMatchCallback)
genClosure_SearchEntryNextMatch :: MonadIO m => SearchEntryNextMatchCallback -> m (GClosure C_SearchEntryNextMatchCallback)
genClosure_SearchEntryNextMatch :: IO () -> m (GClosure C_SearchEntryActivateCallback)
genClosure_SearchEntryNextMatch cb :: IO ()
cb = IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback))
-> IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryNextMatchCallback IO ()
cb
C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntryNextMatchCallback C_SearchEntryActivateCallback
cb' IO (FunPtr C_SearchEntryActivateCallback)
-> (FunPtr C_SearchEntryActivateCallback
-> IO (GClosure C_SearchEntryActivateCallback))
-> IO (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_SearchEntryActivateCallback
-> IO (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_SearchEntryNextMatchCallback ::
SearchEntryNextMatchCallback ->
C_SearchEntryNextMatchCallback
wrap_SearchEntryNextMatchCallback :: IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryNextMatchCallback _cb :: IO ()
_cb _ _ = do
IO ()
_cb
onSearchEntryNextMatch :: (IsSearchEntry a, MonadIO m) => a -> SearchEntryNextMatchCallback -> m SignalHandlerId
onSearchEntryNextMatch :: a -> IO () -> m SignalHandlerId
onSearchEntryNextMatch obj :: a
obj cb :: IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryNextMatchCallback IO ()
cb
FunPtr C_SearchEntryActivateCallback
cb'' <- C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntryNextMatchCallback C_SearchEntryActivateCallback
cb'
a
-> Text
-> FunPtr C_SearchEntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj "next-match" FunPtr C_SearchEntryActivateCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterSearchEntryNextMatch :: (IsSearchEntry a, MonadIO m) => a -> SearchEntryNextMatchCallback -> m SignalHandlerId
afterSearchEntryNextMatch :: a -> IO () -> m SignalHandlerId
afterSearchEntryNextMatch obj :: a
obj cb :: IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryNextMatchCallback IO ()
cb
FunPtr C_SearchEntryActivateCallback
cb'' <- C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntryNextMatchCallback C_SearchEntryActivateCallback
cb'
a
-> Text
-> FunPtr C_SearchEntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj "next-match" FunPtr C_SearchEntryActivateCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data SearchEntryNextMatchSignalInfo
instance SignalInfo SearchEntryNextMatchSignalInfo where
type HaskellCallbackType SearchEntryNextMatchSignalInfo = SearchEntryNextMatchCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_SearchEntryNextMatchCallback cb
cb'' <- mk_SearchEntryNextMatchCallback cb'
connectSignalFunPtr obj "next-match" cb'' connectMode detail
#endif
type SearchEntryPreviousMatchCallback =
IO ()
noSearchEntryPreviousMatchCallback :: Maybe SearchEntryPreviousMatchCallback
noSearchEntryPreviousMatchCallback :: Maybe (IO ())
noSearchEntryPreviousMatchCallback = Maybe (IO ())
forall a. Maybe a
Nothing
type C_SearchEntryPreviousMatchCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_SearchEntryPreviousMatchCallback :: C_SearchEntryPreviousMatchCallback -> IO (FunPtr C_SearchEntryPreviousMatchCallback)
genClosure_SearchEntryPreviousMatch :: MonadIO m => SearchEntryPreviousMatchCallback -> m (GClosure C_SearchEntryPreviousMatchCallback)
genClosure_SearchEntryPreviousMatch :: IO () -> m (GClosure C_SearchEntryActivateCallback)
genClosure_SearchEntryPreviousMatch cb :: IO ()
cb = IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback))
-> IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryPreviousMatchCallback IO ()
cb
C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntryPreviousMatchCallback C_SearchEntryActivateCallback
cb' IO (FunPtr C_SearchEntryActivateCallback)
-> (FunPtr C_SearchEntryActivateCallback
-> IO (GClosure C_SearchEntryActivateCallback))
-> IO (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_SearchEntryActivateCallback
-> IO (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_SearchEntryPreviousMatchCallback ::
SearchEntryPreviousMatchCallback ->
C_SearchEntryPreviousMatchCallback
wrap_SearchEntryPreviousMatchCallback :: IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryPreviousMatchCallback _cb :: IO ()
_cb _ _ = do
IO ()
_cb
onSearchEntryPreviousMatch :: (IsSearchEntry a, MonadIO m) => a -> SearchEntryPreviousMatchCallback -> m SignalHandlerId
onSearchEntryPreviousMatch :: a -> IO () -> m SignalHandlerId
onSearchEntryPreviousMatch obj :: a
obj cb :: IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryPreviousMatchCallback IO ()
cb
FunPtr C_SearchEntryActivateCallback
cb'' <- C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntryPreviousMatchCallback C_SearchEntryActivateCallback
cb'
a
-> Text
-> FunPtr C_SearchEntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj "previous-match" FunPtr C_SearchEntryActivateCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterSearchEntryPreviousMatch :: (IsSearchEntry a, MonadIO m) => a -> SearchEntryPreviousMatchCallback -> m SignalHandlerId
afterSearchEntryPreviousMatch :: a -> IO () -> m SignalHandlerId
afterSearchEntryPreviousMatch obj :: a
obj cb :: IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryPreviousMatchCallback IO ()
cb
FunPtr C_SearchEntryActivateCallback
cb'' <- C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntryPreviousMatchCallback C_SearchEntryActivateCallback
cb'
a
-> Text
-> FunPtr C_SearchEntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj "previous-match" FunPtr C_SearchEntryActivateCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data SearchEntryPreviousMatchSignalInfo
instance SignalInfo SearchEntryPreviousMatchSignalInfo where
type HaskellCallbackType SearchEntryPreviousMatchSignalInfo = SearchEntryPreviousMatchCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_SearchEntryPreviousMatchCallback cb
cb'' <- mk_SearchEntryPreviousMatchCallback cb'
connectSignalFunPtr obj "previous-match" cb'' connectMode detail
#endif
type SearchEntrySearchChangedCallback =
IO ()
noSearchEntrySearchChangedCallback :: Maybe SearchEntrySearchChangedCallback
noSearchEntrySearchChangedCallback :: Maybe (IO ())
noSearchEntrySearchChangedCallback = Maybe (IO ())
forall a. Maybe a
Nothing
type C_SearchEntrySearchChangedCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_SearchEntrySearchChangedCallback :: C_SearchEntrySearchChangedCallback -> IO (FunPtr C_SearchEntrySearchChangedCallback)
genClosure_SearchEntrySearchChanged :: MonadIO m => SearchEntrySearchChangedCallback -> m (GClosure C_SearchEntrySearchChangedCallback)
genClosure_SearchEntrySearchChanged :: IO () -> m (GClosure C_SearchEntryActivateCallback)
genClosure_SearchEntrySearchChanged cb :: IO ()
cb = IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback))
-> IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntrySearchChangedCallback IO ()
cb
C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntrySearchChangedCallback C_SearchEntryActivateCallback
cb' IO (FunPtr C_SearchEntryActivateCallback)
-> (FunPtr C_SearchEntryActivateCallback
-> IO (GClosure C_SearchEntryActivateCallback))
-> IO (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_SearchEntryActivateCallback
-> IO (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_SearchEntrySearchChangedCallback ::
SearchEntrySearchChangedCallback ->
C_SearchEntrySearchChangedCallback
wrap_SearchEntrySearchChangedCallback :: IO () -> C_SearchEntryActivateCallback
wrap_SearchEntrySearchChangedCallback _cb :: IO ()
_cb _ _ = do
IO ()
_cb
onSearchEntrySearchChanged :: (IsSearchEntry a, MonadIO m) => a -> SearchEntrySearchChangedCallback -> m SignalHandlerId
onSearchEntrySearchChanged :: a -> IO () -> m SignalHandlerId
onSearchEntrySearchChanged obj :: a
obj cb :: IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntrySearchChangedCallback IO ()
cb
FunPtr C_SearchEntryActivateCallback
cb'' <- C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntrySearchChangedCallback C_SearchEntryActivateCallback
cb'
a
-> Text
-> FunPtr C_SearchEntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj "search-changed" FunPtr C_SearchEntryActivateCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterSearchEntrySearchChanged :: (IsSearchEntry a, MonadIO m) => a -> SearchEntrySearchChangedCallback -> m SignalHandlerId
afterSearchEntrySearchChanged :: a -> IO () -> m SignalHandlerId
afterSearchEntrySearchChanged obj :: a
obj cb :: IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntrySearchChangedCallback IO ()
cb
FunPtr C_SearchEntryActivateCallback
cb'' <- C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntrySearchChangedCallback C_SearchEntryActivateCallback
cb'
a
-> Text
-> FunPtr C_SearchEntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj "search-changed" FunPtr C_SearchEntryActivateCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data SearchEntrySearchChangedSignalInfo
instance SignalInfo SearchEntrySearchChangedSignalInfo where
type HaskellCallbackType SearchEntrySearchChangedSignalInfo = SearchEntrySearchChangedCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_SearchEntrySearchChangedCallback cb
cb'' <- mk_SearchEntrySearchChangedCallback cb'
connectSignalFunPtr obj "search-changed" cb'' connectMode detail
#endif
type SearchEntrySearchStartedCallback =
IO ()
noSearchEntrySearchStartedCallback :: Maybe SearchEntrySearchStartedCallback
noSearchEntrySearchStartedCallback :: Maybe (IO ())
noSearchEntrySearchStartedCallback = Maybe (IO ())
forall a. Maybe a
Nothing
type C_SearchEntrySearchStartedCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_SearchEntrySearchStartedCallback :: C_SearchEntrySearchStartedCallback -> IO (FunPtr C_SearchEntrySearchStartedCallback)
genClosure_SearchEntrySearchStarted :: MonadIO m => SearchEntrySearchStartedCallback -> m (GClosure C_SearchEntrySearchStartedCallback)
genClosure_SearchEntrySearchStarted :: IO () -> m (GClosure C_SearchEntryActivateCallback)
genClosure_SearchEntrySearchStarted cb :: IO ()
cb = IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback))
-> IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntrySearchStartedCallback IO ()
cb
C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntrySearchStartedCallback C_SearchEntryActivateCallback
cb' IO (FunPtr C_SearchEntryActivateCallback)
-> (FunPtr C_SearchEntryActivateCallback
-> IO (GClosure C_SearchEntryActivateCallback))
-> IO (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_SearchEntryActivateCallback
-> IO (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_SearchEntrySearchStartedCallback ::
SearchEntrySearchStartedCallback ->
C_SearchEntrySearchStartedCallback
wrap_SearchEntrySearchStartedCallback :: IO () -> C_SearchEntryActivateCallback
wrap_SearchEntrySearchStartedCallback _cb :: IO ()
_cb _ _ = do
IO ()
_cb
onSearchEntrySearchStarted :: (IsSearchEntry a, MonadIO m) => a -> SearchEntrySearchStartedCallback -> m SignalHandlerId
onSearchEntrySearchStarted :: a -> IO () -> m SignalHandlerId
onSearchEntrySearchStarted obj :: a
obj cb :: IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntrySearchStartedCallback IO ()
cb
FunPtr C_SearchEntryActivateCallback
cb'' <- C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntrySearchStartedCallback C_SearchEntryActivateCallback
cb'
a
-> Text
-> FunPtr C_SearchEntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj "search-started" FunPtr C_SearchEntryActivateCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterSearchEntrySearchStarted :: (IsSearchEntry a, MonadIO m) => a -> SearchEntrySearchStartedCallback -> m SignalHandlerId
afterSearchEntrySearchStarted :: a -> IO () -> m SignalHandlerId
afterSearchEntrySearchStarted obj :: a
obj cb :: IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntrySearchStartedCallback IO ()
cb
FunPtr C_SearchEntryActivateCallback
cb'' <- C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntrySearchStartedCallback C_SearchEntryActivateCallback
cb'
a
-> Text
-> FunPtr C_SearchEntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj "search-started" FunPtr C_SearchEntryActivateCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data SearchEntrySearchStartedSignalInfo
instance SignalInfo SearchEntrySearchStartedSignalInfo where
type HaskellCallbackType SearchEntrySearchStartedSignalInfo = SearchEntrySearchStartedCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_SearchEntrySearchStartedCallback cb
cb'' <- mk_SearchEntrySearchStartedCallback cb'
connectSignalFunPtr obj "search-started" cb'' connectMode detail
#endif
type SearchEntryStopSearchCallback =
IO ()
noSearchEntryStopSearchCallback :: Maybe SearchEntryStopSearchCallback
noSearchEntryStopSearchCallback :: Maybe (IO ())
noSearchEntryStopSearchCallback = Maybe (IO ())
forall a. Maybe a
Nothing
type C_SearchEntryStopSearchCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_SearchEntryStopSearchCallback :: C_SearchEntryStopSearchCallback -> IO (FunPtr C_SearchEntryStopSearchCallback)
genClosure_SearchEntryStopSearch :: MonadIO m => SearchEntryStopSearchCallback -> m (GClosure C_SearchEntryStopSearchCallback)
genClosure_SearchEntryStopSearch :: IO () -> m (GClosure C_SearchEntryActivateCallback)
genClosure_SearchEntryStopSearch cb :: IO ()
cb = IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback))
-> IO (GClosure C_SearchEntryActivateCallback)
-> m (GClosure C_SearchEntryActivateCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryStopSearchCallback IO ()
cb
C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntryStopSearchCallback C_SearchEntryActivateCallback
cb' IO (FunPtr C_SearchEntryActivateCallback)
-> (FunPtr C_SearchEntryActivateCallback
-> IO (GClosure C_SearchEntryActivateCallback))
-> IO (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_SearchEntryActivateCallback
-> IO (GClosure C_SearchEntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_SearchEntryStopSearchCallback ::
SearchEntryStopSearchCallback ->
C_SearchEntryStopSearchCallback
wrap_SearchEntryStopSearchCallback :: IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryStopSearchCallback _cb :: IO ()
_cb _ _ = do
IO ()
_cb
onSearchEntryStopSearch :: (IsSearchEntry a, MonadIO m) => a -> SearchEntryStopSearchCallback -> m SignalHandlerId
onSearchEntryStopSearch :: a -> IO () -> m SignalHandlerId
onSearchEntryStopSearch obj :: a
obj cb :: IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryStopSearchCallback IO ()
cb
FunPtr C_SearchEntryActivateCallback
cb'' <- C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntryStopSearchCallback C_SearchEntryActivateCallback
cb'
a
-> Text
-> FunPtr C_SearchEntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj "stop-search" FunPtr C_SearchEntryActivateCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterSearchEntryStopSearch :: (IsSearchEntry a, MonadIO m) => a -> SearchEntryStopSearchCallback -> m SignalHandlerId
afterSearchEntryStopSearch :: a -> IO () -> m SignalHandlerId
afterSearchEntryStopSearch obj :: a
obj cb :: IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_SearchEntryActivateCallback
cb' = IO () -> C_SearchEntryActivateCallback
wrap_SearchEntryStopSearchCallback IO ()
cb
FunPtr C_SearchEntryActivateCallback
cb'' <- C_SearchEntryActivateCallback
-> IO (FunPtr C_SearchEntryActivateCallback)
mk_SearchEntryStopSearchCallback C_SearchEntryActivateCallback
cb'
a
-> Text
-> FunPtr C_SearchEntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj "stop-search" FunPtr C_SearchEntryActivateCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data SearchEntryStopSearchSignalInfo
instance SignalInfo SearchEntryStopSearchSignalInfo where
type HaskellCallbackType SearchEntryStopSearchSignalInfo = SearchEntryStopSearchCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_SearchEntryStopSearchCallback cb
cb'' <- mk_SearchEntryStopSearchCallback cb'
connectSignalFunPtr obj "stop-search" cb'' connectMode detail
#endif
getSearchEntryActivatesDefault :: (MonadIO m, IsSearchEntry o) => o -> m Bool
getSearchEntryActivatesDefault :: o -> m Bool
getSearchEntryActivatesDefault obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "activates-default"
setSearchEntryActivatesDefault :: (MonadIO m, IsSearchEntry o) => o -> Bool -> m ()
setSearchEntryActivatesDefault :: o -> Bool -> m ()
setSearchEntryActivatesDefault obj :: o
obj val :: Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj "activates-default" Bool
val
constructSearchEntryActivatesDefault :: (IsSearchEntry o) => Bool -> IO (GValueConstruct o)
constructSearchEntryActivatesDefault :: Bool -> IO (GValueConstruct o)
constructSearchEntryActivatesDefault val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "activates-default" Bool
val
#if defined(ENABLE_OVERLOADING)
data SearchEntryActivatesDefaultPropertyInfo
instance AttrInfo SearchEntryActivatesDefaultPropertyInfo where
type AttrAllowedOps SearchEntryActivatesDefaultPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint SearchEntryActivatesDefaultPropertyInfo = IsSearchEntry
type AttrSetTypeConstraint SearchEntryActivatesDefaultPropertyInfo = (~) Bool
type AttrTransferTypeConstraint SearchEntryActivatesDefaultPropertyInfo = (~) Bool
type AttrTransferType SearchEntryActivatesDefaultPropertyInfo = Bool
type AttrGetType SearchEntryActivatesDefaultPropertyInfo = Bool
type AttrLabel SearchEntryActivatesDefaultPropertyInfo = "activates-default"
type AttrOrigin SearchEntryActivatesDefaultPropertyInfo = SearchEntry
attrGet = getSearchEntryActivatesDefault
attrSet = setSearchEntryActivatesDefault
attrTransfer _ v = do
return v
attrConstruct = constructSearchEntryActivatesDefault
attrClear = undefined
#endif
getSearchEntryPlaceholderText :: (MonadIO m, IsSearchEntry o) => o -> m (Maybe T.Text)
getSearchEntryPlaceholderText :: o -> m (Maybe Text)
getSearchEntryPlaceholderText obj :: o
obj = IO (Maybe Text) -> m (Maybe Text)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj "placeholder-text"
setSearchEntryPlaceholderText :: (MonadIO m, IsSearchEntry o) => o -> T.Text -> m ()
setSearchEntryPlaceholderText :: o -> Text -> m ()
setSearchEntryPlaceholderText obj :: o
obj val :: Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "placeholder-text" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructSearchEntryPlaceholderText :: (IsSearchEntry o) => T.Text -> IO (GValueConstruct o)
constructSearchEntryPlaceholderText :: Text -> IO (GValueConstruct o)
constructSearchEntryPlaceholderText val :: Text
val = String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString "placeholder-text" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
clearSearchEntryPlaceholderText :: (MonadIO m, IsSearchEntry o) => o -> m ()
clearSearchEntryPlaceholderText :: o -> m ()
clearSearchEntryPlaceholderText obj :: o
obj = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "placeholder-text" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data SearchEntryPlaceholderTextPropertyInfo
instance AttrInfo SearchEntryPlaceholderTextPropertyInfo where
type AttrAllowedOps SearchEntryPlaceholderTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint SearchEntryPlaceholderTextPropertyInfo = IsSearchEntry
type AttrSetTypeConstraint SearchEntryPlaceholderTextPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint SearchEntryPlaceholderTextPropertyInfo = (~) T.Text
type AttrTransferType SearchEntryPlaceholderTextPropertyInfo = T.Text
type AttrGetType SearchEntryPlaceholderTextPropertyInfo = (Maybe T.Text)
type AttrLabel SearchEntryPlaceholderTextPropertyInfo = "placeholder-text"
type AttrOrigin SearchEntryPlaceholderTextPropertyInfo = SearchEntry
attrGet = getSearchEntryPlaceholderText
attrSet = setSearchEntryPlaceholderText
attrTransfer _ v = do
return v
attrConstruct = constructSearchEntryPlaceholderText
attrClear = clearSearchEntryPlaceholderText
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList SearchEntry
type instance O.AttributeList SearchEntry = SearchEntryAttributeList
type SearchEntryAttributeList = ('[ '("activatesDefault", SearchEntryActivatesDefaultPropertyInfo), '("canFocus", Gtk.Widget.WidgetCanFocusPropertyInfo), '("canTarget", Gtk.Widget.WidgetCanTargetPropertyInfo), '("cssName", Gtk.Widget.WidgetCssNamePropertyInfo), '("cursor", Gtk.Widget.WidgetCursorPropertyInfo), '("cursorPosition", Gtk.Editable.EditableCursorPositionPropertyInfo), '("editable", Gtk.Editable.EditableEditablePropertyInfo), '("expand", Gtk.Widget.WidgetExpandPropertyInfo), '("focusOnClick", Gtk.Widget.WidgetFocusOnClickPropertyInfo), '("halign", Gtk.Widget.WidgetHalignPropertyInfo), '("hasDefault", Gtk.Widget.WidgetHasDefaultPropertyInfo), '("hasFocus", Gtk.Widget.WidgetHasFocusPropertyInfo), '("hasTooltip", Gtk.Widget.WidgetHasTooltipPropertyInfo), '("heightRequest", Gtk.Widget.WidgetHeightRequestPropertyInfo), '("hexpand", Gtk.Widget.WidgetHexpandPropertyInfo), '("hexpandSet", Gtk.Widget.WidgetHexpandSetPropertyInfo), '("isFocus", Gtk.Widget.WidgetIsFocusPropertyInfo), '("layoutManager", Gtk.Widget.WidgetLayoutManagerPropertyInfo), '("margin", Gtk.Widget.WidgetMarginPropertyInfo), '("marginBottom", Gtk.Widget.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.Widget.WidgetMarginEndPropertyInfo), '("marginStart", Gtk.Widget.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.Widget.WidgetMarginTopPropertyInfo), '("maxWidthChars", Gtk.Editable.EditableMaxWidthCharsPropertyInfo), '("name", Gtk.Widget.WidgetNamePropertyInfo), '("opacity", Gtk.Widget.WidgetOpacityPropertyInfo), '("overflow", Gtk.Widget.WidgetOverflowPropertyInfo), '("parent", Gtk.Widget.WidgetParentPropertyInfo), '("placeholderText", SearchEntryPlaceholderTextPropertyInfo), '("receivesDefault", Gtk.Widget.WidgetReceivesDefaultPropertyInfo), '("root", Gtk.Widget.WidgetRootPropertyInfo), '("scaleFactor", Gtk.Widget.WidgetScaleFactorPropertyInfo), '("selectionBound", Gtk.Editable.EditableSelectionBoundPropertyInfo), '("sensitive", Gtk.Widget.WidgetSensitivePropertyInfo), '("surface", Gtk.Widget.WidgetSurfacePropertyInfo), '("text", Gtk.Editable.EditableTextPropertyInfo), '("tooltipMarkup", Gtk.Widget.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.Widget.WidgetTooltipTextPropertyInfo), '("valign", Gtk.Widget.WidgetValignPropertyInfo), '("vexpand", Gtk.Widget.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.Widget.WidgetVexpandSetPropertyInfo), '("visible", Gtk.Widget.WidgetVisiblePropertyInfo), '("widthChars", Gtk.Editable.EditableWidthCharsPropertyInfo), '("widthRequest", Gtk.Widget.WidgetWidthRequestPropertyInfo), '("xalign", Gtk.Editable.EditableXalignPropertyInfo)] :: [(Symbol, *)])
#endif
#if defined(ENABLE_OVERLOADING)
searchEntryActivatesDefault :: AttrLabelProxy "activatesDefault"
searchEntryActivatesDefault = AttrLabelProxy
searchEntryPlaceholderText :: AttrLabelProxy "placeholderText"
searchEntryPlaceholderText = AttrLabelProxy
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList SearchEntry = SearchEntrySignalList
type SearchEntrySignalList = ('[ '("accelClosuresChanged", Gtk.Widget.WidgetAccelClosuresChangedSignalInfo), '("activate", SearchEntryActivateSignalInfo), '("canActivateAccel", Gtk.Widget.WidgetCanActivateAccelSignalInfo), '("changed", Gtk.Editable.EditableChangedSignalInfo), '("deleteText", Gtk.Editable.EditableDeleteTextSignalInfo), '("destroy", Gtk.Widget.WidgetDestroySignalInfo), '("directionChanged", Gtk.Widget.WidgetDirectionChangedSignalInfo), '("dragBegin", Gtk.Widget.WidgetDragBeginSignalInfo), '("dragDataDelete", Gtk.Widget.WidgetDragDataDeleteSignalInfo), '("dragDataGet", Gtk.Widget.WidgetDragDataGetSignalInfo), '("dragDataReceived", Gtk.Widget.WidgetDragDataReceivedSignalInfo), '("dragDrop", Gtk.Widget.WidgetDragDropSignalInfo), '("dragEnd", Gtk.Widget.WidgetDragEndSignalInfo), '("dragFailed", Gtk.Widget.WidgetDragFailedSignalInfo), '("dragLeave", Gtk.Widget.WidgetDragLeaveSignalInfo), '("dragMotion", Gtk.Widget.WidgetDragMotionSignalInfo), '("grabNotify", Gtk.Widget.WidgetGrabNotifySignalInfo), '("hide", Gtk.Widget.WidgetHideSignalInfo), '("insertText", Gtk.Editable.EditableInsertTextSignalInfo), '("keynavFailed", Gtk.Widget.WidgetKeynavFailedSignalInfo), '("map", Gtk.Widget.WidgetMapSignalInfo), '("mnemonicActivate", Gtk.Widget.WidgetMnemonicActivateSignalInfo), '("moveFocus", Gtk.Widget.WidgetMoveFocusSignalInfo), '("nextMatch", SearchEntryNextMatchSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo), '("popupMenu", Gtk.Widget.WidgetPopupMenuSignalInfo), '("previousMatch", SearchEntryPreviousMatchSignalInfo), '("queryTooltip", Gtk.Widget.WidgetQueryTooltipSignalInfo), '("realize", Gtk.Widget.WidgetRealizeSignalInfo), '("searchChanged", SearchEntrySearchChangedSignalInfo), '("searchStarted", SearchEntrySearchStartedSignalInfo), '("show", Gtk.Widget.WidgetShowSignalInfo), '("sizeAllocate", Gtk.Widget.WidgetSizeAllocateSignalInfo), '("stateFlagsChanged", Gtk.Widget.WidgetStateFlagsChangedSignalInfo), '("stopSearch", SearchEntryStopSearchSignalInfo), '("styleUpdated", Gtk.Widget.WidgetStyleUpdatedSignalInfo), '("unmap", Gtk.Widget.WidgetUnmapSignalInfo), '("unrealize", Gtk.Widget.WidgetUnrealizeSignalInfo)] :: [(Symbol, *)])
#endif
foreign import ccall "gtk_search_entry_new" gtk_search_entry_new ::
IO (Ptr SearchEntry)
searchEntryNew ::
(B.CallStack.HasCallStack, MonadIO m) =>
m SearchEntry
searchEntryNew :: m SearchEntry
searchEntryNew = IO SearchEntry -> m SearchEntry
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SearchEntry -> m SearchEntry)
-> IO SearchEntry -> m SearchEntry
forall a b. (a -> b) -> a -> b
$ do
Ptr SearchEntry
result <- IO (Ptr SearchEntry)
gtk_search_entry_new
Text -> Ptr SearchEntry -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL "searchEntryNew" Ptr SearchEntry
result
SearchEntry
result' <- ((ManagedPtr SearchEntry -> SearchEntry)
-> Ptr SearchEntry -> IO SearchEntry
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr SearchEntry -> SearchEntry
SearchEntry) Ptr SearchEntry
result
SearchEntry -> IO SearchEntry
forall (m :: * -> *) a. Monad m => a -> m a
return SearchEntry
result'
#if defined(ENABLE_OVERLOADING)
#endif
foreign import ccall "gtk_search_entry_get_key_capture_widget" gtk_search_entry_get_key_capture_widget ::
Ptr SearchEntry ->
IO (Ptr Gtk.Widget.Widget)
searchEntryGetKeyCaptureWidget ::
(B.CallStack.HasCallStack, MonadIO m, IsSearchEntry a) =>
a
-> m Gtk.Widget.Widget
searchEntryGetKeyCaptureWidget :: a -> m Widget
searchEntryGetKeyCaptureWidget entry :: a
entry = IO Widget -> m Widget
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Widget -> m Widget) -> IO Widget -> m Widget
forall a b. (a -> b) -> a -> b
$ do
Ptr SearchEntry
entry' <- a -> IO (Ptr SearchEntry)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
entry
Ptr Widget
result <- Ptr SearchEntry -> IO (Ptr Widget)
gtk_search_entry_get_key_capture_widget Ptr SearchEntry
entry'
Text -> Ptr Widget -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL "searchEntryGetKeyCaptureWidget" Ptr Widget
result
Widget
result' <- ((ManagedPtr Widget -> Widget) -> Ptr Widget -> IO Widget
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr Widget -> Widget
Gtk.Widget.Widget) Ptr Widget
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
entry
Widget -> IO Widget
forall (m :: * -> *) a. Monad m => a -> m a
return Widget
result'
#if defined(ENABLE_OVERLOADING)
data SearchEntryGetKeyCaptureWidgetMethodInfo
instance (signature ~ (m Gtk.Widget.Widget), MonadIO m, IsSearchEntry a) => O.MethodInfo SearchEntryGetKeyCaptureWidgetMethodInfo a signature where
overloadedMethod = searchEntryGetKeyCaptureWidget
#endif
foreign import ccall "gtk_search_entry_set_key_capture_widget" gtk_search_entry_set_key_capture_widget ::
Ptr SearchEntry ->
Ptr Gtk.Widget.Widget ->
IO ()
searchEntrySetKeyCaptureWidget ::
(B.CallStack.HasCallStack, MonadIO m, IsSearchEntry a, Gtk.Widget.IsWidget b) =>
a
-> Maybe (b)
-> m ()
searchEntrySetKeyCaptureWidget :: a -> Maybe b -> m ()
searchEntrySetKeyCaptureWidget entry :: a
entry widget :: Maybe b
widget = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr SearchEntry
entry' <- a -> IO (Ptr SearchEntry)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
entry
Ptr Widget
maybeWidget <- case Maybe b
widget of
Nothing -> Ptr Widget -> IO (Ptr Widget)
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr Widget
forall a. Ptr a
nullPtr
Just jWidget :: b
jWidget -> do
Ptr Widget
jWidget' <- b -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
jWidget
Ptr Widget -> IO (Ptr Widget)
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr Widget
jWidget'
Ptr SearchEntry -> Ptr Widget -> IO ()
gtk_search_entry_set_key_capture_widget Ptr SearchEntry
entry' Ptr Widget
maybeWidget
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
entry
Maybe b -> (b -> IO ()) -> IO ()
forall (m :: * -> *) a. Monad m => Maybe a -> (a -> m ()) -> m ()
whenJust Maybe b
widget b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data SearchEntrySetKeyCaptureWidgetMethodInfo
instance (signature ~ (Maybe (b) -> m ()), MonadIO m, IsSearchEntry a, Gtk.Widget.IsWidget b) => O.MethodInfo SearchEntrySetKeyCaptureWidgetMethodInfo a signature where
overloadedMethod = searchEntrySetKeyCaptureWidget
#endif