{-# LANGUAGE TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.GtkSource.Objects.GutterRendererPixbuf
(
GutterRendererPixbuf(..) ,
IsGutterRendererPixbuf ,
toGutterRendererPixbuf ,
#if defined(ENABLE_OVERLOADING)
ResolveGutterRendererPixbufMethod ,
#endif
#if defined(ENABLE_OVERLOADING)
GutterRendererPixbufGetGiconMethodInfo ,
#endif
gutterRendererPixbufGetGicon ,
#if defined(ENABLE_OVERLOADING)
GutterRendererPixbufGetIconNameMethodInfo,
#endif
gutterRendererPixbufGetIconName ,
#if defined(ENABLE_OVERLOADING)
GutterRendererPixbufGetPaintableMethodInfo,
#endif
gutterRendererPixbufGetPaintable ,
#if defined(ENABLE_OVERLOADING)
GutterRendererPixbufGetPixbufMethodInfo ,
#endif
gutterRendererPixbufGetPixbuf ,
gutterRendererPixbufNew ,
#if defined(ENABLE_OVERLOADING)
GutterRendererPixbufOverlayPaintableMethodInfo,
#endif
gutterRendererPixbufOverlayPaintable ,
#if defined(ENABLE_OVERLOADING)
GutterRendererPixbufSetGiconMethodInfo ,
#endif
gutterRendererPixbufSetGicon ,
#if defined(ENABLE_OVERLOADING)
GutterRendererPixbufSetIconNameMethodInfo,
#endif
gutterRendererPixbufSetIconName ,
#if defined(ENABLE_OVERLOADING)
GutterRendererPixbufSetPaintableMethodInfo,
#endif
gutterRendererPixbufSetPaintable ,
#if defined(ENABLE_OVERLOADING)
GutterRendererPixbufSetPixbufMethodInfo ,
#endif
gutterRendererPixbufSetPixbuf ,
#if defined(ENABLE_OVERLOADING)
GutterRendererPixbufGiconPropertyInfo ,
#endif
clearGutterRendererPixbufGicon ,
constructGutterRendererPixbufGicon ,
getGutterRendererPixbufGicon ,
#if defined(ENABLE_OVERLOADING)
gutterRendererPixbufGicon ,
#endif
setGutterRendererPixbufGicon ,
#if defined(ENABLE_OVERLOADING)
GutterRendererPixbufIconNamePropertyInfo,
#endif
clearGutterRendererPixbufIconName ,
constructGutterRendererPixbufIconName ,
getGutterRendererPixbufIconName ,
#if defined(ENABLE_OVERLOADING)
gutterRendererPixbufIconName ,
#endif
setGutterRendererPixbufIconName ,
#if defined(ENABLE_OVERLOADING)
GutterRendererPixbufPaintablePropertyInfo,
#endif
clearGutterRendererPixbufPaintable ,
constructGutterRendererPixbufPaintable ,
getGutterRendererPixbufPaintable ,
#if defined(ENABLE_OVERLOADING)
gutterRendererPixbufPaintable ,
#endif
setGutterRendererPixbufPaintable ,
#if defined(ENABLE_OVERLOADING)
GutterRendererPixbufPixbufPropertyInfo ,
#endif
clearGutterRendererPixbufPixbuf ,
constructGutterRendererPixbufPixbuf ,
getGutterRendererPixbufPixbuf ,
#if defined(ENABLE_OVERLOADING)
gutterRendererPixbufPixbuf ,
#endif
setGutterRendererPixbufPixbuf ,
) 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.BasicTypes as B.Types
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GArray as B.GArray
import qualified Data.GI.Base.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GHashTable as B.GHT
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 Control.Monad.IO.Class as MIO
import qualified Data.Coerce as Coerce
import qualified Data.Text as T
import qualified Data.Kind as DK
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 GHC.Records as R
import qualified Data.Word as DW
import qualified Data.Int as DI
import qualified System.Posix.Types as SPT
import qualified Foreign.C.Types as FCT
#if MIN_VERSION_base(4,18,0)
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.Gdk.Flags as Gdk.Flags
import qualified GI.Gdk.Interfaces.Paintable as Gdk.Paintable
import qualified GI.Gdk.Structs.RGBA as Gdk.RGBA
import qualified GI.Gdk.Structs.Rectangle as Gdk.Rectangle
import qualified GI.GdkPixbuf.Objects.Pixbuf as GdkPixbuf.Pixbuf
import qualified GI.Gio.Callbacks as Gio.Callbacks
import qualified GI.Gio.Flags as Gio.Flags
import qualified GI.Gio.Interfaces.AsyncResult as Gio.AsyncResult
import qualified GI.Gio.Interfaces.Icon as Gio.Icon
import qualified GI.Gio.Interfaces.ListModel as Gio.ListModel
import qualified GI.Gio.Objects.Cancellable as Gio.Cancellable
import qualified GI.Gio.Objects.Settings as Gio.Settings
import qualified GI.Gtk.Enums as Gtk.Enums
import qualified GI.Gtk.Interfaces.Accessible as Gtk.Accessible
import qualified GI.Gtk.Interfaces.AccessibleText as Gtk.AccessibleText
import qualified GI.Gtk.Interfaces.Buildable as Gtk.Buildable
import qualified GI.Gtk.Interfaces.ConstraintTarget as Gtk.ConstraintTarget
import qualified GI.Gtk.Interfaces.Scrollable as Gtk.Scrollable
import qualified GI.Gtk.Objects.TextBuffer as Gtk.TextBuffer
import qualified GI.Gtk.Objects.TextMark as Gtk.TextMark
import qualified GI.Gtk.Objects.TextTag as Gtk.TextTag
import qualified GI.Gtk.Objects.TextTagTable as Gtk.TextTagTable
import qualified GI.Gtk.Objects.TextView as Gtk.TextView
import qualified GI.Gtk.Objects.Widget as Gtk.Widget
import qualified GI.Gtk.Structs.TextIter as Gtk.TextIter
import {-# SOURCE #-} qualified GI.GtkSource.Enums as GtkSource.Enums
import {-# SOURCE #-} qualified GI.GtkSource.Flags as GtkSource.Flags
import {-# SOURCE #-} qualified GI.GtkSource.Interfaces.CompletionProposal as GtkSource.CompletionProposal
import {-# SOURCE #-} qualified GI.GtkSource.Interfaces.CompletionProvider as GtkSource.CompletionProvider
import {-# SOURCE #-} qualified GI.GtkSource.Interfaces.HoverProvider as GtkSource.HoverProvider
import {-# SOURCE #-} qualified GI.GtkSource.Interfaces.Indenter as GtkSource.Indenter
import {-# SOURCE #-} qualified GI.GtkSource.Objects.Buffer as GtkSource.Buffer
import {-# SOURCE #-} qualified GI.GtkSource.Objects.Completion as GtkSource.Completion
import {-# SOURCE #-} qualified GI.GtkSource.Objects.CompletionCell as GtkSource.CompletionCell
import {-# SOURCE #-} qualified GI.GtkSource.Objects.CompletionContext as GtkSource.CompletionContext
import {-# SOURCE #-} qualified GI.GtkSource.Objects.Gutter as GtkSource.Gutter
import {-# SOURCE #-} qualified GI.GtkSource.Objects.GutterLines as GtkSource.GutterLines
import {-# SOURCE #-} qualified GI.GtkSource.Objects.GutterRenderer as GtkSource.GutterRenderer
import {-# SOURCE #-} qualified GI.GtkSource.Objects.Hover as GtkSource.Hover
import {-# SOURCE #-} qualified GI.GtkSource.Objects.HoverContext as GtkSource.HoverContext
import {-# SOURCE #-} qualified GI.GtkSource.Objects.HoverDisplay as GtkSource.HoverDisplay
import {-# SOURCE #-} qualified GI.GtkSource.Objects.Language as GtkSource.Language
import {-# SOURCE #-} qualified GI.GtkSource.Objects.Mark as GtkSource.Mark
import {-# SOURCE #-} qualified GI.GtkSource.Objects.MarkAttributes as GtkSource.MarkAttributes
import {-# SOURCE #-} qualified GI.GtkSource.Objects.Snippet as GtkSource.Snippet
import {-# SOURCE #-} qualified GI.GtkSource.Objects.SnippetChunk as GtkSource.SnippetChunk
import {-# SOURCE #-} qualified GI.GtkSource.Objects.SnippetContext as GtkSource.SnippetContext
import {-# SOURCE #-} qualified GI.GtkSource.Objects.SpaceDrawer as GtkSource.SpaceDrawer
import {-# SOURCE #-} qualified GI.GtkSource.Objects.Style as GtkSource.Style
import {-# SOURCE #-} qualified GI.GtkSource.Objects.StyleScheme as GtkSource.StyleScheme
import {-# SOURCE #-} qualified GI.GtkSource.Objects.View as GtkSource.View
import qualified GI.Pango.Enums as Pango.Enums
import qualified GI.Pango.Structs.AttrList as Pango.AttrList
#else
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.Gdk.Interfaces.Paintable as Gdk.Paintable
import qualified GI.GdkPixbuf.Objects.Pixbuf as GdkPixbuf.Pixbuf
import qualified GI.Gio.Interfaces.Icon as Gio.Icon
import qualified GI.Gtk.Interfaces.Accessible as Gtk.Accessible
import qualified GI.Gtk.Interfaces.Buildable as Gtk.Buildable
import qualified GI.Gtk.Interfaces.ConstraintTarget as Gtk.ConstraintTarget
import qualified GI.Gtk.Objects.Widget as Gtk.Widget
import {-# SOURCE #-} qualified GI.GtkSource.Objects.GutterRenderer as GtkSource.GutterRenderer
#endif
newtype GutterRendererPixbuf = GutterRendererPixbuf (SP.ManagedPtr GutterRendererPixbuf)
deriving (GutterRendererPixbuf -> GutterRendererPixbuf -> Bool
(GutterRendererPixbuf -> GutterRendererPixbuf -> Bool)
-> (GutterRendererPixbuf -> GutterRendererPixbuf -> Bool)
-> Eq GutterRendererPixbuf
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: GutterRendererPixbuf -> GutterRendererPixbuf -> Bool
== :: GutterRendererPixbuf -> GutterRendererPixbuf -> Bool
$c/= :: GutterRendererPixbuf -> GutterRendererPixbuf -> Bool
/= :: GutterRendererPixbuf -> GutterRendererPixbuf -> Bool
Eq)
instance SP.ManagedPtrNewtype GutterRendererPixbuf where
toManagedPtr :: GutterRendererPixbuf -> ManagedPtr GutterRendererPixbuf
toManagedPtr (GutterRendererPixbuf ManagedPtr GutterRendererPixbuf
p) = ManagedPtr GutterRendererPixbuf
p
foreign import ccall "gtk_source_gutter_renderer_pixbuf_get_type"
c_gtk_source_gutter_renderer_pixbuf_get_type :: IO B.Types.GType
instance B.Types.TypedObject GutterRendererPixbuf where
glibType :: IO GType
glibType = IO GType
c_gtk_source_gutter_renderer_pixbuf_get_type
instance B.Types.GObject GutterRendererPixbuf
class (SP.GObject o, O.IsDescendantOf GutterRendererPixbuf o) => IsGutterRendererPixbuf o
instance (SP.GObject o, O.IsDescendantOf GutterRendererPixbuf o) => IsGutterRendererPixbuf o
instance O.HasParentTypes GutterRendererPixbuf
type instance O.ParentTypes GutterRendererPixbuf = '[GtkSource.GutterRenderer.GutterRenderer, Gtk.Widget.Widget, GObject.Object.Object, Gtk.Accessible.Accessible, Gtk.Buildable.Buildable, Gtk.ConstraintTarget.ConstraintTarget]
toGutterRendererPixbuf :: (MIO.MonadIO m, IsGutterRendererPixbuf o) => o -> m GutterRendererPixbuf
toGutterRendererPixbuf :: forall (m :: * -> *) o.
(MonadIO m, IsGutterRendererPixbuf o) =>
o -> m GutterRendererPixbuf
toGutterRendererPixbuf = IO GutterRendererPixbuf -> m GutterRendererPixbuf
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO GutterRendererPixbuf -> m GutterRendererPixbuf)
-> (o -> IO GutterRendererPixbuf) -> o -> m GutterRendererPixbuf
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr GutterRendererPixbuf -> GutterRendererPixbuf)
-> o -> IO GutterRendererPixbuf
forall o o'.
(HasCallStack, ManagedPtrNewtype o, TypedObject o,
ManagedPtrNewtype o', TypedObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
B.ManagedPtr.unsafeCastTo ManagedPtr GutterRendererPixbuf -> GutterRendererPixbuf
GutterRendererPixbuf
instance B.GValue.IsGValue (Maybe GutterRendererPixbuf) where
gvalueGType_ :: IO GType
gvalueGType_ = IO GType
c_gtk_source_gutter_renderer_pixbuf_get_type
gvalueSet_ :: Ptr GValue -> Maybe GutterRendererPixbuf -> IO ()
gvalueSet_ Ptr GValue
gv Maybe GutterRendererPixbuf
P.Nothing = Ptr GValue -> Ptr GutterRendererPixbuf -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv (Ptr GutterRendererPixbuf
forall a. Ptr a
FP.nullPtr :: FP.Ptr GutterRendererPixbuf)
gvalueSet_ Ptr GValue
gv (P.Just GutterRendererPixbuf
obj) = GutterRendererPixbuf
-> (Ptr GutterRendererPixbuf -> IO ()) -> IO ()
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr GutterRendererPixbuf
obj (Ptr GValue -> Ptr GutterRendererPixbuf -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv)
gvalueGet_ :: Ptr GValue -> IO (Maybe GutterRendererPixbuf)
gvalueGet_ Ptr GValue
gv = do
Ptr GutterRendererPixbuf
ptr <- Ptr GValue -> IO (Ptr GutterRendererPixbuf)
forall a. GObject a => Ptr GValue -> IO (Ptr a)
B.GValue.get_object Ptr GValue
gv :: IO (FP.Ptr GutterRendererPixbuf)
if Ptr GutterRendererPixbuf
ptr Ptr GutterRendererPixbuf -> Ptr GutterRendererPixbuf -> Bool
forall a. Eq a => a -> a -> Bool
/= Ptr GutterRendererPixbuf
forall a. Ptr a
FP.nullPtr
then GutterRendererPixbuf -> Maybe GutterRendererPixbuf
forall a. a -> Maybe a
P.Just (GutterRendererPixbuf -> Maybe GutterRendererPixbuf)
-> IO GutterRendererPixbuf -> IO (Maybe GutterRendererPixbuf)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> (ManagedPtr GutterRendererPixbuf -> GutterRendererPixbuf)
-> Ptr GutterRendererPixbuf -> IO GutterRendererPixbuf
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr GutterRendererPixbuf -> GutterRendererPixbuf
GutterRendererPixbuf Ptr GutterRendererPixbuf
ptr
else Maybe GutterRendererPixbuf -> IO (Maybe GutterRendererPixbuf)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe GutterRendererPixbuf
forall a. Maybe a
P.Nothing
#if defined(ENABLE_OVERLOADING)
type family ResolveGutterRendererPixbufMethod (t :: Symbol) (o :: DK.Type) :: DK.Type where
ResolveGutterRendererPixbufMethod "actionSetEnabled" o = Gtk.Widget.WidgetActionSetEnabledMethodInfo
ResolveGutterRendererPixbufMethod "activate" o = GtkSource.GutterRenderer.GutterRendererActivateMethodInfo
ResolveGutterRendererPixbufMethod "activateAction" o = Gtk.Widget.WidgetActivateActionMethodInfo
ResolveGutterRendererPixbufMethod "activateDefault" o = Gtk.Widget.WidgetActivateDefaultMethodInfo
ResolveGutterRendererPixbufMethod "addController" o = Gtk.Widget.WidgetAddControllerMethodInfo
ResolveGutterRendererPixbufMethod "addCssClass" o = Gtk.Widget.WidgetAddCssClassMethodInfo
ResolveGutterRendererPixbufMethod "addMnemonicLabel" o = Gtk.Widget.WidgetAddMnemonicLabelMethodInfo
ResolveGutterRendererPixbufMethod "addTickCallback" o = Gtk.Widget.WidgetAddTickCallbackMethodInfo
ResolveGutterRendererPixbufMethod "alignCell" o = GtkSource.GutterRenderer.GutterRendererAlignCellMethodInfo
ResolveGutterRendererPixbufMethod "allocate" o = Gtk.Widget.WidgetAllocateMethodInfo
ResolveGutterRendererPixbufMethod "announce" o = Gtk.Accessible.AccessibleAnnounceMethodInfo
ResolveGutterRendererPixbufMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveGutterRendererPixbufMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveGutterRendererPixbufMethod "childFocus" o = Gtk.Widget.WidgetChildFocusMethodInfo
ResolveGutterRendererPixbufMethod "computeBounds" o = Gtk.Widget.WidgetComputeBoundsMethodInfo
ResolveGutterRendererPixbufMethod "computeExpand" o = Gtk.Widget.WidgetComputeExpandMethodInfo
ResolveGutterRendererPixbufMethod "computePoint" o = Gtk.Widget.WidgetComputePointMethodInfo
ResolveGutterRendererPixbufMethod "computeTransform" o = Gtk.Widget.WidgetComputeTransformMethodInfo
ResolveGutterRendererPixbufMethod "contains" o = Gtk.Widget.WidgetContainsMethodInfo
ResolveGutterRendererPixbufMethod "createPangoContext" o = Gtk.Widget.WidgetCreatePangoContextMethodInfo
ResolveGutterRendererPixbufMethod "createPangoLayout" o = Gtk.Widget.WidgetCreatePangoLayoutMethodInfo
ResolveGutterRendererPixbufMethod "disposeTemplate" o = Gtk.Widget.WidgetDisposeTemplateMethodInfo
ResolveGutterRendererPixbufMethod "dragCheckThreshold" o = Gtk.Widget.WidgetDragCheckThresholdMethodInfo
ResolveGutterRendererPixbufMethod "errorBell" o = Gtk.Widget.WidgetErrorBellMethodInfo
ResolveGutterRendererPixbufMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveGutterRendererPixbufMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveGutterRendererPixbufMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveGutterRendererPixbufMethod "grabFocus" o = Gtk.Widget.WidgetGrabFocusMethodInfo
ResolveGutterRendererPixbufMethod "hasCssClass" o = Gtk.Widget.WidgetHasCssClassMethodInfo
ResolveGutterRendererPixbufMethod "hasDefault" o = Gtk.Widget.WidgetHasDefaultMethodInfo
ResolveGutterRendererPixbufMethod "hasFocus" o = Gtk.Widget.WidgetHasFocusMethodInfo
ResolveGutterRendererPixbufMethod "hasVisibleFocus" o = Gtk.Widget.WidgetHasVisibleFocusMethodInfo
ResolveGutterRendererPixbufMethod "hide" o = Gtk.Widget.WidgetHideMethodInfo
ResolveGutterRendererPixbufMethod "inDestruction" o = Gtk.Widget.WidgetInDestructionMethodInfo
ResolveGutterRendererPixbufMethod "initTemplate" o = Gtk.Widget.WidgetInitTemplateMethodInfo
ResolveGutterRendererPixbufMethod "insertActionGroup" o = Gtk.Widget.WidgetInsertActionGroupMethodInfo
ResolveGutterRendererPixbufMethod "insertAfter" o = Gtk.Widget.WidgetInsertAfterMethodInfo
ResolveGutterRendererPixbufMethod "insertBefore" o = Gtk.Widget.WidgetInsertBeforeMethodInfo
ResolveGutterRendererPixbufMethod "isAncestor" o = Gtk.Widget.WidgetIsAncestorMethodInfo
ResolveGutterRendererPixbufMethod "isDrawable" o = Gtk.Widget.WidgetIsDrawableMethodInfo
ResolveGutterRendererPixbufMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveGutterRendererPixbufMethod "isFocus" o = Gtk.Widget.WidgetIsFocusMethodInfo
ResolveGutterRendererPixbufMethod "isSensitive" o = Gtk.Widget.WidgetIsSensitiveMethodInfo
ResolveGutterRendererPixbufMethod "isVisible" o = Gtk.Widget.WidgetIsVisibleMethodInfo
ResolveGutterRendererPixbufMethod "keynavFailed" o = Gtk.Widget.WidgetKeynavFailedMethodInfo
ResolveGutterRendererPixbufMethod "listMnemonicLabels" o = Gtk.Widget.WidgetListMnemonicLabelsMethodInfo
ResolveGutterRendererPixbufMethod "map" o = Gtk.Widget.WidgetMapMethodInfo
ResolveGutterRendererPixbufMethod "measure" o = Gtk.Widget.WidgetMeasureMethodInfo
ResolveGutterRendererPixbufMethod "mnemonicActivate" o = Gtk.Widget.WidgetMnemonicActivateMethodInfo
ResolveGutterRendererPixbufMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveGutterRendererPixbufMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveGutterRendererPixbufMethod "observeChildren" o = Gtk.Widget.WidgetObserveChildrenMethodInfo
ResolveGutterRendererPixbufMethod "observeControllers" o = Gtk.Widget.WidgetObserveControllersMethodInfo
ResolveGutterRendererPixbufMethod "overlayPaintable" o = GutterRendererPixbufOverlayPaintableMethodInfo
ResolveGutterRendererPixbufMethod "pick" o = Gtk.Widget.WidgetPickMethodInfo
ResolveGutterRendererPixbufMethod "queryActivatable" o = GtkSource.GutterRenderer.GutterRendererQueryActivatableMethodInfo
ResolveGutterRendererPixbufMethod "queueAllocate" o = Gtk.Widget.WidgetQueueAllocateMethodInfo
ResolveGutterRendererPixbufMethod "queueDraw" o = Gtk.Widget.WidgetQueueDrawMethodInfo
ResolveGutterRendererPixbufMethod "queueResize" o = Gtk.Widget.WidgetQueueResizeMethodInfo
ResolveGutterRendererPixbufMethod "realize" o = Gtk.Widget.WidgetRealizeMethodInfo
ResolveGutterRendererPixbufMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveGutterRendererPixbufMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveGutterRendererPixbufMethod "removeController" o = Gtk.Widget.WidgetRemoveControllerMethodInfo
ResolveGutterRendererPixbufMethod "removeCssClass" o = Gtk.Widget.WidgetRemoveCssClassMethodInfo
ResolveGutterRendererPixbufMethod "removeMnemonicLabel" o = Gtk.Widget.WidgetRemoveMnemonicLabelMethodInfo
ResolveGutterRendererPixbufMethod "removeTickCallback" o = Gtk.Widget.WidgetRemoveTickCallbackMethodInfo
ResolveGutterRendererPixbufMethod "resetProperty" o = Gtk.Accessible.AccessibleResetPropertyMethodInfo
ResolveGutterRendererPixbufMethod "resetRelation" o = Gtk.Accessible.AccessibleResetRelationMethodInfo
ResolveGutterRendererPixbufMethod "resetState" o = Gtk.Accessible.AccessibleResetStateMethodInfo
ResolveGutterRendererPixbufMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveGutterRendererPixbufMethod "shouldLayout" o = Gtk.Widget.WidgetShouldLayoutMethodInfo
ResolveGutterRendererPixbufMethod "show" o = Gtk.Widget.WidgetShowMethodInfo
ResolveGutterRendererPixbufMethod "sizeAllocate" o = Gtk.Widget.WidgetSizeAllocateMethodInfo
ResolveGutterRendererPixbufMethod "snapshotChild" o = Gtk.Widget.WidgetSnapshotChildMethodInfo
ResolveGutterRendererPixbufMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveGutterRendererPixbufMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveGutterRendererPixbufMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveGutterRendererPixbufMethod "translateCoordinates" o = Gtk.Widget.WidgetTranslateCoordinatesMethodInfo
ResolveGutterRendererPixbufMethod "triggerTooltipQuery" o = Gtk.Widget.WidgetTriggerTooltipQueryMethodInfo
ResolveGutterRendererPixbufMethod "unmap" o = Gtk.Widget.WidgetUnmapMethodInfo
ResolveGutterRendererPixbufMethod "unparent" o = Gtk.Widget.WidgetUnparentMethodInfo
ResolveGutterRendererPixbufMethod "unrealize" o = Gtk.Widget.WidgetUnrealizeMethodInfo
ResolveGutterRendererPixbufMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveGutterRendererPixbufMethod "unsetStateFlags" o = Gtk.Widget.WidgetUnsetStateFlagsMethodInfo
ResolveGutterRendererPixbufMethod "updateNextAccessibleSibling" o = Gtk.Accessible.AccessibleUpdateNextAccessibleSiblingMethodInfo
ResolveGutterRendererPixbufMethod "updateProperty" o = Gtk.Accessible.AccessibleUpdatePropertyMethodInfo
ResolveGutterRendererPixbufMethod "updateRelation" o = Gtk.Accessible.AccessibleUpdateRelationMethodInfo
ResolveGutterRendererPixbufMethod "updateState" o = Gtk.Accessible.AccessibleUpdateStateMethodInfo
ResolveGutterRendererPixbufMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveGutterRendererPixbufMethod "getAccessibleParent" o = Gtk.Accessible.AccessibleGetAccessibleParentMethodInfo
ResolveGutterRendererPixbufMethod "getAccessibleRole" o = Gtk.Accessible.AccessibleGetAccessibleRoleMethodInfo
ResolveGutterRendererPixbufMethod "getAlignmentMode" o = GtkSource.GutterRenderer.GutterRendererGetAlignmentModeMethodInfo
ResolveGutterRendererPixbufMethod "getAllocatedBaseline" o = Gtk.Widget.WidgetGetAllocatedBaselineMethodInfo
ResolveGutterRendererPixbufMethod "getAllocatedHeight" o = Gtk.Widget.WidgetGetAllocatedHeightMethodInfo
ResolveGutterRendererPixbufMethod "getAllocatedWidth" o = Gtk.Widget.WidgetGetAllocatedWidthMethodInfo
ResolveGutterRendererPixbufMethod "getAllocation" o = Gtk.Widget.WidgetGetAllocationMethodInfo
ResolveGutterRendererPixbufMethod "getAncestor" o = Gtk.Widget.WidgetGetAncestorMethodInfo
ResolveGutterRendererPixbufMethod "getAtContext" o = Gtk.Accessible.AccessibleGetAtContextMethodInfo
ResolveGutterRendererPixbufMethod "getBaseline" o = Gtk.Widget.WidgetGetBaselineMethodInfo
ResolveGutterRendererPixbufMethod "getBounds" o = Gtk.Accessible.AccessibleGetBoundsMethodInfo
ResolveGutterRendererPixbufMethod "getBuffer" o = GtkSource.GutterRenderer.GutterRendererGetBufferMethodInfo
ResolveGutterRendererPixbufMethod "getBuildableId" o = Gtk.Buildable.BuildableGetBuildableIdMethodInfo
ResolveGutterRendererPixbufMethod "getCanFocus" o = Gtk.Widget.WidgetGetCanFocusMethodInfo
ResolveGutterRendererPixbufMethod "getCanTarget" o = Gtk.Widget.WidgetGetCanTargetMethodInfo
ResolveGutterRendererPixbufMethod "getChildVisible" o = Gtk.Widget.WidgetGetChildVisibleMethodInfo
ResolveGutterRendererPixbufMethod "getClipboard" o = Gtk.Widget.WidgetGetClipboardMethodInfo
ResolveGutterRendererPixbufMethod "getColor" o = Gtk.Widget.WidgetGetColorMethodInfo
ResolveGutterRendererPixbufMethod "getCssClasses" o = Gtk.Widget.WidgetGetCssClassesMethodInfo
ResolveGutterRendererPixbufMethod "getCssName" o = Gtk.Widget.WidgetGetCssNameMethodInfo
ResolveGutterRendererPixbufMethod "getCursor" o = Gtk.Widget.WidgetGetCursorMethodInfo
ResolveGutterRendererPixbufMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveGutterRendererPixbufMethod "getDirection" o = Gtk.Widget.WidgetGetDirectionMethodInfo
ResolveGutterRendererPixbufMethod "getDisplay" o = Gtk.Widget.WidgetGetDisplayMethodInfo
ResolveGutterRendererPixbufMethod "getFirstAccessibleChild" o = Gtk.Accessible.AccessibleGetFirstAccessibleChildMethodInfo
ResolveGutterRendererPixbufMethod "getFirstChild" o = Gtk.Widget.WidgetGetFirstChildMethodInfo
ResolveGutterRendererPixbufMethod "getFocusChild" o = Gtk.Widget.WidgetGetFocusChildMethodInfo
ResolveGutterRendererPixbufMethod "getFocusOnClick" o = Gtk.Widget.WidgetGetFocusOnClickMethodInfo
ResolveGutterRendererPixbufMethod "getFocusable" o = Gtk.Widget.WidgetGetFocusableMethodInfo
ResolveGutterRendererPixbufMethod "getFontMap" o = Gtk.Widget.WidgetGetFontMapMethodInfo
ResolveGutterRendererPixbufMethod "getFontOptions" o = Gtk.Widget.WidgetGetFontOptionsMethodInfo
ResolveGutterRendererPixbufMethod "getFrameClock" o = Gtk.Widget.WidgetGetFrameClockMethodInfo
ResolveGutterRendererPixbufMethod "getGicon" o = GutterRendererPixbufGetGiconMethodInfo
ResolveGutterRendererPixbufMethod "getHalign" o = Gtk.Widget.WidgetGetHalignMethodInfo
ResolveGutterRendererPixbufMethod "getHasTooltip" o = Gtk.Widget.WidgetGetHasTooltipMethodInfo
ResolveGutterRendererPixbufMethod "getHeight" o = Gtk.Widget.WidgetGetHeightMethodInfo
ResolveGutterRendererPixbufMethod "getHexpand" o = Gtk.Widget.WidgetGetHexpandMethodInfo
ResolveGutterRendererPixbufMethod "getHexpandSet" o = Gtk.Widget.WidgetGetHexpandSetMethodInfo
ResolveGutterRendererPixbufMethod "getIconName" o = GutterRendererPixbufGetIconNameMethodInfo
ResolveGutterRendererPixbufMethod "getLastChild" o = Gtk.Widget.WidgetGetLastChildMethodInfo
ResolveGutterRendererPixbufMethod "getLayoutManager" o = Gtk.Widget.WidgetGetLayoutManagerMethodInfo
ResolveGutterRendererPixbufMethod "getMapped" o = Gtk.Widget.WidgetGetMappedMethodInfo
ResolveGutterRendererPixbufMethod "getMarginBottom" o = Gtk.Widget.WidgetGetMarginBottomMethodInfo
ResolveGutterRendererPixbufMethod "getMarginEnd" o = Gtk.Widget.WidgetGetMarginEndMethodInfo
ResolveGutterRendererPixbufMethod "getMarginStart" o = Gtk.Widget.WidgetGetMarginStartMethodInfo
ResolveGutterRendererPixbufMethod "getMarginTop" o = Gtk.Widget.WidgetGetMarginTopMethodInfo
ResolveGutterRendererPixbufMethod "getName" o = Gtk.Widget.WidgetGetNameMethodInfo
ResolveGutterRendererPixbufMethod "getNative" o = Gtk.Widget.WidgetGetNativeMethodInfo
ResolveGutterRendererPixbufMethod "getNextAccessibleSibling" o = Gtk.Accessible.AccessibleGetNextAccessibleSiblingMethodInfo
ResolveGutterRendererPixbufMethod "getNextSibling" o = Gtk.Widget.WidgetGetNextSiblingMethodInfo
ResolveGutterRendererPixbufMethod "getOpacity" o = Gtk.Widget.WidgetGetOpacityMethodInfo
ResolveGutterRendererPixbufMethod "getOverflow" o = Gtk.Widget.WidgetGetOverflowMethodInfo
ResolveGutterRendererPixbufMethod "getPaintable" o = GutterRendererPixbufGetPaintableMethodInfo
ResolveGutterRendererPixbufMethod "getPangoContext" o = Gtk.Widget.WidgetGetPangoContextMethodInfo
ResolveGutterRendererPixbufMethod "getParent" o = Gtk.Widget.WidgetGetParentMethodInfo
ResolveGutterRendererPixbufMethod "getPixbuf" o = GutterRendererPixbufGetPixbufMethodInfo
ResolveGutterRendererPixbufMethod "getPlatformState" o = Gtk.Accessible.AccessibleGetPlatformStateMethodInfo
ResolveGutterRendererPixbufMethod "getPreferredSize" o = Gtk.Widget.WidgetGetPreferredSizeMethodInfo
ResolveGutterRendererPixbufMethod "getPrevSibling" o = Gtk.Widget.WidgetGetPrevSiblingMethodInfo
ResolveGutterRendererPixbufMethod "getPrimaryClipboard" o = Gtk.Widget.WidgetGetPrimaryClipboardMethodInfo
ResolveGutterRendererPixbufMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveGutterRendererPixbufMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveGutterRendererPixbufMethod "getRealized" o = Gtk.Widget.WidgetGetRealizedMethodInfo
ResolveGutterRendererPixbufMethod "getReceivesDefault" o = Gtk.Widget.WidgetGetReceivesDefaultMethodInfo
ResolveGutterRendererPixbufMethod "getRequestMode" o = Gtk.Widget.WidgetGetRequestModeMethodInfo
ResolveGutterRendererPixbufMethod "getRoot" o = Gtk.Widget.WidgetGetRootMethodInfo
ResolveGutterRendererPixbufMethod "getScaleFactor" o = Gtk.Widget.WidgetGetScaleFactorMethodInfo
ResolveGutterRendererPixbufMethod "getSensitive" o = Gtk.Widget.WidgetGetSensitiveMethodInfo
ResolveGutterRendererPixbufMethod "getSettings" o = Gtk.Widget.WidgetGetSettingsMethodInfo
ResolveGutterRendererPixbufMethod "getSize" o = Gtk.Widget.WidgetGetSizeMethodInfo
ResolveGutterRendererPixbufMethod "getSizeRequest" o = Gtk.Widget.WidgetGetSizeRequestMethodInfo
ResolveGutterRendererPixbufMethod "getStateFlags" o = Gtk.Widget.WidgetGetStateFlagsMethodInfo
ResolveGutterRendererPixbufMethod "getStyleContext" o = Gtk.Widget.WidgetGetStyleContextMethodInfo
ResolveGutterRendererPixbufMethod "getTemplateChild" o = Gtk.Widget.WidgetGetTemplateChildMethodInfo
ResolveGutterRendererPixbufMethod "getTooltipMarkup" o = Gtk.Widget.WidgetGetTooltipMarkupMethodInfo
ResolveGutterRendererPixbufMethod "getTooltipText" o = Gtk.Widget.WidgetGetTooltipTextMethodInfo
ResolveGutterRendererPixbufMethod "getValign" o = Gtk.Widget.WidgetGetValignMethodInfo
ResolveGutterRendererPixbufMethod "getVexpand" o = Gtk.Widget.WidgetGetVexpandMethodInfo
ResolveGutterRendererPixbufMethod "getVexpandSet" o = Gtk.Widget.WidgetGetVexpandSetMethodInfo
ResolveGutterRendererPixbufMethod "getView" o = GtkSource.GutterRenderer.GutterRendererGetViewMethodInfo
ResolveGutterRendererPixbufMethod "getVisible" o = Gtk.Widget.WidgetGetVisibleMethodInfo
ResolveGutterRendererPixbufMethod "getWidth" o = Gtk.Widget.WidgetGetWidthMethodInfo
ResolveGutterRendererPixbufMethod "getXalign" o = GtkSource.GutterRenderer.GutterRendererGetXalignMethodInfo
ResolveGutterRendererPixbufMethod "getXpad" o = GtkSource.GutterRenderer.GutterRendererGetXpadMethodInfo
ResolveGutterRendererPixbufMethod "getYalign" o = GtkSource.GutterRenderer.GutterRendererGetYalignMethodInfo
ResolveGutterRendererPixbufMethod "getYpad" o = GtkSource.GutterRenderer.GutterRendererGetYpadMethodInfo
ResolveGutterRendererPixbufMethod "setAccessibleParent" o = Gtk.Accessible.AccessibleSetAccessibleParentMethodInfo
ResolveGutterRendererPixbufMethod "setAlignmentMode" o = GtkSource.GutterRenderer.GutterRendererSetAlignmentModeMethodInfo
ResolveGutterRendererPixbufMethod "setCanFocus" o = Gtk.Widget.WidgetSetCanFocusMethodInfo
ResolveGutterRendererPixbufMethod "setCanTarget" o = Gtk.Widget.WidgetSetCanTargetMethodInfo
ResolveGutterRendererPixbufMethod "setChildVisible" o = Gtk.Widget.WidgetSetChildVisibleMethodInfo
ResolveGutterRendererPixbufMethod "setCssClasses" o = Gtk.Widget.WidgetSetCssClassesMethodInfo
ResolveGutterRendererPixbufMethod "setCursor" o = Gtk.Widget.WidgetSetCursorMethodInfo
ResolveGutterRendererPixbufMethod "setCursorFromName" o = Gtk.Widget.WidgetSetCursorFromNameMethodInfo
ResolveGutterRendererPixbufMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveGutterRendererPixbufMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveGutterRendererPixbufMethod "setDirection" o = Gtk.Widget.WidgetSetDirectionMethodInfo
ResolveGutterRendererPixbufMethod "setFocusChild" o = Gtk.Widget.WidgetSetFocusChildMethodInfo
ResolveGutterRendererPixbufMethod "setFocusOnClick" o = Gtk.Widget.WidgetSetFocusOnClickMethodInfo
ResolveGutterRendererPixbufMethod "setFocusable" o = Gtk.Widget.WidgetSetFocusableMethodInfo
ResolveGutterRendererPixbufMethod "setFontMap" o = Gtk.Widget.WidgetSetFontMapMethodInfo
ResolveGutterRendererPixbufMethod "setFontOptions" o = Gtk.Widget.WidgetSetFontOptionsMethodInfo
ResolveGutterRendererPixbufMethod "setGicon" o = GutterRendererPixbufSetGiconMethodInfo
ResolveGutterRendererPixbufMethod "setHalign" o = Gtk.Widget.WidgetSetHalignMethodInfo
ResolveGutterRendererPixbufMethod "setHasTooltip" o = Gtk.Widget.WidgetSetHasTooltipMethodInfo
ResolveGutterRendererPixbufMethod "setHexpand" o = Gtk.Widget.WidgetSetHexpandMethodInfo
ResolveGutterRendererPixbufMethod "setHexpandSet" o = Gtk.Widget.WidgetSetHexpandSetMethodInfo
ResolveGutterRendererPixbufMethod "setIconName" o = GutterRendererPixbufSetIconNameMethodInfo
ResolveGutterRendererPixbufMethod "setLayoutManager" o = Gtk.Widget.WidgetSetLayoutManagerMethodInfo
ResolveGutterRendererPixbufMethod "setMarginBottom" o = Gtk.Widget.WidgetSetMarginBottomMethodInfo
ResolveGutterRendererPixbufMethod "setMarginEnd" o = Gtk.Widget.WidgetSetMarginEndMethodInfo
ResolveGutterRendererPixbufMethod "setMarginStart" o = Gtk.Widget.WidgetSetMarginStartMethodInfo
ResolveGutterRendererPixbufMethod "setMarginTop" o = Gtk.Widget.WidgetSetMarginTopMethodInfo
ResolveGutterRendererPixbufMethod "setName" o = Gtk.Widget.WidgetSetNameMethodInfo
ResolveGutterRendererPixbufMethod "setOpacity" o = Gtk.Widget.WidgetSetOpacityMethodInfo
ResolveGutterRendererPixbufMethod "setOverflow" o = Gtk.Widget.WidgetSetOverflowMethodInfo
ResolveGutterRendererPixbufMethod "setPaintable" o = GutterRendererPixbufSetPaintableMethodInfo
ResolveGutterRendererPixbufMethod "setParent" o = Gtk.Widget.WidgetSetParentMethodInfo
ResolveGutterRendererPixbufMethod "setPixbuf" o = GutterRendererPixbufSetPixbufMethodInfo
ResolveGutterRendererPixbufMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveGutterRendererPixbufMethod "setReceivesDefault" o = Gtk.Widget.WidgetSetReceivesDefaultMethodInfo
ResolveGutterRendererPixbufMethod "setSensitive" o = Gtk.Widget.WidgetSetSensitiveMethodInfo
ResolveGutterRendererPixbufMethod "setSizeRequest" o = Gtk.Widget.WidgetSetSizeRequestMethodInfo
ResolveGutterRendererPixbufMethod "setStateFlags" o = Gtk.Widget.WidgetSetStateFlagsMethodInfo
ResolveGutterRendererPixbufMethod "setTooltipMarkup" o = Gtk.Widget.WidgetSetTooltipMarkupMethodInfo
ResolveGutterRendererPixbufMethod "setTooltipText" o = Gtk.Widget.WidgetSetTooltipTextMethodInfo
ResolveGutterRendererPixbufMethod "setValign" o = Gtk.Widget.WidgetSetValignMethodInfo
ResolveGutterRendererPixbufMethod "setVexpand" o = Gtk.Widget.WidgetSetVexpandMethodInfo
ResolveGutterRendererPixbufMethod "setVexpandSet" o = Gtk.Widget.WidgetSetVexpandSetMethodInfo
ResolveGutterRendererPixbufMethod "setVisible" o = Gtk.Widget.WidgetSetVisibleMethodInfo
ResolveGutterRendererPixbufMethod "setXalign" o = GtkSource.GutterRenderer.GutterRendererSetXalignMethodInfo
ResolveGutterRendererPixbufMethod "setXpad" o = GtkSource.GutterRenderer.GutterRendererSetXpadMethodInfo
ResolveGutterRendererPixbufMethod "setYalign" o = GtkSource.GutterRenderer.GutterRendererSetYalignMethodInfo
ResolveGutterRendererPixbufMethod "setYpad" o = GtkSource.GutterRenderer.GutterRendererSetYpadMethodInfo
ResolveGutterRendererPixbufMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveGutterRendererPixbufMethod t GutterRendererPixbuf, O.OverloadedMethod info GutterRendererPixbuf p) => OL.IsLabel t (GutterRendererPixbuf -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod @info
#else
fromLabel _ = O.overloadedMethod @info
#endif
#if MIN_VERSION_base(4,13,0)
instance (info ~ ResolveGutterRendererPixbufMethod t GutterRendererPixbuf, O.OverloadedMethod info GutterRendererPixbuf p, R.HasField t GutterRendererPixbuf p) => R.HasField t GutterRendererPixbuf p where
getField = O.overloadedMethod @info
#endif
instance (info ~ ResolveGutterRendererPixbufMethod t GutterRendererPixbuf, O.OverloadedMethodInfo info GutterRendererPixbuf) => OL.IsLabel t (O.MethodProxy info GutterRendererPixbuf) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.MethodProxy
#else
fromLabel _ = O.MethodProxy
#endif
#endif
getGutterRendererPixbufGicon :: (MonadIO m, IsGutterRendererPixbuf o) => o -> m Gio.Icon.Icon
getGutterRendererPixbufGicon :: forall (m :: * -> *) o.
(MonadIO m, IsGutterRendererPixbuf o) =>
o -> m Icon
getGutterRendererPixbufGicon o
obj = IO Icon -> m Icon
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Icon -> m Icon) -> IO Icon -> m Icon
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Icon) -> IO Icon
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getGutterRendererPixbufGicon" (IO (Maybe Icon) -> IO Icon) -> IO (Maybe Icon) -> IO Icon
forall a b. (a -> b) -> a -> b
$ o -> String -> (ManagedPtr Icon -> Icon) -> IO (Maybe Icon)
forall a b.
(GObject a, GObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyObject o
obj String
"gicon" ManagedPtr Icon -> Icon
Gio.Icon.Icon
setGutterRendererPixbufGicon :: (MonadIO m, IsGutterRendererPixbuf o, Gio.Icon.IsIcon a) => o -> a -> m ()
setGutterRendererPixbufGicon :: forall (m :: * -> *) o a.
(MonadIO m, IsGutterRendererPixbuf o, IsIcon a) =>
o -> a -> m ()
setGutterRendererPixbufGicon o
obj a
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe a -> IO ()
forall a b.
(GObject a, GObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyObject o
obj String
"gicon" (a -> Maybe a
forall a. a -> Maybe a
Just a
val)
constructGutterRendererPixbufGicon :: (IsGutterRendererPixbuf o, MIO.MonadIO m, Gio.Icon.IsIcon a) => a -> m (GValueConstruct o)
constructGutterRendererPixbufGicon :: forall o (m :: * -> *) a.
(IsGutterRendererPixbuf o, MonadIO m, IsIcon a) =>
a -> m (GValueConstruct o)
constructGutterRendererPixbufGicon a
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe a -> IO (GValueConstruct o)
forall a o.
GObject a =>
String -> Maybe a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyObject String
"gicon" (a -> Maybe a
forall a. a -> Maybe a
P.Just a
val)
clearGutterRendererPixbufGicon :: (MonadIO m, IsGutterRendererPixbuf o) => o -> m ()
clearGutterRendererPixbufGicon :: forall (m :: * -> *) o.
(MonadIO m, IsGutterRendererPixbuf o) =>
o -> m ()
clearGutterRendererPixbufGicon o
obj = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Icon -> IO ()
forall a b.
(GObject a, GObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyObject o
obj String
"gicon" (Maybe Icon
forall a. Maybe a
Nothing :: Maybe Gio.Icon.Icon)
#if defined(ENABLE_OVERLOADING)
data GutterRendererPixbufGiconPropertyInfo
instance AttrInfo GutterRendererPixbufGiconPropertyInfo where
type AttrAllowedOps GutterRendererPixbufGiconPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint GutterRendererPixbufGiconPropertyInfo = IsGutterRendererPixbuf
type AttrSetTypeConstraint GutterRendererPixbufGiconPropertyInfo = Gio.Icon.IsIcon
type AttrTransferTypeConstraint GutterRendererPixbufGiconPropertyInfo = Gio.Icon.IsIcon
type AttrTransferType GutterRendererPixbufGiconPropertyInfo = Gio.Icon.Icon
type AttrGetType GutterRendererPixbufGiconPropertyInfo = Gio.Icon.Icon
type AttrLabel GutterRendererPixbufGiconPropertyInfo = "gicon"
type AttrOrigin GutterRendererPixbufGiconPropertyInfo = GutterRendererPixbuf
attrGet = getGutterRendererPixbufGicon
attrSet = setGutterRendererPixbufGicon
attrTransfer _ v = do
unsafeCastTo Gio.Icon.Icon v
attrConstruct = constructGutterRendererPixbufGicon
attrClear = clearGutterRendererPixbufGicon
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.GtkSource.Objects.GutterRendererPixbuf.gicon"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtksource-5.0.1/docs/GI-GtkSource-Objects-GutterRendererPixbuf.html#g:attr:gicon"
})
#endif
getGutterRendererPixbufIconName :: (MonadIO m, IsGutterRendererPixbuf o) => o -> m T.Text
getGutterRendererPixbufIconName :: forall (m :: * -> *) o.
(MonadIO m, IsGutterRendererPixbuf o) =>
o -> m Text
getGutterRendererPixbufIconName o
obj = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Text) -> IO Text
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getGutterRendererPixbufIconName" (IO (Maybe Text) -> IO Text) -> IO (Maybe Text) -> IO 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 String
"icon-name"
setGutterRendererPixbufIconName :: (MonadIO m, IsGutterRendererPixbuf o) => o -> T.Text -> m ()
setGutterRendererPixbufIconName :: forall (m :: * -> *) o.
(MonadIO m, IsGutterRendererPixbuf o) =>
o -> Text -> m ()
setGutterRendererPixbufIconName o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"icon-name" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructGutterRendererPixbufIconName :: (IsGutterRendererPixbuf o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructGutterRendererPixbufIconName :: forall o (m :: * -> *).
(IsGutterRendererPixbuf o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructGutterRendererPixbufIconName Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"icon-name" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
clearGutterRendererPixbufIconName :: (MonadIO m, IsGutterRendererPixbuf o) => o -> m ()
clearGutterRendererPixbufIconName :: forall (m :: * -> *) o.
(MonadIO m, IsGutterRendererPixbuf o) =>
o -> m ()
clearGutterRendererPixbufIconName o
obj = IO () -> m ()
forall a. IO a -> m a
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 String
"icon-name" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data GutterRendererPixbufIconNamePropertyInfo
instance AttrInfo GutterRendererPixbufIconNamePropertyInfo where
type AttrAllowedOps GutterRendererPixbufIconNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint GutterRendererPixbufIconNamePropertyInfo = IsGutterRendererPixbuf
type AttrSetTypeConstraint GutterRendererPixbufIconNamePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint GutterRendererPixbufIconNamePropertyInfo = (~) T.Text
type AttrTransferType GutterRendererPixbufIconNamePropertyInfo = T.Text
type AttrGetType GutterRendererPixbufIconNamePropertyInfo = T.Text
type AttrLabel GutterRendererPixbufIconNamePropertyInfo = "icon-name"
type AttrOrigin GutterRendererPixbufIconNamePropertyInfo = GutterRendererPixbuf
attrGet = getGutterRendererPixbufIconName
attrSet = setGutterRendererPixbufIconName
attrTransfer _ v = do
return v
attrConstruct = constructGutterRendererPixbufIconName
attrClear = clearGutterRendererPixbufIconName
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.GtkSource.Objects.GutterRendererPixbuf.iconName"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtksource-5.0.1/docs/GI-GtkSource-Objects-GutterRendererPixbuf.html#g:attr:iconName"
})
#endif
getGutterRendererPixbufPaintable :: (MonadIO m, IsGutterRendererPixbuf o) => o -> m (Maybe Gdk.Paintable.Paintable)
getGutterRendererPixbufPaintable :: forall (m :: * -> *) o.
(MonadIO m, IsGutterRendererPixbuf o) =>
o -> m (Maybe Paintable)
getGutterRendererPixbufPaintable o
obj = IO (Maybe Paintable) -> m (Maybe Paintable)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (Maybe Paintable) -> m (Maybe Paintable))
-> IO (Maybe Paintable) -> m (Maybe Paintable)
forall a b. (a -> b) -> a -> b
$ o
-> String
-> (ManagedPtr Paintable -> Paintable)
-> IO (Maybe Paintable)
forall a b.
(GObject a, GObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyObject o
obj String
"paintable" ManagedPtr Paintable -> Paintable
Gdk.Paintable.Paintable
setGutterRendererPixbufPaintable :: (MonadIO m, IsGutterRendererPixbuf o, Gdk.Paintable.IsPaintable a) => o -> a -> m ()
setGutterRendererPixbufPaintable :: forall (m :: * -> *) o a.
(MonadIO m, IsGutterRendererPixbuf o, IsPaintable a) =>
o -> a -> m ()
setGutterRendererPixbufPaintable o
obj a
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe a -> IO ()
forall a b.
(GObject a, GObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyObject o
obj String
"paintable" (a -> Maybe a
forall a. a -> Maybe a
Just a
val)
constructGutterRendererPixbufPaintable :: (IsGutterRendererPixbuf o, MIO.MonadIO m, Gdk.Paintable.IsPaintable a) => a -> m (GValueConstruct o)
constructGutterRendererPixbufPaintable :: forall o (m :: * -> *) a.
(IsGutterRendererPixbuf o, MonadIO m, IsPaintable a) =>
a -> m (GValueConstruct o)
constructGutterRendererPixbufPaintable a
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe a -> IO (GValueConstruct o)
forall a o.
GObject a =>
String -> Maybe a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyObject String
"paintable" (a -> Maybe a
forall a. a -> Maybe a
P.Just a
val)
clearGutterRendererPixbufPaintable :: (MonadIO m, IsGutterRendererPixbuf o) => o -> m ()
clearGutterRendererPixbufPaintable :: forall (m :: * -> *) o.
(MonadIO m, IsGutterRendererPixbuf o) =>
o -> m ()
clearGutterRendererPixbufPaintable o
obj = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Paintable -> IO ()
forall a b.
(GObject a, GObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyObject o
obj String
"paintable" (Maybe Paintable
forall a. Maybe a
Nothing :: Maybe Gdk.Paintable.Paintable)
#if defined(ENABLE_OVERLOADING)
data GutterRendererPixbufPaintablePropertyInfo
instance AttrInfo GutterRendererPixbufPaintablePropertyInfo where
type AttrAllowedOps GutterRendererPixbufPaintablePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint GutterRendererPixbufPaintablePropertyInfo = IsGutterRendererPixbuf
type AttrSetTypeConstraint GutterRendererPixbufPaintablePropertyInfo = Gdk.Paintable.IsPaintable
type AttrTransferTypeConstraint GutterRendererPixbufPaintablePropertyInfo = Gdk.Paintable.IsPaintable
type AttrTransferType GutterRendererPixbufPaintablePropertyInfo = Gdk.Paintable.Paintable
type AttrGetType GutterRendererPixbufPaintablePropertyInfo = (Maybe Gdk.Paintable.Paintable)
type AttrLabel GutterRendererPixbufPaintablePropertyInfo = "paintable"
type AttrOrigin GutterRendererPixbufPaintablePropertyInfo = GutterRendererPixbuf
attrGet = getGutterRendererPixbufPaintable
attrSet = setGutterRendererPixbufPaintable
attrTransfer _ v = do
unsafeCastTo Gdk.Paintable.Paintable v
attrConstruct = constructGutterRendererPixbufPaintable
attrClear = clearGutterRendererPixbufPaintable
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.GtkSource.Objects.GutterRendererPixbuf.paintable"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtksource-5.0.1/docs/GI-GtkSource-Objects-GutterRendererPixbuf.html#g:attr:paintable"
})
#endif
getGutterRendererPixbufPixbuf :: (MonadIO m, IsGutterRendererPixbuf o) => o -> m GdkPixbuf.Pixbuf.Pixbuf
getGutterRendererPixbufPixbuf :: forall (m :: * -> *) o.
(MonadIO m, IsGutterRendererPixbuf o) =>
o -> m Pixbuf
getGutterRendererPixbufPixbuf o
obj = IO Pixbuf -> m Pixbuf
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Pixbuf -> m Pixbuf) -> IO Pixbuf -> m Pixbuf
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Pixbuf) -> IO Pixbuf
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getGutterRendererPixbufPixbuf" (IO (Maybe Pixbuf) -> IO Pixbuf) -> IO (Maybe Pixbuf) -> IO Pixbuf
forall a b. (a -> b) -> a -> b
$ o -> String -> (ManagedPtr Pixbuf -> Pixbuf) -> IO (Maybe Pixbuf)
forall a b.
(GObject a, GObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyObject o
obj String
"pixbuf" ManagedPtr Pixbuf -> Pixbuf
GdkPixbuf.Pixbuf.Pixbuf
setGutterRendererPixbufPixbuf :: (MonadIO m, IsGutterRendererPixbuf o, GdkPixbuf.Pixbuf.IsPixbuf a) => o -> a -> m ()
setGutterRendererPixbufPixbuf :: forall (m :: * -> *) o a.
(MonadIO m, IsGutterRendererPixbuf o, IsPixbuf a) =>
o -> a -> m ()
setGutterRendererPixbufPixbuf o
obj a
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe a -> IO ()
forall a b.
(GObject a, GObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyObject o
obj String
"pixbuf" (a -> Maybe a
forall a. a -> Maybe a
Just a
val)
constructGutterRendererPixbufPixbuf :: (IsGutterRendererPixbuf o, MIO.MonadIO m, GdkPixbuf.Pixbuf.IsPixbuf a) => a -> m (GValueConstruct o)
constructGutterRendererPixbufPixbuf :: forall o (m :: * -> *) a.
(IsGutterRendererPixbuf o, MonadIO m, IsPixbuf a) =>
a -> m (GValueConstruct o)
constructGutterRendererPixbufPixbuf a
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe a -> IO (GValueConstruct o)
forall a o.
GObject a =>
String -> Maybe a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyObject String
"pixbuf" (a -> Maybe a
forall a. a -> Maybe a
P.Just a
val)
clearGutterRendererPixbufPixbuf :: (MonadIO m, IsGutterRendererPixbuf o) => o -> m ()
clearGutterRendererPixbufPixbuf :: forall (m :: * -> *) o.
(MonadIO m, IsGutterRendererPixbuf o) =>
o -> m ()
clearGutterRendererPixbufPixbuf o
obj = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Pixbuf -> IO ()
forall a b.
(GObject a, GObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyObject o
obj String
"pixbuf" (Maybe Pixbuf
forall a. Maybe a
Nothing :: Maybe GdkPixbuf.Pixbuf.Pixbuf)
#if defined(ENABLE_OVERLOADING)
data GutterRendererPixbufPixbufPropertyInfo
instance AttrInfo GutterRendererPixbufPixbufPropertyInfo where
type AttrAllowedOps GutterRendererPixbufPixbufPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint GutterRendererPixbufPixbufPropertyInfo = IsGutterRendererPixbuf
type AttrSetTypeConstraint GutterRendererPixbufPixbufPropertyInfo = GdkPixbuf.Pixbuf.IsPixbuf
type AttrTransferTypeConstraint GutterRendererPixbufPixbufPropertyInfo = GdkPixbuf.Pixbuf.IsPixbuf
type AttrTransferType GutterRendererPixbufPixbufPropertyInfo = GdkPixbuf.Pixbuf.Pixbuf
type AttrGetType GutterRendererPixbufPixbufPropertyInfo = GdkPixbuf.Pixbuf.Pixbuf
type AttrLabel GutterRendererPixbufPixbufPropertyInfo = "pixbuf"
type AttrOrigin GutterRendererPixbufPixbufPropertyInfo = GutterRendererPixbuf
attrGet = getGutterRendererPixbufPixbuf
attrSet = setGutterRendererPixbufPixbuf
attrTransfer _ v = do
unsafeCastTo GdkPixbuf.Pixbuf.Pixbuf v
attrConstruct = constructGutterRendererPixbufPixbuf
attrClear = clearGutterRendererPixbufPixbuf
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.GtkSource.Objects.GutterRendererPixbuf.pixbuf"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtksource-5.0.1/docs/GI-GtkSource-Objects-GutterRendererPixbuf.html#g:attr:pixbuf"
})
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList GutterRendererPixbuf
type instance O.AttributeList GutterRendererPixbuf = GutterRendererPixbufAttributeList
type GutterRendererPixbufAttributeList = ('[ '("accessibleRole", Gtk.Accessible.AccessibleAccessibleRolePropertyInfo), '("alignmentMode", GtkSource.GutterRenderer.GutterRendererAlignmentModePropertyInfo), '("canFocus", Gtk.Widget.WidgetCanFocusPropertyInfo), '("canTarget", Gtk.Widget.WidgetCanTargetPropertyInfo), '("cssClasses", Gtk.Widget.WidgetCssClassesPropertyInfo), '("cssName", Gtk.Widget.WidgetCssNamePropertyInfo), '("cursor", Gtk.Widget.WidgetCursorPropertyInfo), '("focusOnClick", Gtk.Widget.WidgetFocusOnClickPropertyInfo), '("focusable", Gtk.Widget.WidgetFocusablePropertyInfo), '("gicon", GutterRendererPixbufGiconPropertyInfo), '("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), '("iconName", GutterRendererPixbufIconNamePropertyInfo), '("layoutManager", Gtk.Widget.WidgetLayoutManagerPropertyInfo), '("lines", GtkSource.GutterRenderer.GutterRendererLinesPropertyInfo), '("marginBottom", Gtk.Widget.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.Widget.WidgetMarginEndPropertyInfo), '("marginStart", Gtk.Widget.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.Widget.WidgetMarginTopPropertyInfo), '("name", Gtk.Widget.WidgetNamePropertyInfo), '("opacity", Gtk.Widget.WidgetOpacityPropertyInfo), '("overflow", Gtk.Widget.WidgetOverflowPropertyInfo), '("paintable", GutterRendererPixbufPaintablePropertyInfo), '("parent", Gtk.Widget.WidgetParentPropertyInfo), '("pixbuf", GutterRendererPixbufPixbufPropertyInfo), '("receivesDefault", Gtk.Widget.WidgetReceivesDefaultPropertyInfo), '("root", Gtk.Widget.WidgetRootPropertyInfo), '("scaleFactor", Gtk.Widget.WidgetScaleFactorPropertyInfo), '("sensitive", Gtk.Widget.WidgetSensitivePropertyInfo), '("tooltipMarkup", Gtk.Widget.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.Widget.WidgetTooltipTextPropertyInfo), '("valign", Gtk.Widget.WidgetValignPropertyInfo), '("vexpand", Gtk.Widget.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.Widget.WidgetVexpandSetPropertyInfo), '("view", GtkSource.GutterRenderer.GutterRendererViewPropertyInfo), '("visible", Gtk.Widget.WidgetVisiblePropertyInfo), '("widthRequest", Gtk.Widget.WidgetWidthRequestPropertyInfo), '("xalign", GtkSource.GutterRenderer.GutterRendererXalignPropertyInfo), '("xpad", GtkSource.GutterRenderer.GutterRendererXpadPropertyInfo), '("yalign", GtkSource.GutterRenderer.GutterRendererYalignPropertyInfo), '("ypad", GtkSource.GutterRenderer.GutterRendererYpadPropertyInfo)] :: [(Symbol, DK.Type)])
#endif
#if defined(ENABLE_OVERLOADING)
gutterRendererPixbufGicon :: AttrLabelProxy "gicon"
gutterRendererPixbufGicon = AttrLabelProxy
gutterRendererPixbufIconName :: AttrLabelProxy "iconName"
gutterRendererPixbufIconName = AttrLabelProxy
gutterRendererPixbufPaintable :: AttrLabelProxy "paintable"
gutterRendererPixbufPaintable = AttrLabelProxy
gutterRendererPixbufPixbuf :: AttrLabelProxy "pixbuf"
gutterRendererPixbufPixbuf = AttrLabelProxy
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList GutterRendererPixbuf = GutterRendererPixbufSignalList
type GutterRendererPixbufSignalList = ('[ '("activate", GtkSource.GutterRenderer.GutterRendererActivateSignalInfo), '("destroy", Gtk.Widget.WidgetDestroySignalInfo), '("directionChanged", Gtk.Widget.WidgetDirectionChangedSignalInfo), '("hide", Gtk.Widget.WidgetHideSignalInfo), '("keynavFailed", Gtk.Widget.WidgetKeynavFailedSignalInfo), '("map", Gtk.Widget.WidgetMapSignalInfo), '("mnemonicActivate", Gtk.Widget.WidgetMnemonicActivateSignalInfo), '("moveFocus", Gtk.Widget.WidgetMoveFocusSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo), '("queryActivatable", GtkSource.GutterRenderer.GutterRendererQueryActivatableSignalInfo), '("queryData", GtkSource.GutterRenderer.GutterRendererQueryDataSignalInfo), '("queryTooltip", Gtk.Widget.WidgetQueryTooltipSignalInfo), '("realize", Gtk.Widget.WidgetRealizeSignalInfo), '("show", Gtk.Widget.WidgetShowSignalInfo), '("stateFlagsChanged", Gtk.Widget.WidgetStateFlagsChangedSignalInfo), '("unmap", Gtk.Widget.WidgetUnmapSignalInfo), '("unrealize", Gtk.Widget.WidgetUnrealizeSignalInfo)] :: [(Symbol, DK.Type)])
#endif
foreign import ccall "gtk_source_gutter_renderer_pixbuf_new" gtk_source_gutter_renderer_pixbuf_new ::
IO (Ptr GutterRendererPixbuf)
gutterRendererPixbufNew ::
(B.CallStack.HasCallStack, MonadIO m) =>
m GutterRendererPixbuf
gutterRendererPixbufNew :: forall (m :: * -> *).
(HasCallStack, MonadIO m) =>
m GutterRendererPixbuf
gutterRendererPixbufNew = IO GutterRendererPixbuf -> m GutterRendererPixbuf
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO GutterRendererPixbuf -> m GutterRendererPixbuf)
-> IO GutterRendererPixbuf -> m GutterRendererPixbuf
forall a b. (a -> b) -> a -> b
$ do
Ptr GutterRendererPixbuf
result <- IO (Ptr GutterRendererPixbuf)
gtk_source_gutter_renderer_pixbuf_new
Text -> Ptr GutterRendererPixbuf -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"gutterRendererPixbufNew" Ptr GutterRendererPixbuf
result
GutterRendererPixbuf
result' <- ((ManagedPtr GutterRendererPixbuf -> GutterRendererPixbuf)
-> Ptr GutterRendererPixbuf -> IO GutterRendererPixbuf
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
wrapObject ManagedPtr GutterRendererPixbuf -> GutterRendererPixbuf
GutterRendererPixbuf) Ptr GutterRendererPixbuf
result
GutterRendererPixbuf -> IO GutterRendererPixbuf
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return GutterRendererPixbuf
result'
#if defined(ENABLE_OVERLOADING)
#endif
foreign import ccall "gtk_source_gutter_renderer_pixbuf_get_gicon" gtk_source_gutter_renderer_pixbuf_get_gicon ::
Ptr GutterRendererPixbuf ->
IO (Ptr Gio.Icon.Icon)
gutterRendererPixbufGetGicon ::
(B.CallStack.HasCallStack, MonadIO m, IsGutterRendererPixbuf a) =>
a
-> m Gio.Icon.Icon
gutterRendererPixbufGetGicon :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsGutterRendererPixbuf a) =>
a -> m Icon
gutterRendererPixbufGetGicon a
renderer = IO Icon -> m Icon
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Icon -> m Icon) -> IO Icon -> m Icon
forall a b. (a -> b) -> a -> b
$ do
Ptr GutterRendererPixbuf
renderer' <- a -> IO (Ptr GutterRendererPixbuf)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
renderer
Ptr Icon
result <- Ptr GutterRendererPixbuf -> IO (Ptr Icon)
gtk_source_gutter_renderer_pixbuf_get_gicon Ptr GutterRendererPixbuf
renderer'
Text -> Ptr Icon -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"gutterRendererPixbufGetGicon" Ptr Icon
result
Icon
result' <- ((ManagedPtr Icon -> Icon) -> Ptr Icon -> IO Icon
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr Icon -> Icon
Gio.Icon.Icon) Ptr Icon
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
renderer
Icon -> IO Icon
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Icon
result'
#if defined(ENABLE_OVERLOADING)
data GutterRendererPixbufGetGiconMethodInfo
instance (signature ~ (m Gio.Icon.Icon), MonadIO m, IsGutterRendererPixbuf a) => O.OverloadedMethod GutterRendererPixbufGetGiconMethodInfo a signature where
overloadedMethod = gutterRendererPixbufGetGicon
instance O.OverloadedMethodInfo GutterRendererPixbufGetGiconMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.GtkSource.Objects.GutterRendererPixbuf.gutterRendererPixbufGetGicon",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtksource-5.0.1/docs/GI-GtkSource-Objects-GutterRendererPixbuf.html#v:gutterRendererPixbufGetGicon"
})
#endif
foreign import ccall "gtk_source_gutter_renderer_pixbuf_get_icon_name" gtk_source_gutter_renderer_pixbuf_get_icon_name ::
Ptr GutterRendererPixbuf ->
IO CString
gutterRendererPixbufGetIconName ::
(B.CallStack.HasCallStack, MonadIO m, IsGutterRendererPixbuf a) =>
a
-> m T.Text
gutterRendererPixbufGetIconName :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsGutterRendererPixbuf a) =>
a -> m Text
gutterRendererPixbufGetIconName a
renderer = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr GutterRendererPixbuf
renderer' <- a -> IO (Ptr GutterRendererPixbuf)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
renderer
CString
result <- Ptr GutterRendererPixbuf -> IO CString
gtk_source_gutter_renderer_pixbuf_get_icon_name Ptr GutterRendererPixbuf
renderer'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"gutterRendererPixbufGetIconName" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
renderer
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data GutterRendererPixbufGetIconNameMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsGutterRendererPixbuf a) => O.OverloadedMethod GutterRendererPixbufGetIconNameMethodInfo a signature where
overloadedMethod = gutterRendererPixbufGetIconName
instance O.OverloadedMethodInfo GutterRendererPixbufGetIconNameMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.GtkSource.Objects.GutterRendererPixbuf.gutterRendererPixbufGetIconName",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtksource-5.0.1/docs/GI-GtkSource-Objects-GutterRendererPixbuf.html#v:gutterRendererPixbufGetIconName"
})
#endif
foreign import ccall "gtk_source_gutter_renderer_pixbuf_get_paintable" gtk_source_gutter_renderer_pixbuf_get_paintable ::
Ptr GutterRendererPixbuf ->
IO (Ptr Gdk.Paintable.Paintable)
gutterRendererPixbufGetPaintable ::
(B.CallStack.HasCallStack, MonadIO m, IsGutterRendererPixbuf a) =>
a
-> m (Maybe Gdk.Paintable.Paintable)
gutterRendererPixbufGetPaintable :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsGutterRendererPixbuf a) =>
a -> m (Maybe Paintable)
gutterRendererPixbufGetPaintable a
renderer = IO (Maybe Paintable) -> m (Maybe Paintable)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Paintable) -> m (Maybe Paintable))
-> IO (Maybe Paintable) -> m (Maybe Paintable)
forall a b. (a -> b) -> a -> b
$ do
Ptr GutterRendererPixbuf
renderer' <- a -> IO (Ptr GutterRendererPixbuf)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
renderer
Ptr Paintable
result <- Ptr GutterRendererPixbuf -> IO (Ptr Paintable)
gtk_source_gutter_renderer_pixbuf_get_paintable Ptr GutterRendererPixbuf
renderer'
Maybe Paintable
maybeResult <- Ptr Paintable
-> (Ptr Paintable -> IO Paintable) -> IO (Maybe Paintable)
forall a b. Ptr a -> (Ptr a -> IO b) -> IO (Maybe b)
convertIfNonNull Ptr Paintable
result ((Ptr Paintable -> IO Paintable) -> IO (Maybe Paintable))
-> (Ptr Paintable -> IO Paintable) -> IO (Maybe Paintable)
forall a b. (a -> b) -> a -> b
$ \Ptr Paintable
result' -> do
Paintable
result'' <- ((ManagedPtr Paintable -> Paintable)
-> Ptr Paintable -> IO Paintable
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr Paintable -> Paintable
Gdk.Paintable.Paintable) Ptr Paintable
result'
Paintable -> IO Paintable
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Paintable
result''
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
renderer
Maybe Paintable -> IO (Maybe Paintable)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe Paintable
maybeResult
#if defined(ENABLE_OVERLOADING)
data GutterRendererPixbufGetPaintableMethodInfo
instance (signature ~ (m (Maybe Gdk.Paintable.Paintable)), MonadIO m, IsGutterRendererPixbuf a) => O.OverloadedMethod GutterRendererPixbufGetPaintableMethodInfo a signature where
overloadedMethod = gutterRendererPixbufGetPaintable
instance O.OverloadedMethodInfo GutterRendererPixbufGetPaintableMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.GtkSource.Objects.GutterRendererPixbuf.gutterRendererPixbufGetPaintable",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtksource-5.0.1/docs/GI-GtkSource-Objects-GutterRendererPixbuf.html#v:gutterRendererPixbufGetPaintable"
})
#endif
foreign import ccall "gtk_source_gutter_renderer_pixbuf_get_pixbuf" gtk_source_gutter_renderer_pixbuf_get_pixbuf ::
Ptr GutterRendererPixbuf ->
IO (Ptr GdkPixbuf.Pixbuf.Pixbuf)
gutterRendererPixbufGetPixbuf ::
(B.CallStack.HasCallStack, MonadIO m, IsGutterRendererPixbuf a) =>
a
-> m GdkPixbuf.Pixbuf.Pixbuf
gutterRendererPixbufGetPixbuf :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsGutterRendererPixbuf a) =>
a -> m Pixbuf
gutterRendererPixbufGetPixbuf a
renderer = IO Pixbuf -> m Pixbuf
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Pixbuf -> m Pixbuf) -> IO Pixbuf -> m Pixbuf
forall a b. (a -> b) -> a -> b
$ do
Ptr GutterRendererPixbuf
renderer' <- a -> IO (Ptr GutterRendererPixbuf)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
renderer
Ptr Pixbuf
result <- Ptr GutterRendererPixbuf -> IO (Ptr Pixbuf)
gtk_source_gutter_renderer_pixbuf_get_pixbuf Ptr GutterRendererPixbuf
renderer'
Text -> Ptr Pixbuf -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"gutterRendererPixbufGetPixbuf" Ptr Pixbuf
result
Pixbuf
result' <- ((ManagedPtr Pixbuf -> Pixbuf) -> Ptr Pixbuf -> IO Pixbuf
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr Pixbuf -> Pixbuf
GdkPixbuf.Pixbuf.Pixbuf) Ptr Pixbuf
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
renderer
Pixbuf -> IO Pixbuf
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Pixbuf
result'
#if defined(ENABLE_OVERLOADING)
data GutterRendererPixbufGetPixbufMethodInfo
instance (signature ~ (m GdkPixbuf.Pixbuf.Pixbuf), MonadIO m, IsGutterRendererPixbuf a) => O.OverloadedMethod GutterRendererPixbufGetPixbufMethodInfo a signature where
overloadedMethod = gutterRendererPixbufGetPixbuf
instance O.OverloadedMethodInfo GutterRendererPixbufGetPixbufMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.GtkSource.Objects.GutterRendererPixbuf.gutterRendererPixbufGetPixbuf",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtksource-5.0.1/docs/GI-GtkSource-Objects-GutterRendererPixbuf.html#v:gutterRendererPixbufGetPixbuf"
})
#endif
foreign import ccall "gtk_source_gutter_renderer_pixbuf_overlay_paintable" gtk_source_gutter_renderer_pixbuf_overlay_paintable ::
Ptr GutterRendererPixbuf ->
Ptr Gdk.Paintable.Paintable ->
IO ()
gutterRendererPixbufOverlayPaintable ::
(B.CallStack.HasCallStack, MonadIO m, IsGutterRendererPixbuf a, Gdk.Paintable.IsPaintable b) =>
a
-> b
-> m ()
gutterRendererPixbufOverlayPaintable :: forall (m :: * -> *) a b.
(HasCallStack, MonadIO m, IsGutterRendererPixbuf a,
IsPaintable b) =>
a -> b -> m ()
gutterRendererPixbufOverlayPaintable a
renderer b
paintable = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr GutterRendererPixbuf
renderer' <- a -> IO (Ptr GutterRendererPixbuf)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
renderer
Ptr Paintable
paintable' <- b -> IO (Ptr Paintable)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
paintable
Ptr GutterRendererPixbuf -> Ptr Paintable -> IO ()
gtk_source_gutter_renderer_pixbuf_overlay_paintable Ptr GutterRendererPixbuf
renderer' Ptr Paintable
paintable'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
renderer
b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr b
paintable
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data GutterRendererPixbufOverlayPaintableMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsGutterRendererPixbuf a, Gdk.Paintable.IsPaintable b) => O.OverloadedMethod GutterRendererPixbufOverlayPaintableMethodInfo a signature where
overloadedMethod = gutterRendererPixbufOverlayPaintable
instance O.OverloadedMethodInfo GutterRendererPixbufOverlayPaintableMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.GtkSource.Objects.GutterRendererPixbuf.gutterRendererPixbufOverlayPaintable",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtksource-5.0.1/docs/GI-GtkSource-Objects-GutterRendererPixbuf.html#v:gutterRendererPixbufOverlayPaintable"
})
#endif
foreign import ccall "gtk_source_gutter_renderer_pixbuf_set_gicon" gtk_source_gutter_renderer_pixbuf_set_gicon ::
Ptr GutterRendererPixbuf ->
Ptr Gio.Icon.Icon ->
IO ()
gutterRendererPixbufSetGicon ::
(B.CallStack.HasCallStack, MonadIO m, IsGutterRendererPixbuf a, Gio.Icon.IsIcon b) =>
a
-> Maybe (b)
-> m ()
gutterRendererPixbufSetGicon :: forall (m :: * -> *) a b.
(HasCallStack, MonadIO m, IsGutterRendererPixbuf a, IsIcon b) =>
a -> Maybe b -> m ()
gutterRendererPixbufSetGicon a
renderer Maybe b
icon = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr GutterRendererPixbuf
renderer' <- a -> IO (Ptr GutterRendererPixbuf)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
renderer
Ptr Icon
maybeIcon <- case Maybe b
icon of
Maybe b
Nothing -> Ptr Icon -> IO (Ptr Icon)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr Icon
forall a. Ptr a
nullPtr
Just b
jIcon -> do
Ptr Icon
jIcon' <- b -> IO (Ptr Icon)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
jIcon
Ptr Icon -> IO (Ptr Icon)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr Icon
jIcon'
Ptr GutterRendererPixbuf -> Ptr Icon -> IO ()
gtk_source_gutter_renderer_pixbuf_set_gicon Ptr GutterRendererPixbuf
renderer' Ptr Icon
maybeIcon
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
renderer
Maybe b -> (b -> IO ()) -> IO ()
forall (m :: * -> *) a. Monad m => Maybe a -> (a -> m ()) -> m ()
whenJust Maybe b
icon b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data GutterRendererPixbufSetGiconMethodInfo
instance (signature ~ (Maybe (b) -> m ()), MonadIO m, IsGutterRendererPixbuf a, Gio.Icon.IsIcon b) => O.OverloadedMethod GutterRendererPixbufSetGiconMethodInfo a signature where
overloadedMethod = gutterRendererPixbufSetGicon
instance O.OverloadedMethodInfo GutterRendererPixbufSetGiconMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.GtkSource.Objects.GutterRendererPixbuf.gutterRendererPixbufSetGicon",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtksource-5.0.1/docs/GI-GtkSource-Objects-GutterRendererPixbuf.html#v:gutterRendererPixbufSetGicon"
})
#endif
foreign import ccall "gtk_source_gutter_renderer_pixbuf_set_icon_name" gtk_source_gutter_renderer_pixbuf_set_icon_name ::
Ptr GutterRendererPixbuf ->
CString ->
IO ()
gutterRendererPixbufSetIconName ::
(B.CallStack.HasCallStack, MonadIO m, IsGutterRendererPixbuf a) =>
a
-> Maybe (T.Text)
-> m ()
gutterRendererPixbufSetIconName :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsGutterRendererPixbuf a) =>
a -> Maybe Text -> m ()
gutterRendererPixbufSetIconName a
renderer Maybe Text
iconName = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr GutterRendererPixbuf
renderer' <- a -> IO (Ptr GutterRendererPixbuf)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
renderer
CString
maybeIconName <- case Maybe Text
iconName of
Maybe Text
Nothing -> CString -> IO CString
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return CString
forall a. Ptr a
nullPtr
Just Text
jIconName -> do
CString
jIconName' <- Text -> IO CString
textToCString Text
jIconName
CString -> IO CString
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return CString
jIconName'
Ptr GutterRendererPixbuf -> CString -> IO ()
gtk_source_gutter_renderer_pixbuf_set_icon_name Ptr GutterRendererPixbuf
renderer' CString
maybeIconName
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
renderer
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
maybeIconName
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data GutterRendererPixbufSetIconNameMethodInfo
instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, IsGutterRendererPixbuf a) => O.OverloadedMethod GutterRendererPixbufSetIconNameMethodInfo a signature where
overloadedMethod = gutterRendererPixbufSetIconName
instance O.OverloadedMethodInfo GutterRendererPixbufSetIconNameMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.GtkSource.Objects.GutterRendererPixbuf.gutterRendererPixbufSetIconName",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtksource-5.0.1/docs/GI-GtkSource-Objects-GutterRendererPixbuf.html#v:gutterRendererPixbufSetIconName"
})
#endif
foreign import ccall "gtk_source_gutter_renderer_pixbuf_set_paintable" gtk_source_gutter_renderer_pixbuf_set_paintable ::
Ptr GutterRendererPixbuf ->
Ptr Gdk.Paintable.Paintable ->
IO ()
gutterRendererPixbufSetPaintable ::
(B.CallStack.HasCallStack, MonadIO m, IsGutterRendererPixbuf a, Gdk.Paintable.IsPaintable b) =>
a
-> Maybe (b)
-> m ()
gutterRendererPixbufSetPaintable :: forall (m :: * -> *) a b.
(HasCallStack, MonadIO m, IsGutterRendererPixbuf a,
IsPaintable b) =>
a -> Maybe b -> m ()
gutterRendererPixbufSetPaintable a
renderer Maybe b
paintable = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr GutterRendererPixbuf
renderer' <- a -> IO (Ptr GutterRendererPixbuf)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
renderer
Ptr Paintable
maybePaintable <- case Maybe b
paintable of
Maybe b
Nothing -> Ptr Paintable -> IO (Ptr Paintable)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr Paintable
forall a. Ptr a
nullPtr
Just b
jPaintable -> do
Ptr Paintable
jPaintable' <- b -> IO (Ptr Paintable)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
jPaintable
Ptr Paintable -> IO (Ptr Paintable)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr Paintable
jPaintable'
Ptr GutterRendererPixbuf -> Ptr Paintable -> IO ()
gtk_source_gutter_renderer_pixbuf_set_paintable Ptr GutterRendererPixbuf
renderer' Ptr Paintable
maybePaintable
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
renderer
Maybe b -> (b -> IO ()) -> IO ()
forall (m :: * -> *) a. Monad m => Maybe a -> (a -> m ()) -> m ()
whenJust Maybe b
paintable b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data GutterRendererPixbufSetPaintableMethodInfo
instance (signature ~ (Maybe (b) -> m ()), MonadIO m, IsGutterRendererPixbuf a, Gdk.Paintable.IsPaintable b) => O.OverloadedMethod GutterRendererPixbufSetPaintableMethodInfo a signature where
overloadedMethod = gutterRendererPixbufSetPaintable
instance O.OverloadedMethodInfo GutterRendererPixbufSetPaintableMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.GtkSource.Objects.GutterRendererPixbuf.gutterRendererPixbufSetPaintable",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtksource-5.0.1/docs/GI-GtkSource-Objects-GutterRendererPixbuf.html#v:gutterRendererPixbufSetPaintable"
})
#endif
foreign import ccall "gtk_source_gutter_renderer_pixbuf_set_pixbuf" gtk_source_gutter_renderer_pixbuf_set_pixbuf ::
Ptr GutterRendererPixbuf ->
Ptr GdkPixbuf.Pixbuf.Pixbuf ->
IO ()
gutterRendererPixbufSetPixbuf ::
(B.CallStack.HasCallStack, MonadIO m, IsGutterRendererPixbuf a, GdkPixbuf.Pixbuf.IsPixbuf b) =>
a
-> Maybe (b)
-> m ()
gutterRendererPixbufSetPixbuf :: forall (m :: * -> *) a b.
(HasCallStack, MonadIO m, IsGutterRendererPixbuf a, IsPixbuf b) =>
a -> Maybe b -> m ()
gutterRendererPixbufSetPixbuf a
renderer Maybe b
pixbuf = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr GutterRendererPixbuf
renderer' <- a -> IO (Ptr GutterRendererPixbuf)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
renderer
Ptr Pixbuf
maybePixbuf <- case Maybe b
pixbuf of
Maybe b
Nothing -> Ptr Pixbuf -> IO (Ptr Pixbuf)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr Pixbuf
forall a. Ptr a
nullPtr
Just b
jPixbuf -> do
Ptr Pixbuf
jPixbuf' <- b -> IO (Ptr Pixbuf)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
jPixbuf
Ptr Pixbuf -> IO (Ptr Pixbuf)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr Pixbuf
jPixbuf'
Ptr GutterRendererPixbuf -> Ptr Pixbuf -> IO ()
gtk_source_gutter_renderer_pixbuf_set_pixbuf Ptr GutterRendererPixbuf
renderer' Ptr Pixbuf
maybePixbuf
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
renderer
Maybe b -> (b -> IO ()) -> IO ()
forall (m :: * -> *) a. Monad m => Maybe a -> (a -> m ()) -> m ()
whenJust Maybe b
pixbuf b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data GutterRendererPixbufSetPixbufMethodInfo
instance (signature ~ (Maybe (b) -> m ()), MonadIO m, IsGutterRendererPixbuf a, GdkPixbuf.Pixbuf.IsPixbuf b) => O.OverloadedMethod GutterRendererPixbufSetPixbufMethodInfo a signature where
overloadedMethod = gutterRendererPixbufSetPixbuf
instance O.OverloadedMethodInfo GutterRendererPixbufSetPixbufMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.GtkSource.Objects.GutterRendererPixbuf.gutterRendererPixbufSetPixbuf",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtksource-5.0.1/docs/GI-GtkSource-Objects-GutterRendererPixbuf.html#v:gutterRendererPixbufSetPixbuf"
})
#endif