#define ENABLE_OVERLOADING (MIN_VERSION_haskell_gi_overloading(1,0,0) \
&& !defined(__HADDOCK_VERSION__))
module GI.Gtk.Objects.Calendar
(
Calendar(..) ,
IsCalendar ,
toCalendar ,
noCalendar ,
#if ENABLE_OVERLOADING
CalendarClearMarksMethodInfo ,
#endif
calendarClearMarks ,
#if ENABLE_OVERLOADING
CalendarGetDateMethodInfo ,
#endif
calendarGetDate ,
#if ENABLE_OVERLOADING
CalendarGetDayIsMarkedMethodInfo ,
#endif
calendarGetDayIsMarked ,
#if ENABLE_OVERLOADING
CalendarGetDetailHeightRowsMethodInfo ,
#endif
calendarGetDetailHeightRows ,
#if ENABLE_OVERLOADING
CalendarGetDetailWidthCharsMethodInfo ,
#endif
calendarGetDetailWidthChars ,
#if ENABLE_OVERLOADING
CalendarGetDisplayOptionsMethodInfo ,
#endif
calendarGetDisplayOptions ,
#if ENABLE_OVERLOADING
CalendarMarkDayMethodInfo ,
#endif
calendarMarkDay ,
calendarNew ,
#if ENABLE_OVERLOADING
CalendarSelectDayMethodInfo ,
#endif
calendarSelectDay ,
#if ENABLE_OVERLOADING
CalendarSelectMonthMethodInfo ,
#endif
calendarSelectMonth ,
#if ENABLE_OVERLOADING
CalendarSetDetailFuncMethodInfo ,
#endif
calendarSetDetailFunc ,
#if ENABLE_OVERLOADING
CalendarSetDetailHeightRowsMethodInfo ,
#endif
calendarSetDetailHeightRows ,
#if ENABLE_OVERLOADING
CalendarSetDetailWidthCharsMethodInfo ,
#endif
calendarSetDetailWidthChars ,
#if ENABLE_OVERLOADING
CalendarSetDisplayOptionsMethodInfo ,
#endif
calendarSetDisplayOptions ,
#if ENABLE_OVERLOADING
CalendarUnmarkDayMethodInfo ,
#endif
calendarUnmarkDay ,
#if ENABLE_OVERLOADING
CalendarDayPropertyInfo ,
#endif
#if ENABLE_OVERLOADING
calendarDay ,
#endif
constructCalendarDay ,
getCalendarDay ,
setCalendarDay ,
#if ENABLE_OVERLOADING
CalendarDetailHeightRowsPropertyInfo ,
#endif
#if ENABLE_OVERLOADING
calendarDetailHeightRows ,
#endif
constructCalendarDetailHeightRows ,
getCalendarDetailHeightRows ,
setCalendarDetailHeightRows ,
#if ENABLE_OVERLOADING
CalendarDetailWidthCharsPropertyInfo ,
#endif
#if ENABLE_OVERLOADING
calendarDetailWidthChars ,
#endif
constructCalendarDetailWidthChars ,
getCalendarDetailWidthChars ,
setCalendarDetailWidthChars ,
#if ENABLE_OVERLOADING
CalendarMonthPropertyInfo ,
#endif
#if ENABLE_OVERLOADING
calendarMonth ,
#endif
constructCalendarMonth ,
getCalendarMonth ,
setCalendarMonth ,
#if ENABLE_OVERLOADING
CalendarNoMonthChangePropertyInfo ,
#endif
#if ENABLE_OVERLOADING
calendarNoMonthChange ,
#endif
constructCalendarNoMonthChange ,
getCalendarNoMonthChange ,
setCalendarNoMonthChange ,
#if ENABLE_OVERLOADING
CalendarShowDayNamesPropertyInfo ,
#endif
#if ENABLE_OVERLOADING
calendarShowDayNames ,
#endif
constructCalendarShowDayNames ,
getCalendarShowDayNames ,
setCalendarShowDayNames ,
#if ENABLE_OVERLOADING
CalendarShowDetailsPropertyInfo ,
#endif
#if ENABLE_OVERLOADING
calendarShowDetails ,
#endif
constructCalendarShowDetails ,
getCalendarShowDetails ,
setCalendarShowDetails ,
#if ENABLE_OVERLOADING
CalendarShowHeadingPropertyInfo ,
#endif
#if ENABLE_OVERLOADING
calendarShowHeading ,
#endif
constructCalendarShowHeading ,
getCalendarShowHeading ,
setCalendarShowHeading ,
#if ENABLE_OVERLOADING
CalendarShowWeekNumbersPropertyInfo ,
#endif
#if ENABLE_OVERLOADING
calendarShowWeekNumbers ,
#endif
constructCalendarShowWeekNumbers ,
getCalendarShowWeekNumbers ,
setCalendarShowWeekNumbers ,
#if ENABLE_OVERLOADING
CalendarYearPropertyInfo ,
#endif
#if ENABLE_OVERLOADING
calendarYear ,
#endif
constructCalendarYear ,
getCalendarYear ,
setCalendarYear ,
C_CalendarDaySelectedCallback ,
CalendarDaySelectedCallback ,
#if ENABLE_OVERLOADING
CalendarDaySelectedSignalInfo ,
#endif
afterCalendarDaySelected ,
genClosure_CalendarDaySelected ,
mk_CalendarDaySelectedCallback ,
noCalendarDaySelectedCallback ,
onCalendarDaySelected ,
wrap_CalendarDaySelectedCallback ,
C_CalendarDaySelectedDoubleClickCallback,
CalendarDaySelectedDoubleClickCallback ,
#if ENABLE_OVERLOADING
CalendarDaySelectedDoubleClickSignalInfo,
#endif
afterCalendarDaySelectedDoubleClick ,
genClosure_CalendarDaySelectedDoubleClick,
mk_CalendarDaySelectedDoubleClickCallback,
noCalendarDaySelectedDoubleClickCallback,
onCalendarDaySelectedDoubleClick ,
wrap_CalendarDaySelectedDoubleClickCallback,
C_CalendarMonthChangedCallback ,
CalendarMonthChangedCallback ,
#if ENABLE_OVERLOADING
CalendarMonthChangedSignalInfo ,
#endif
afterCalendarMonthChanged ,
genClosure_CalendarMonthChanged ,
mk_CalendarMonthChangedCallback ,
noCalendarMonthChangedCallback ,
onCalendarMonthChanged ,
wrap_CalendarMonthChangedCallback ,
C_CalendarNextMonthCallback ,
CalendarNextMonthCallback ,
#if ENABLE_OVERLOADING
CalendarNextMonthSignalInfo ,
#endif
afterCalendarNextMonth ,
genClosure_CalendarNextMonth ,
mk_CalendarNextMonthCallback ,
noCalendarNextMonthCallback ,
onCalendarNextMonth ,
wrap_CalendarNextMonthCallback ,
C_CalendarNextYearCallback ,
CalendarNextYearCallback ,
#if ENABLE_OVERLOADING
CalendarNextYearSignalInfo ,
#endif
afterCalendarNextYear ,
genClosure_CalendarNextYear ,
mk_CalendarNextYearCallback ,
noCalendarNextYearCallback ,
onCalendarNextYear ,
wrap_CalendarNextYearCallback ,
C_CalendarPrevMonthCallback ,
CalendarPrevMonthCallback ,
#if ENABLE_OVERLOADING
CalendarPrevMonthSignalInfo ,
#endif
afterCalendarPrevMonth ,
genClosure_CalendarPrevMonth ,
mk_CalendarPrevMonthCallback ,
noCalendarPrevMonthCallback ,
onCalendarPrevMonth ,
wrap_CalendarPrevMonthCallback ,
C_CalendarPrevYearCallback ,
CalendarPrevYearCallback ,
#if ENABLE_OVERLOADING
CalendarPrevYearSignalInfo ,
#endif
afterCalendarPrevYear ,
genClosure_CalendarPrevYear ,
mk_CalendarPrevYearCallback ,
noCalendarPrevYearCallback ,
onCalendarPrevYear ,
wrap_CalendarPrevYearCallback ,
) where
import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P
import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GHC.OverloadedLabels as OL
import qualified GI.Atk.Interfaces.ImplementorIface as Atk.ImplementorIface
import qualified GI.GLib.Callbacks as GLib.Callbacks
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.Gtk.Callbacks as Gtk.Callbacks
import {-# SOURCE #-} qualified GI.Gtk.Flags as Gtk.Flags
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Buildable as Gtk.Buildable
import {-# SOURCE #-} qualified GI.Gtk.Objects.Widget as Gtk.Widget
newtype Calendar = Calendar (ManagedPtr Calendar)
foreign import ccall "gtk_calendar_get_type"
c_gtk_calendar_get_type :: IO GType
instance GObject Calendar where
gobjectType = c_gtk_calendar_get_type
class (GObject o, O.IsDescendantOf Calendar o) => IsCalendar o
instance (GObject o, O.IsDescendantOf Calendar o) => IsCalendar o
instance O.HasParentTypes Calendar
type instance O.ParentTypes Calendar = '[Gtk.Widget.Widget, GObject.Object.Object, Atk.ImplementorIface.ImplementorIface, Gtk.Buildable.Buildable]
toCalendar :: (MonadIO m, IsCalendar o) => o -> m Calendar
toCalendar = liftIO . unsafeCastTo Calendar
noCalendar :: Maybe Calendar
noCalendar = Nothing
#if ENABLE_OVERLOADING
type family ResolveCalendarMethod (t :: Symbol) (o :: *) :: * where
ResolveCalendarMethod "activate" o = Gtk.Widget.WidgetActivateMethodInfo
ResolveCalendarMethod "addAccelerator" o = Gtk.Widget.WidgetAddAcceleratorMethodInfo
ResolveCalendarMethod "addChild" o = Gtk.Buildable.BuildableAddChildMethodInfo
ResolveCalendarMethod "addDeviceEvents" o = Gtk.Widget.WidgetAddDeviceEventsMethodInfo
ResolveCalendarMethod "addEvents" o = Gtk.Widget.WidgetAddEventsMethodInfo
ResolveCalendarMethod "addMnemonicLabel" o = Gtk.Widget.WidgetAddMnemonicLabelMethodInfo
ResolveCalendarMethod "addTickCallback" o = Gtk.Widget.WidgetAddTickCallbackMethodInfo
ResolveCalendarMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveCalendarMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveCalendarMethod "canActivateAccel" o = Gtk.Widget.WidgetCanActivateAccelMethodInfo
ResolveCalendarMethod "childFocus" o = Gtk.Widget.WidgetChildFocusMethodInfo
ResolveCalendarMethod "childNotify" o = Gtk.Widget.WidgetChildNotifyMethodInfo
ResolveCalendarMethod "classPath" o = Gtk.Widget.WidgetClassPathMethodInfo
ResolveCalendarMethod "clearMarks" o = CalendarClearMarksMethodInfo
ResolveCalendarMethod "computeExpand" o = Gtk.Widget.WidgetComputeExpandMethodInfo
ResolveCalendarMethod "constructChild" o = Gtk.Buildable.BuildableConstructChildMethodInfo
ResolveCalendarMethod "createPangoContext" o = Gtk.Widget.WidgetCreatePangoContextMethodInfo
ResolveCalendarMethod "createPangoLayout" o = Gtk.Widget.WidgetCreatePangoLayoutMethodInfo
ResolveCalendarMethod "customFinished" o = Gtk.Buildable.BuildableCustomFinishedMethodInfo
ResolveCalendarMethod "customTagEnd" o = Gtk.Buildable.BuildableCustomTagEndMethodInfo
ResolveCalendarMethod "customTagStart" o = Gtk.Buildable.BuildableCustomTagStartMethodInfo
ResolveCalendarMethod "destroy" o = Gtk.Widget.WidgetDestroyMethodInfo
ResolveCalendarMethod "destroyed" o = Gtk.Widget.WidgetDestroyedMethodInfo
ResolveCalendarMethod "deviceIsShadowed" o = Gtk.Widget.WidgetDeviceIsShadowedMethodInfo
ResolveCalendarMethod "dragBegin" o = Gtk.Widget.WidgetDragBeginMethodInfo
ResolveCalendarMethod "dragBeginWithCoordinates" o = Gtk.Widget.WidgetDragBeginWithCoordinatesMethodInfo
ResolveCalendarMethod "dragCheckThreshold" o = Gtk.Widget.WidgetDragCheckThresholdMethodInfo
ResolveCalendarMethod "dragDestAddImageTargets" o = Gtk.Widget.WidgetDragDestAddImageTargetsMethodInfo
ResolveCalendarMethod "dragDestAddTextTargets" o = Gtk.Widget.WidgetDragDestAddTextTargetsMethodInfo
ResolveCalendarMethod "dragDestAddUriTargets" o = Gtk.Widget.WidgetDragDestAddUriTargetsMethodInfo
ResolveCalendarMethod "dragDestFindTarget" o = Gtk.Widget.WidgetDragDestFindTargetMethodInfo
ResolveCalendarMethod "dragDestGetTargetList" o = Gtk.Widget.WidgetDragDestGetTargetListMethodInfo
ResolveCalendarMethod "dragDestGetTrackMotion" o = Gtk.Widget.WidgetDragDestGetTrackMotionMethodInfo
ResolveCalendarMethod "dragDestSet" o = Gtk.Widget.WidgetDragDestSetMethodInfo
ResolveCalendarMethod "dragDestSetProxy" o = Gtk.Widget.WidgetDragDestSetProxyMethodInfo
ResolveCalendarMethod "dragDestSetTargetList" o = Gtk.Widget.WidgetDragDestSetTargetListMethodInfo
ResolveCalendarMethod "dragDestSetTrackMotion" o = Gtk.Widget.WidgetDragDestSetTrackMotionMethodInfo
ResolveCalendarMethod "dragDestUnset" o = Gtk.Widget.WidgetDragDestUnsetMethodInfo
ResolveCalendarMethod "dragGetData" o = Gtk.Widget.WidgetDragGetDataMethodInfo
ResolveCalendarMethod "dragHighlight" o = Gtk.Widget.WidgetDragHighlightMethodInfo
ResolveCalendarMethod "dragSourceAddImageTargets" o = Gtk.Widget.WidgetDragSourceAddImageTargetsMethodInfo
ResolveCalendarMethod "dragSourceAddTextTargets" o = Gtk.Widget.WidgetDragSourceAddTextTargetsMethodInfo
ResolveCalendarMethod "dragSourceAddUriTargets" o = Gtk.Widget.WidgetDragSourceAddUriTargetsMethodInfo
ResolveCalendarMethod "dragSourceGetTargetList" o = Gtk.Widget.WidgetDragSourceGetTargetListMethodInfo
ResolveCalendarMethod "dragSourceSet" o = Gtk.Widget.WidgetDragSourceSetMethodInfo
ResolveCalendarMethod "dragSourceSetIconGicon" o = Gtk.Widget.WidgetDragSourceSetIconGiconMethodInfo
ResolveCalendarMethod "dragSourceSetIconName" o = Gtk.Widget.WidgetDragSourceSetIconNameMethodInfo
ResolveCalendarMethod "dragSourceSetIconPixbuf" o = Gtk.Widget.WidgetDragSourceSetIconPixbufMethodInfo
ResolveCalendarMethod "dragSourceSetIconStock" o = Gtk.Widget.WidgetDragSourceSetIconStockMethodInfo
ResolveCalendarMethod "dragSourceSetTargetList" o = Gtk.Widget.WidgetDragSourceSetTargetListMethodInfo
ResolveCalendarMethod "dragSourceUnset" o = Gtk.Widget.WidgetDragSourceUnsetMethodInfo
ResolveCalendarMethod "dragUnhighlight" o = Gtk.Widget.WidgetDragUnhighlightMethodInfo
ResolveCalendarMethod "draw" o = Gtk.Widget.WidgetDrawMethodInfo
ResolveCalendarMethod "ensureStyle" o = Gtk.Widget.WidgetEnsureStyleMethodInfo
ResolveCalendarMethod "errorBell" o = Gtk.Widget.WidgetErrorBellMethodInfo
ResolveCalendarMethod "event" o = Gtk.Widget.WidgetEventMethodInfo
ResolveCalendarMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveCalendarMethod "freezeChildNotify" o = Gtk.Widget.WidgetFreezeChildNotifyMethodInfo
ResolveCalendarMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveCalendarMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveCalendarMethod "grabAdd" o = Gtk.Widget.WidgetGrabAddMethodInfo
ResolveCalendarMethod "grabDefault" o = Gtk.Widget.WidgetGrabDefaultMethodInfo
ResolveCalendarMethod "grabFocus" o = Gtk.Widget.WidgetGrabFocusMethodInfo
ResolveCalendarMethod "grabRemove" o = Gtk.Widget.WidgetGrabRemoveMethodInfo
ResolveCalendarMethod "hasDefault" o = Gtk.Widget.WidgetHasDefaultMethodInfo
ResolveCalendarMethod "hasFocus" o = Gtk.Widget.WidgetHasFocusMethodInfo
ResolveCalendarMethod "hasGrab" o = Gtk.Widget.WidgetHasGrabMethodInfo
ResolveCalendarMethod "hasRcStyle" o = Gtk.Widget.WidgetHasRcStyleMethodInfo
ResolveCalendarMethod "hasScreen" o = Gtk.Widget.WidgetHasScreenMethodInfo
ResolveCalendarMethod "hasVisibleFocus" o = Gtk.Widget.WidgetHasVisibleFocusMethodInfo
ResolveCalendarMethod "hide" o = Gtk.Widget.WidgetHideMethodInfo
ResolveCalendarMethod "hideOnDelete" o = Gtk.Widget.WidgetHideOnDeleteMethodInfo
ResolveCalendarMethod "inDestruction" o = Gtk.Widget.WidgetInDestructionMethodInfo
ResolveCalendarMethod "initTemplate" o = Gtk.Widget.WidgetInitTemplateMethodInfo
ResolveCalendarMethod "inputShapeCombineRegion" o = Gtk.Widget.WidgetInputShapeCombineRegionMethodInfo
ResolveCalendarMethod "insertActionGroup" o = Gtk.Widget.WidgetInsertActionGroupMethodInfo
ResolveCalendarMethod "intersect" o = Gtk.Widget.WidgetIntersectMethodInfo
ResolveCalendarMethod "isAncestor" o = Gtk.Widget.WidgetIsAncestorMethodInfo
ResolveCalendarMethod "isComposited" o = Gtk.Widget.WidgetIsCompositedMethodInfo
ResolveCalendarMethod "isDrawable" o = Gtk.Widget.WidgetIsDrawableMethodInfo
ResolveCalendarMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveCalendarMethod "isFocus" o = Gtk.Widget.WidgetIsFocusMethodInfo
ResolveCalendarMethod "isSensitive" o = Gtk.Widget.WidgetIsSensitiveMethodInfo
ResolveCalendarMethod "isToplevel" o = Gtk.Widget.WidgetIsToplevelMethodInfo
ResolveCalendarMethod "isVisible" o = Gtk.Widget.WidgetIsVisibleMethodInfo
ResolveCalendarMethod "keynavFailed" o = Gtk.Widget.WidgetKeynavFailedMethodInfo
ResolveCalendarMethod "listAccelClosures" o = Gtk.Widget.WidgetListAccelClosuresMethodInfo
ResolveCalendarMethod "listActionPrefixes" o = Gtk.Widget.WidgetListActionPrefixesMethodInfo
ResolveCalendarMethod "listMnemonicLabels" o = Gtk.Widget.WidgetListMnemonicLabelsMethodInfo
ResolveCalendarMethod "map" o = Gtk.Widget.WidgetMapMethodInfo
ResolveCalendarMethod "markDay" o = CalendarMarkDayMethodInfo
ResolveCalendarMethod "mnemonicActivate" o = Gtk.Widget.WidgetMnemonicActivateMethodInfo
ResolveCalendarMethod "modifyBase" o = Gtk.Widget.WidgetModifyBaseMethodInfo
ResolveCalendarMethod "modifyBg" o = Gtk.Widget.WidgetModifyBgMethodInfo
ResolveCalendarMethod "modifyCursor" o = Gtk.Widget.WidgetModifyCursorMethodInfo
ResolveCalendarMethod "modifyFg" o = Gtk.Widget.WidgetModifyFgMethodInfo
ResolveCalendarMethod "modifyFont" o = Gtk.Widget.WidgetModifyFontMethodInfo
ResolveCalendarMethod "modifyStyle" o = Gtk.Widget.WidgetModifyStyleMethodInfo
ResolveCalendarMethod "modifyText" o = Gtk.Widget.WidgetModifyTextMethodInfo
ResolveCalendarMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveCalendarMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveCalendarMethod "overrideBackgroundColor" o = Gtk.Widget.WidgetOverrideBackgroundColorMethodInfo
ResolveCalendarMethod "overrideColor" o = Gtk.Widget.WidgetOverrideColorMethodInfo
ResolveCalendarMethod "overrideCursor" o = Gtk.Widget.WidgetOverrideCursorMethodInfo
ResolveCalendarMethod "overrideFont" o = Gtk.Widget.WidgetOverrideFontMethodInfo
ResolveCalendarMethod "overrideSymbolicColor" o = Gtk.Widget.WidgetOverrideSymbolicColorMethodInfo
ResolveCalendarMethod "parserFinished" o = Gtk.Buildable.BuildableParserFinishedMethodInfo
ResolveCalendarMethod "path" o = Gtk.Widget.WidgetPathMethodInfo
ResolveCalendarMethod "queueAllocate" o = Gtk.Widget.WidgetQueueAllocateMethodInfo
ResolveCalendarMethod "queueComputeExpand" o = Gtk.Widget.WidgetQueueComputeExpandMethodInfo
ResolveCalendarMethod "queueDraw" o = Gtk.Widget.WidgetQueueDrawMethodInfo
ResolveCalendarMethod "queueDrawArea" o = Gtk.Widget.WidgetQueueDrawAreaMethodInfo
ResolveCalendarMethod "queueDrawRegion" o = Gtk.Widget.WidgetQueueDrawRegionMethodInfo
ResolveCalendarMethod "queueResize" o = Gtk.Widget.WidgetQueueResizeMethodInfo
ResolveCalendarMethod "queueResizeNoRedraw" o = Gtk.Widget.WidgetQueueResizeNoRedrawMethodInfo
ResolveCalendarMethod "realize" o = Gtk.Widget.WidgetRealizeMethodInfo
ResolveCalendarMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveCalendarMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveCalendarMethod "regionIntersect" o = Gtk.Widget.WidgetRegionIntersectMethodInfo
ResolveCalendarMethod "registerWindow" o = Gtk.Widget.WidgetRegisterWindowMethodInfo
ResolveCalendarMethod "removeAccelerator" o = Gtk.Widget.WidgetRemoveAcceleratorMethodInfo
ResolveCalendarMethod "removeMnemonicLabel" o = Gtk.Widget.WidgetRemoveMnemonicLabelMethodInfo
ResolveCalendarMethod "removeTickCallback" o = Gtk.Widget.WidgetRemoveTickCallbackMethodInfo
ResolveCalendarMethod "renderIcon" o = Gtk.Widget.WidgetRenderIconMethodInfo
ResolveCalendarMethod "renderIconPixbuf" o = Gtk.Widget.WidgetRenderIconPixbufMethodInfo
ResolveCalendarMethod "reparent" o = Gtk.Widget.WidgetReparentMethodInfo
ResolveCalendarMethod "resetRcStyles" o = Gtk.Widget.WidgetResetRcStylesMethodInfo
ResolveCalendarMethod "resetStyle" o = Gtk.Widget.WidgetResetStyleMethodInfo
ResolveCalendarMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveCalendarMethod "selectDay" o = CalendarSelectDayMethodInfo
ResolveCalendarMethod "selectMonth" o = CalendarSelectMonthMethodInfo
ResolveCalendarMethod "sendExpose" o = Gtk.Widget.WidgetSendExposeMethodInfo
ResolveCalendarMethod "sendFocusChange" o = Gtk.Widget.WidgetSendFocusChangeMethodInfo
ResolveCalendarMethod "shapeCombineRegion" o = Gtk.Widget.WidgetShapeCombineRegionMethodInfo
ResolveCalendarMethod "show" o = Gtk.Widget.WidgetShowMethodInfo
ResolveCalendarMethod "showAll" o = Gtk.Widget.WidgetShowAllMethodInfo
ResolveCalendarMethod "showNow" o = Gtk.Widget.WidgetShowNowMethodInfo
ResolveCalendarMethod "sizeAllocate" o = Gtk.Widget.WidgetSizeAllocateMethodInfo
ResolveCalendarMethod "sizeAllocateWithBaseline" o = Gtk.Widget.WidgetSizeAllocateWithBaselineMethodInfo
ResolveCalendarMethod "sizeRequest" o = Gtk.Widget.WidgetSizeRequestMethodInfo
ResolveCalendarMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveCalendarMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveCalendarMethod "styleAttach" o = Gtk.Widget.WidgetStyleAttachMethodInfo
ResolveCalendarMethod "styleGetProperty" o = Gtk.Widget.WidgetStyleGetPropertyMethodInfo
ResolveCalendarMethod "thawChildNotify" o = Gtk.Widget.WidgetThawChildNotifyMethodInfo
ResolveCalendarMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveCalendarMethod "translateCoordinates" o = Gtk.Widget.WidgetTranslateCoordinatesMethodInfo
ResolveCalendarMethod "triggerTooltipQuery" o = Gtk.Widget.WidgetTriggerTooltipQueryMethodInfo
ResolveCalendarMethod "unmap" o = Gtk.Widget.WidgetUnmapMethodInfo
ResolveCalendarMethod "unmarkDay" o = CalendarUnmarkDayMethodInfo
ResolveCalendarMethod "unparent" o = Gtk.Widget.WidgetUnparentMethodInfo
ResolveCalendarMethod "unrealize" o = Gtk.Widget.WidgetUnrealizeMethodInfo
ResolveCalendarMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveCalendarMethod "unregisterWindow" o = Gtk.Widget.WidgetUnregisterWindowMethodInfo
ResolveCalendarMethod "unsetStateFlags" o = Gtk.Widget.WidgetUnsetStateFlagsMethodInfo
ResolveCalendarMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveCalendarMethod "getAccessible" o = Gtk.Widget.WidgetGetAccessibleMethodInfo
ResolveCalendarMethod "getActionGroup" o = Gtk.Widget.WidgetGetActionGroupMethodInfo
ResolveCalendarMethod "getAllocatedBaseline" o = Gtk.Widget.WidgetGetAllocatedBaselineMethodInfo
ResolveCalendarMethod "getAllocatedHeight" o = Gtk.Widget.WidgetGetAllocatedHeightMethodInfo
ResolveCalendarMethod "getAllocatedSize" o = Gtk.Widget.WidgetGetAllocatedSizeMethodInfo
ResolveCalendarMethod "getAllocatedWidth" o = Gtk.Widget.WidgetGetAllocatedWidthMethodInfo
ResolveCalendarMethod "getAllocation" o = Gtk.Widget.WidgetGetAllocationMethodInfo
ResolveCalendarMethod "getAncestor" o = Gtk.Widget.WidgetGetAncestorMethodInfo
ResolveCalendarMethod "getAppPaintable" o = Gtk.Widget.WidgetGetAppPaintableMethodInfo
ResolveCalendarMethod "getCanDefault" o = Gtk.Widget.WidgetGetCanDefaultMethodInfo
ResolveCalendarMethod "getCanFocus" o = Gtk.Widget.WidgetGetCanFocusMethodInfo
ResolveCalendarMethod "getChildRequisition" o = Gtk.Widget.WidgetGetChildRequisitionMethodInfo
ResolveCalendarMethod "getChildVisible" o = Gtk.Widget.WidgetGetChildVisibleMethodInfo
ResolveCalendarMethod "getClip" o = Gtk.Widget.WidgetGetClipMethodInfo
ResolveCalendarMethod "getClipboard" o = Gtk.Widget.WidgetGetClipboardMethodInfo
ResolveCalendarMethod "getCompositeName" o = Gtk.Widget.WidgetGetCompositeNameMethodInfo
ResolveCalendarMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveCalendarMethod "getDate" o = CalendarGetDateMethodInfo
ResolveCalendarMethod "getDayIsMarked" o = CalendarGetDayIsMarkedMethodInfo
ResolveCalendarMethod "getDetailHeightRows" o = CalendarGetDetailHeightRowsMethodInfo
ResolveCalendarMethod "getDetailWidthChars" o = CalendarGetDetailWidthCharsMethodInfo
ResolveCalendarMethod "getDeviceEnabled" o = Gtk.Widget.WidgetGetDeviceEnabledMethodInfo
ResolveCalendarMethod "getDeviceEvents" o = Gtk.Widget.WidgetGetDeviceEventsMethodInfo
ResolveCalendarMethod "getDirection" o = Gtk.Widget.WidgetGetDirectionMethodInfo
ResolveCalendarMethod "getDisplay" o = Gtk.Widget.WidgetGetDisplayMethodInfo
ResolveCalendarMethod "getDisplayOptions" o = CalendarGetDisplayOptionsMethodInfo
ResolveCalendarMethod "getDoubleBuffered" o = Gtk.Widget.WidgetGetDoubleBufferedMethodInfo
ResolveCalendarMethod "getEvents" o = Gtk.Widget.WidgetGetEventsMethodInfo
ResolveCalendarMethod "getFocusOnClick" o = Gtk.Widget.WidgetGetFocusOnClickMethodInfo
ResolveCalendarMethod "getFontMap" o = Gtk.Widget.WidgetGetFontMapMethodInfo
ResolveCalendarMethod "getFontOptions" o = Gtk.Widget.WidgetGetFontOptionsMethodInfo
ResolveCalendarMethod "getFrameClock" o = Gtk.Widget.WidgetGetFrameClockMethodInfo
ResolveCalendarMethod "getHalign" o = Gtk.Widget.WidgetGetHalignMethodInfo
ResolveCalendarMethod "getHasTooltip" o = Gtk.Widget.WidgetGetHasTooltipMethodInfo
ResolveCalendarMethod "getHasWindow" o = Gtk.Widget.WidgetGetHasWindowMethodInfo
ResolveCalendarMethod "getHexpand" o = Gtk.Widget.WidgetGetHexpandMethodInfo
ResolveCalendarMethod "getHexpandSet" o = Gtk.Widget.WidgetGetHexpandSetMethodInfo
ResolveCalendarMethod "getInternalChild" o = Gtk.Buildable.BuildableGetInternalChildMethodInfo
ResolveCalendarMethod "getMapped" o = Gtk.Widget.WidgetGetMappedMethodInfo
ResolveCalendarMethod "getMarginBottom" o = Gtk.Widget.WidgetGetMarginBottomMethodInfo
ResolveCalendarMethod "getMarginEnd" o = Gtk.Widget.WidgetGetMarginEndMethodInfo
ResolveCalendarMethod "getMarginLeft" o = Gtk.Widget.WidgetGetMarginLeftMethodInfo
ResolveCalendarMethod "getMarginRight" o = Gtk.Widget.WidgetGetMarginRightMethodInfo
ResolveCalendarMethod "getMarginStart" o = Gtk.Widget.WidgetGetMarginStartMethodInfo
ResolveCalendarMethod "getMarginTop" o = Gtk.Widget.WidgetGetMarginTopMethodInfo
ResolveCalendarMethod "getModifierMask" o = Gtk.Widget.WidgetGetModifierMaskMethodInfo
ResolveCalendarMethod "getModifierStyle" o = Gtk.Widget.WidgetGetModifierStyleMethodInfo
ResolveCalendarMethod "getName" o = Gtk.Widget.WidgetGetNameMethodInfo
ResolveCalendarMethod "getNoShowAll" o = Gtk.Widget.WidgetGetNoShowAllMethodInfo
ResolveCalendarMethod "getOpacity" o = Gtk.Widget.WidgetGetOpacityMethodInfo
ResolveCalendarMethod "getPangoContext" o = Gtk.Widget.WidgetGetPangoContextMethodInfo
ResolveCalendarMethod "getParent" o = Gtk.Widget.WidgetGetParentMethodInfo
ResolveCalendarMethod "getParentWindow" o = Gtk.Widget.WidgetGetParentWindowMethodInfo
ResolveCalendarMethod "getPath" o = Gtk.Widget.WidgetGetPathMethodInfo
ResolveCalendarMethod "getPointer" o = Gtk.Widget.WidgetGetPointerMethodInfo
ResolveCalendarMethod "getPreferredHeight" o = Gtk.Widget.WidgetGetPreferredHeightMethodInfo
ResolveCalendarMethod "getPreferredHeightAndBaselineForWidth" o = Gtk.Widget.WidgetGetPreferredHeightAndBaselineForWidthMethodInfo
ResolveCalendarMethod "getPreferredHeightForWidth" o = Gtk.Widget.WidgetGetPreferredHeightForWidthMethodInfo
ResolveCalendarMethod "getPreferredSize" o = Gtk.Widget.WidgetGetPreferredSizeMethodInfo
ResolveCalendarMethod "getPreferredWidth" o = Gtk.Widget.WidgetGetPreferredWidthMethodInfo
ResolveCalendarMethod "getPreferredWidthForHeight" o = Gtk.Widget.WidgetGetPreferredWidthForHeightMethodInfo
ResolveCalendarMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveCalendarMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveCalendarMethod "getRealized" o = Gtk.Widget.WidgetGetRealizedMethodInfo
ResolveCalendarMethod "getReceivesDefault" o = Gtk.Widget.WidgetGetReceivesDefaultMethodInfo
ResolveCalendarMethod "getRequestMode" o = Gtk.Widget.WidgetGetRequestModeMethodInfo
ResolveCalendarMethod "getRequisition" o = Gtk.Widget.WidgetGetRequisitionMethodInfo
ResolveCalendarMethod "getRootWindow" o = Gtk.Widget.WidgetGetRootWindowMethodInfo
ResolveCalendarMethod "getScaleFactor" o = Gtk.Widget.WidgetGetScaleFactorMethodInfo
ResolveCalendarMethod "getScreen" o = Gtk.Widget.WidgetGetScreenMethodInfo
ResolveCalendarMethod "getSensitive" o = Gtk.Widget.WidgetGetSensitiveMethodInfo
ResolveCalendarMethod "getSettings" o = Gtk.Widget.WidgetGetSettingsMethodInfo
ResolveCalendarMethod "getSizeRequest" o = Gtk.Widget.WidgetGetSizeRequestMethodInfo
ResolveCalendarMethod "getState" o = Gtk.Widget.WidgetGetStateMethodInfo
ResolveCalendarMethod "getStateFlags" o = Gtk.Widget.WidgetGetStateFlagsMethodInfo
ResolveCalendarMethod "getStyle" o = Gtk.Widget.WidgetGetStyleMethodInfo
ResolveCalendarMethod "getStyleContext" o = Gtk.Widget.WidgetGetStyleContextMethodInfo
ResolveCalendarMethod "getSupportMultidevice" o = Gtk.Widget.WidgetGetSupportMultideviceMethodInfo
ResolveCalendarMethod "getTemplateChild" o = Gtk.Widget.WidgetGetTemplateChildMethodInfo
ResolveCalendarMethod "getTooltipMarkup" o = Gtk.Widget.WidgetGetTooltipMarkupMethodInfo
ResolveCalendarMethod "getTooltipText" o = Gtk.Widget.WidgetGetTooltipTextMethodInfo
ResolveCalendarMethod "getTooltipWindow" o = Gtk.Widget.WidgetGetTooltipWindowMethodInfo
ResolveCalendarMethod "getToplevel" o = Gtk.Widget.WidgetGetToplevelMethodInfo
ResolveCalendarMethod "getValign" o = Gtk.Widget.WidgetGetValignMethodInfo
ResolveCalendarMethod "getValignWithBaseline" o = Gtk.Widget.WidgetGetValignWithBaselineMethodInfo
ResolveCalendarMethod "getVexpand" o = Gtk.Widget.WidgetGetVexpandMethodInfo
ResolveCalendarMethod "getVexpandSet" o = Gtk.Widget.WidgetGetVexpandSetMethodInfo
ResolveCalendarMethod "getVisible" o = Gtk.Widget.WidgetGetVisibleMethodInfo
ResolveCalendarMethod "getVisual" o = Gtk.Widget.WidgetGetVisualMethodInfo
ResolveCalendarMethod "getWindow" o = Gtk.Widget.WidgetGetWindowMethodInfo
ResolveCalendarMethod "setAccelPath" o = Gtk.Widget.WidgetSetAccelPathMethodInfo
ResolveCalendarMethod "setAllocation" o = Gtk.Widget.WidgetSetAllocationMethodInfo
ResolveCalendarMethod "setAppPaintable" o = Gtk.Widget.WidgetSetAppPaintableMethodInfo
ResolveCalendarMethod "setBuildableProperty" o = Gtk.Buildable.BuildableSetBuildablePropertyMethodInfo
ResolveCalendarMethod "setCanDefault" o = Gtk.Widget.WidgetSetCanDefaultMethodInfo
ResolveCalendarMethod "setCanFocus" o = Gtk.Widget.WidgetSetCanFocusMethodInfo
ResolveCalendarMethod "setChildVisible" o = Gtk.Widget.WidgetSetChildVisibleMethodInfo
ResolveCalendarMethod "setClip" o = Gtk.Widget.WidgetSetClipMethodInfo
ResolveCalendarMethod "setCompositeName" o = Gtk.Widget.WidgetSetCompositeNameMethodInfo
ResolveCalendarMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveCalendarMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveCalendarMethod "setDetailFunc" o = CalendarSetDetailFuncMethodInfo
ResolveCalendarMethod "setDetailHeightRows" o = CalendarSetDetailHeightRowsMethodInfo
ResolveCalendarMethod "setDetailWidthChars" o = CalendarSetDetailWidthCharsMethodInfo
ResolveCalendarMethod "setDeviceEnabled" o = Gtk.Widget.WidgetSetDeviceEnabledMethodInfo
ResolveCalendarMethod "setDeviceEvents" o = Gtk.Widget.WidgetSetDeviceEventsMethodInfo
ResolveCalendarMethod "setDirection" o = Gtk.Widget.WidgetSetDirectionMethodInfo
ResolveCalendarMethod "setDisplayOptions" o = CalendarSetDisplayOptionsMethodInfo
ResolveCalendarMethod "setDoubleBuffered" o = Gtk.Widget.WidgetSetDoubleBufferedMethodInfo
ResolveCalendarMethod "setEvents" o = Gtk.Widget.WidgetSetEventsMethodInfo
ResolveCalendarMethod "setFocusOnClick" o = Gtk.Widget.WidgetSetFocusOnClickMethodInfo
ResolveCalendarMethod "setFontMap" o = Gtk.Widget.WidgetSetFontMapMethodInfo
ResolveCalendarMethod "setFontOptions" o = Gtk.Widget.WidgetSetFontOptionsMethodInfo
ResolveCalendarMethod "setHalign" o = Gtk.Widget.WidgetSetHalignMethodInfo
ResolveCalendarMethod "setHasTooltip" o = Gtk.Widget.WidgetSetHasTooltipMethodInfo
ResolveCalendarMethod "setHasWindow" o = Gtk.Widget.WidgetSetHasWindowMethodInfo
ResolveCalendarMethod "setHexpand" o = Gtk.Widget.WidgetSetHexpandMethodInfo
ResolveCalendarMethod "setHexpandSet" o = Gtk.Widget.WidgetSetHexpandSetMethodInfo
ResolveCalendarMethod "setMapped" o = Gtk.Widget.WidgetSetMappedMethodInfo
ResolveCalendarMethod "setMarginBottom" o = Gtk.Widget.WidgetSetMarginBottomMethodInfo
ResolveCalendarMethod "setMarginEnd" o = Gtk.Widget.WidgetSetMarginEndMethodInfo
ResolveCalendarMethod "setMarginLeft" o = Gtk.Widget.WidgetSetMarginLeftMethodInfo
ResolveCalendarMethod "setMarginRight" o = Gtk.Widget.WidgetSetMarginRightMethodInfo
ResolveCalendarMethod "setMarginStart" o = Gtk.Widget.WidgetSetMarginStartMethodInfo
ResolveCalendarMethod "setMarginTop" o = Gtk.Widget.WidgetSetMarginTopMethodInfo
ResolveCalendarMethod "setName" o = Gtk.Widget.WidgetSetNameMethodInfo
ResolveCalendarMethod "setNoShowAll" o = Gtk.Widget.WidgetSetNoShowAllMethodInfo
ResolveCalendarMethod "setOpacity" o = Gtk.Widget.WidgetSetOpacityMethodInfo
ResolveCalendarMethod "setParent" o = Gtk.Widget.WidgetSetParentMethodInfo
ResolveCalendarMethod "setParentWindow" o = Gtk.Widget.WidgetSetParentWindowMethodInfo
ResolveCalendarMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveCalendarMethod "setRealized" o = Gtk.Widget.WidgetSetRealizedMethodInfo
ResolveCalendarMethod "setReceivesDefault" o = Gtk.Widget.WidgetSetReceivesDefaultMethodInfo
ResolveCalendarMethod "setRedrawOnAllocate" o = Gtk.Widget.WidgetSetRedrawOnAllocateMethodInfo
ResolveCalendarMethod "setSensitive" o = Gtk.Widget.WidgetSetSensitiveMethodInfo
ResolveCalendarMethod "setSizeRequest" o = Gtk.Widget.WidgetSetSizeRequestMethodInfo
ResolveCalendarMethod "setState" o = Gtk.Widget.WidgetSetStateMethodInfo
ResolveCalendarMethod "setStateFlags" o = Gtk.Widget.WidgetSetStateFlagsMethodInfo
ResolveCalendarMethod "setStyle" o = Gtk.Widget.WidgetSetStyleMethodInfo
ResolveCalendarMethod "setSupportMultidevice" o = Gtk.Widget.WidgetSetSupportMultideviceMethodInfo
ResolveCalendarMethod "setTooltipMarkup" o = Gtk.Widget.WidgetSetTooltipMarkupMethodInfo
ResolveCalendarMethod "setTooltipText" o = Gtk.Widget.WidgetSetTooltipTextMethodInfo
ResolveCalendarMethod "setTooltipWindow" o = Gtk.Widget.WidgetSetTooltipWindowMethodInfo
ResolveCalendarMethod "setValign" o = Gtk.Widget.WidgetSetValignMethodInfo
ResolveCalendarMethod "setVexpand" o = Gtk.Widget.WidgetSetVexpandMethodInfo
ResolveCalendarMethod "setVexpandSet" o = Gtk.Widget.WidgetSetVexpandSetMethodInfo
ResolveCalendarMethod "setVisible" o = Gtk.Widget.WidgetSetVisibleMethodInfo
ResolveCalendarMethod "setVisual" o = Gtk.Widget.WidgetSetVisualMethodInfo
ResolveCalendarMethod "setWindow" o = Gtk.Widget.WidgetSetWindowMethodInfo
ResolveCalendarMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveCalendarMethod t Calendar, O.MethodInfo info Calendar p) => OL.IsLabel t (Calendar -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#else
fromLabel _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#endif
#endif
type CalendarDaySelectedCallback =
IO ()
noCalendarDaySelectedCallback :: Maybe CalendarDaySelectedCallback
noCalendarDaySelectedCallback = Nothing
type C_CalendarDaySelectedCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_CalendarDaySelectedCallback :: C_CalendarDaySelectedCallback -> IO (FunPtr C_CalendarDaySelectedCallback)
genClosure_CalendarDaySelected :: MonadIO m => CalendarDaySelectedCallback -> m (GClosure C_CalendarDaySelectedCallback)
genClosure_CalendarDaySelected cb = liftIO $ do
let cb' = wrap_CalendarDaySelectedCallback cb
mk_CalendarDaySelectedCallback cb' >>= B.GClosure.newGClosure
wrap_CalendarDaySelectedCallback ::
CalendarDaySelectedCallback ->
C_CalendarDaySelectedCallback
wrap_CalendarDaySelectedCallback _cb _ _ = do
_cb
onCalendarDaySelected :: (IsCalendar a, MonadIO m) => a -> CalendarDaySelectedCallback -> m SignalHandlerId
onCalendarDaySelected obj cb = liftIO $ do
let cb' = wrap_CalendarDaySelectedCallback cb
cb'' <- mk_CalendarDaySelectedCallback cb'
connectSignalFunPtr obj "day-selected" cb'' SignalConnectBefore
afterCalendarDaySelected :: (IsCalendar a, MonadIO m) => a -> CalendarDaySelectedCallback -> m SignalHandlerId
afterCalendarDaySelected obj cb = liftIO $ do
let cb' = wrap_CalendarDaySelectedCallback cb
cb'' <- mk_CalendarDaySelectedCallback cb'
connectSignalFunPtr obj "day-selected" cb'' SignalConnectAfter
type CalendarDaySelectedDoubleClickCallback =
IO ()
noCalendarDaySelectedDoubleClickCallback :: Maybe CalendarDaySelectedDoubleClickCallback
noCalendarDaySelectedDoubleClickCallback = Nothing
type C_CalendarDaySelectedDoubleClickCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_CalendarDaySelectedDoubleClickCallback :: C_CalendarDaySelectedDoubleClickCallback -> IO (FunPtr C_CalendarDaySelectedDoubleClickCallback)
genClosure_CalendarDaySelectedDoubleClick :: MonadIO m => CalendarDaySelectedDoubleClickCallback -> m (GClosure C_CalendarDaySelectedDoubleClickCallback)
genClosure_CalendarDaySelectedDoubleClick cb = liftIO $ do
let cb' = wrap_CalendarDaySelectedDoubleClickCallback cb
mk_CalendarDaySelectedDoubleClickCallback cb' >>= B.GClosure.newGClosure
wrap_CalendarDaySelectedDoubleClickCallback ::
CalendarDaySelectedDoubleClickCallback ->
C_CalendarDaySelectedDoubleClickCallback
wrap_CalendarDaySelectedDoubleClickCallback _cb _ _ = do
_cb
onCalendarDaySelectedDoubleClick :: (IsCalendar a, MonadIO m) => a -> CalendarDaySelectedDoubleClickCallback -> m SignalHandlerId
onCalendarDaySelectedDoubleClick obj cb = liftIO $ do
let cb' = wrap_CalendarDaySelectedDoubleClickCallback cb
cb'' <- mk_CalendarDaySelectedDoubleClickCallback cb'
connectSignalFunPtr obj "day-selected-double-click" cb'' SignalConnectBefore
afterCalendarDaySelectedDoubleClick :: (IsCalendar a, MonadIO m) => a -> CalendarDaySelectedDoubleClickCallback -> m SignalHandlerId
afterCalendarDaySelectedDoubleClick obj cb = liftIO $ do
let cb' = wrap_CalendarDaySelectedDoubleClickCallback cb
cb'' <- mk_CalendarDaySelectedDoubleClickCallback cb'
connectSignalFunPtr obj "day-selected-double-click" cb'' SignalConnectAfter
type CalendarMonthChangedCallback =
IO ()
noCalendarMonthChangedCallback :: Maybe CalendarMonthChangedCallback
noCalendarMonthChangedCallback = Nothing
type C_CalendarMonthChangedCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_CalendarMonthChangedCallback :: C_CalendarMonthChangedCallback -> IO (FunPtr C_CalendarMonthChangedCallback)
genClosure_CalendarMonthChanged :: MonadIO m => CalendarMonthChangedCallback -> m (GClosure C_CalendarMonthChangedCallback)
genClosure_CalendarMonthChanged cb = liftIO $ do
let cb' = wrap_CalendarMonthChangedCallback cb
mk_CalendarMonthChangedCallback cb' >>= B.GClosure.newGClosure
wrap_CalendarMonthChangedCallback ::
CalendarMonthChangedCallback ->
C_CalendarMonthChangedCallback
wrap_CalendarMonthChangedCallback _cb _ _ = do
_cb
onCalendarMonthChanged :: (IsCalendar a, MonadIO m) => a -> CalendarMonthChangedCallback -> m SignalHandlerId
onCalendarMonthChanged obj cb = liftIO $ do
let cb' = wrap_CalendarMonthChangedCallback cb
cb'' <- mk_CalendarMonthChangedCallback cb'
connectSignalFunPtr obj "month-changed" cb'' SignalConnectBefore
afterCalendarMonthChanged :: (IsCalendar a, MonadIO m) => a -> CalendarMonthChangedCallback -> m SignalHandlerId
afterCalendarMonthChanged obj cb = liftIO $ do
let cb' = wrap_CalendarMonthChangedCallback cb
cb'' <- mk_CalendarMonthChangedCallback cb'
connectSignalFunPtr obj "month-changed" cb'' SignalConnectAfter
type CalendarNextMonthCallback =
IO ()
noCalendarNextMonthCallback :: Maybe CalendarNextMonthCallback
noCalendarNextMonthCallback = Nothing
type C_CalendarNextMonthCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_CalendarNextMonthCallback :: C_CalendarNextMonthCallback -> IO (FunPtr C_CalendarNextMonthCallback)
genClosure_CalendarNextMonth :: MonadIO m => CalendarNextMonthCallback -> m (GClosure C_CalendarNextMonthCallback)
genClosure_CalendarNextMonth cb = liftIO $ do
let cb' = wrap_CalendarNextMonthCallback cb
mk_CalendarNextMonthCallback cb' >>= B.GClosure.newGClosure
wrap_CalendarNextMonthCallback ::
CalendarNextMonthCallback ->
C_CalendarNextMonthCallback
wrap_CalendarNextMonthCallback _cb _ _ = do
_cb
onCalendarNextMonth :: (IsCalendar a, MonadIO m) => a -> CalendarNextMonthCallback -> m SignalHandlerId
onCalendarNextMonth obj cb = liftIO $ do
let cb' = wrap_CalendarNextMonthCallback cb
cb'' <- mk_CalendarNextMonthCallback cb'
connectSignalFunPtr obj "next-month" cb'' SignalConnectBefore
afterCalendarNextMonth :: (IsCalendar a, MonadIO m) => a -> CalendarNextMonthCallback -> m SignalHandlerId
afterCalendarNextMonth obj cb = liftIO $ do
let cb' = wrap_CalendarNextMonthCallback cb
cb'' <- mk_CalendarNextMonthCallback cb'
connectSignalFunPtr obj "next-month" cb'' SignalConnectAfter
type CalendarNextYearCallback =
IO ()
noCalendarNextYearCallback :: Maybe CalendarNextYearCallback
noCalendarNextYearCallback = Nothing
type C_CalendarNextYearCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_CalendarNextYearCallback :: C_CalendarNextYearCallback -> IO (FunPtr C_CalendarNextYearCallback)
genClosure_CalendarNextYear :: MonadIO m => CalendarNextYearCallback -> m (GClosure C_CalendarNextYearCallback)
genClosure_CalendarNextYear cb = liftIO $ do
let cb' = wrap_CalendarNextYearCallback cb
mk_CalendarNextYearCallback cb' >>= B.GClosure.newGClosure
wrap_CalendarNextYearCallback ::
CalendarNextYearCallback ->
C_CalendarNextYearCallback
wrap_CalendarNextYearCallback _cb _ _ = do
_cb
onCalendarNextYear :: (IsCalendar a, MonadIO m) => a -> CalendarNextYearCallback -> m SignalHandlerId
onCalendarNextYear obj cb = liftIO $ do
let cb' = wrap_CalendarNextYearCallback cb
cb'' <- mk_CalendarNextYearCallback cb'
connectSignalFunPtr obj "next-year" cb'' SignalConnectBefore
afterCalendarNextYear :: (IsCalendar a, MonadIO m) => a -> CalendarNextYearCallback -> m SignalHandlerId
afterCalendarNextYear obj cb = liftIO $ do
let cb' = wrap_CalendarNextYearCallback cb
cb'' <- mk_CalendarNextYearCallback cb'
connectSignalFunPtr obj "next-year" cb'' SignalConnectAfter
type CalendarPrevMonthCallback =
IO ()
noCalendarPrevMonthCallback :: Maybe CalendarPrevMonthCallback
noCalendarPrevMonthCallback = Nothing
type C_CalendarPrevMonthCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_CalendarPrevMonthCallback :: C_CalendarPrevMonthCallback -> IO (FunPtr C_CalendarPrevMonthCallback)
genClosure_CalendarPrevMonth :: MonadIO m => CalendarPrevMonthCallback -> m (GClosure C_CalendarPrevMonthCallback)
genClosure_CalendarPrevMonth cb = liftIO $ do
let cb' = wrap_CalendarPrevMonthCallback cb
mk_CalendarPrevMonthCallback cb' >>= B.GClosure.newGClosure
wrap_CalendarPrevMonthCallback ::
CalendarPrevMonthCallback ->
C_CalendarPrevMonthCallback
wrap_CalendarPrevMonthCallback _cb _ _ = do
_cb
onCalendarPrevMonth :: (IsCalendar a, MonadIO m) => a -> CalendarPrevMonthCallback -> m SignalHandlerId
onCalendarPrevMonth obj cb = liftIO $ do
let cb' = wrap_CalendarPrevMonthCallback cb
cb'' <- mk_CalendarPrevMonthCallback cb'
connectSignalFunPtr obj "prev-month" cb'' SignalConnectBefore
afterCalendarPrevMonth :: (IsCalendar a, MonadIO m) => a -> CalendarPrevMonthCallback -> m SignalHandlerId
afterCalendarPrevMonth obj cb = liftIO $ do
let cb' = wrap_CalendarPrevMonthCallback cb
cb'' <- mk_CalendarPrevMonthCallback cb'
connectSignalFunPtr obj "prev-month" cb'' SignalConnectAfter
type CalendarPrevYearCallback =
IO ()
noCalendarPrevYearCallback :: Maybe CalendarPrevYearCallback
noCalendarPrevYearCallback = Nothing
type C_CalendarPrevYearCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_CalendarPrevYearCallback :: C_CalendarPrevYearCallback -> IO (FunPtr C_CalendarPrevYearCallback)
genClosure_CalendarPrevYear :: MonadIO m => CalendarPrevYearCallback -> m (GClosure C_CalendarPrevYearCallback)
genClosure_CalendarPrevYear cb = liftIO $ do
let cb' = wrap_CalendarPrevYearCallback cb
mk_CalendarPrevYearCallback cb' >>= B.GClosure.newGClosure
wrap_CalendarPrevYearCallback ::
CalendarPrevYearCallback ->
C_CalendarPrevYearCallback
wrap_CalendarPrevYearCallback _cb _ _ = do
_cb
onCalendarPrevYear :: (IsCalendar a, MonadIO m) => a -> CalendarPrevYearCallback -> m SignalHandlerId
onCalendarPrevYear obj cb = liftIO $ do
let cb' = wrap_CalendarPrevYearCallback cb
cb'' <- mk_CalendarPrevYearCallback cb'
connectSignalFunPtr obj "prev-year" cb'' SignalConnectBefore
afterCalendarPrevYear :: (IsCalendar a, MonadIO m) => a -> CalendarPrevYearCallback -> m SignalHandlerId
afterCalendarPrevYear obj cb = liftIO $ do
let cb' = wrap_CalendarPrevYearCallback cb
cb'' <- mk_CalendarPrevYearCallback cb'
connectSignalFunPtr obj "prev-year" cb'' SignalConnectAfter
getCalendarDay :: (MonadIO m, IsCalendar o) => o -> m Int32
getCalendarDay obj = liftIO $ B.Properties.getObjectPropertyInt32 obj "day"
setCalendarDay :: (MonadIO m, IsCalendar o) => o -> Int32 -> m ()
setCalendarDay obj val = liftIO $ B.Properties.setObjectPropertyInt32 obj "day" val
constructCalendarDay :: (IsCalendar o) => Int32 -> IO (GValueConstruct o)
constructCalendarDay val = B.Properties.constructObjectPropertyInt32 "day" val
#if ENABLE_OVERLOADING
data CalendarDayPropertyInfo
instance AttrInfo CalendarDayPropertyInfo where
type AttrAllowedOps CalendarDayPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint CalendarDayPropertyInfo = (~) Int32
type AttrBaseTypeConstraint CalendarDayPropertyInfo = IsCalendar
type AttrGetType CalendarDayPropertyInfo = Int32
type AttrLabel CalendarDayPropertyInfo = "day"
type AttrOrigin CalendarDayPropertyInfo = Calendar
attrGet _ = getCalendarDay
attrSet _ = setCalendarDay
attrConstruct _ = constructCalendarDay
attrClear _ = undefined
#endif
getCalendarDetailHeightRows :: (MonadIO m, IsCalendar o) => o -> m Int32
getCalendarDetailHeightRows obj = liftIO $ B.Properties.getObjectPropertyInt32 obj "detail-height-rows"
setCalendarDetailHeightRows :: (MonadIO m, IsCalendar o) => o -> Int32 -> m ()
setCalendarDetailHeightRows obj val = liftIO $ B.Properties.setObjectPropertyInt32 obj "detail-height-rows" val
constructCalendarDetailHeightRows :: (IsCalendar o) => Int32 -> IO (GValueConstruct o)
constructCalendarDetailHeightRows val = B.Properties.constructObjectPropertyInt32 "detail-height-rows" val
#if ENABLE_OVERLOADING
data CalendarDetailHeightRowsPropertyInfo
instance AttrInfo CalendarDetailHeightRowsPropertyInfo where
type AttrAllowedOps CalendarDetailHeightRowsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint CalendarDetailHeightRowsPropertyInfo = (~) Int32
type AttrBaseTypeConstraint CalendarDetailHeightRowsPropertyInfo = IsCalendar
type AttrGetType CalendarDetailHeightRowsPropertyInfo = Int32
type AttrLabel CalendarDetailHeightRowsPropertyInfo = "detail-height-rows"
type AttrOrigin CalendarDetailHeightRowsPropertyInfo = Calendar
attrGet _ = getCalendarDetailHeightRows
attrSet _ = setCalendarDetailHeightRows
attrConstruct _ = constructCalendarDetailHeightRows
attrClear _ = undefined
#endif
getCalendarDetailWidthChars :: (MonadIO m, IsCalendar o) => o -> m Int32
getCalendarDetailWidthChars obj = liftIO $ B.Properties.getObjectPropertyInt32 obj "detail-width-chars"
setCalendarDetailWidthChars :: (MonadIO m, IsCalendar o) => o -> Int32 -> m ()
setCalendarDetailWidthChars obj val = liftIO $ B.Properties.setObjectPropertyInt32 obj "detail-width-chars" val
constructCalendarDetailWidthChars :: (IsCalendar o) => Int32 -> IO (GValueConstruct o)
constructCalendarDetailWidthChars val = B.Properties.constructObjectPropertyInt32 "detail-width-chars" val
#if ENABLE_OVERLOADING
data CalendarDetailWidthCharsPropertyInfo
instance AttrInfo CalendarDetailWidthCharsPropertyInfo where
type AttrAllowedOps CalendarDetailWidthCharsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint CalendarDetailWidthCharsPropertyInfo = (~) Int32
type AttrBaseTypeConstraint CalendarDetailWidthCharsPropertyInfo = IsCalendar
type AttrGetType CalendarDetailWidthCharsPropertyInfo = Int32
type AttrLabel CalendarDetailWidthCharsPropertyInfo = "detail-width-chars"
type AttrOrigin CalendarDetailWidthCharsPropertyInfo = Calendar
attrGet _ = getCalendarDetailWidthChars
attrSet _ = setCalendarDetailWidthChars
attrConstruct _ = constructCalendarDetailWidthChars
attrClear _ = undefined
#endif
getCalendarMonth :: (MonadIO m, IsCalendar o) => o -> m Int32
getCalendarMonth obj = liftIO $ B.Properties.getObjectPropertyInt32 obj "month"
setCalendarMonth :: (MonadIO m, IsCalendar o) => o -> Int32 -> m ()
setCalendarMonth obj val = liftIO $ B.Properties.setObjectPropertyInt32 obj "month" val
constructCalendarMonth :: (IsCalendar o) => Int32 -> IO (GValueConstruct o)
constructCalendarMonth val = B.Properties.constructObjectPropertyInt32 "month" val
#if ENABLE_OVERLOADING
data CalendarMonthPropertyInfo
instance AttrInfo CalendarMonthPropertyInfo where
type AttrAllowedOps CalendarMonthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint CalendarMonthPropertyInfo = (~) Int32
type AttrBaseTypeConstraint CalendarMonthPropertyInfo = IsCalendar
type AttrGetType CalendarMonthPropertyInfo = Int32
type AttrLabel CalendarMonthPropertyInfo = "month"
type AttrOrigin CalendarMonthPropertyInfo = Calendar
attrGet _ = getCalendarMonth
attrSet _ = setCalendarMonth
attrConstruct _ = constructCalendarMonth
attrClear _ = undefined
#endif
getCalendarNoMonthChange :: (MonadIO m, IsCalendar o) => o -> m Bool
getCalendarNoMonthChange obj = liftIO $ B.Properties.getObjectPropertyBool obj "no-month-change"
setCalendarNoMonthChange :: (MonadIO m, IsCalendar o) => o -> Bool -> m ()
setCalendarNoMonthChange obj val = liftIO $ B.Properties.setObjectPropertyBool obj "no-month-change" val
constructCalendarNoMonthChange :: (IsCalendar o) => Bool -> IO (GValueConstruct o)
constructCalendarNoMonthChange val = B.Properties.constructObjectPropertyBool "no-month-change" val
#if ENABLE_OVERLOADING
data CalendarNoMonthChangePropertyInfo
instance AttrInfo CalendarNoMonthChangePropertyInfo where
type AttrAllowedOps CalendarNoMonthChangePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint CalendarNoMonthChangePropertyInfo = (~) Bool
type AttrBaseTypeConstraint CalendarNoMonthChangePropertyInfo = IsCalendar
type AttrGetType CalendarNoMonthChangePropertyInfo = Bool
type AttrLabel CalendarNoMonthChangePropertyInfo = "no-month-change"
type AttrOrigin CalendarNoMonthChangePropertyInfo = Calendar
attrGet _ = getCalendarNoMonthChange
attrSet _ = setCalendarNoMonthChange
attrConstruct _ = constructCalendarNoMonthChange
attrClear _ = undefined
#endif
getCalendarShowDayNames :: (MonadIO m, IsCalendar o) => o -> m Bool
getCalendarShowDayNames obj = liftIO $ B.Properties.getObjectPropertyBool obj "show-day-names"
setCalendarShowDayNames :: (MonadIO m, IsCalendar o) => o -> Bool -> m ()
setCalendarShowDayNames obj val = liftIO $ B.Properties.setObjectPropertyBool obj "show-day-names" val
constructCalendarShowDayNames :: (IsCalendar o) => Bool -> IO (GValueConstruct o)
constructCalendarShowDayNames val = B.Properties.constructObjectPropertyBool "show-day-names" val
#if ENABLE_OVERLOADING
data CalendarShowDayNamesPropertyInfo
instance AttrInfo CalendarShowDayNamesPropertyInfo where
type AttrAllowedOps CalendarShowDayNamesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint CalendarShowDayNamesPropertyInfo = (~) Bool
type AttrBaseTypeConstraint CalendarShowDayNamesPropertyInfo = IsCalendar
type AttrGetType CalendarShowDayNamesPropertyInfo = Bool
type AttrLabel CalendarShowDayNamesPropertyInfo = "show-day-names"
type AttrOrigin CalendarShowDayNamesPropertyInfo = Calendar
attrGet _ = getCalendarShowDayNames
attrSet _ = setCalendarShowDayNames
attrConstruct _ = constructCalendarShowDayNames
attrClear _ = undefined
#endif
getCalendarShowDetails :: (MonadIO m, IsCalendar o) => o -> m Bool
getCalendarShowDetails obj = liftIO $ B.Properties.getObjectPropertyBool obj "show-details"
setCalendarShowDetails :: (MonadIO m, IsCalendar o) => o -> Bool -> m ()
setCalendarShowDetails obj val = liftIO $ B.Properties.setObjectPropertyBool obj "show-details" val
constructCalendarShowDetails :: (IsCalendar o) => Bool -> IO (GValueConstruct o)
constructCalendarShowDetails val = B.Properties.constructObjectPropertyBool "show-details" val
#if ENABLE_OVERLOADING
data CalendarShowDetailsPropertyInfo
instance AttrInfo CalendarShowDetailsPropertyInfo where
type AttrAllowedOps CalendarShowDetailsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint CalendarShowDetailsPropertyInfo = (~) Bool
type AttrBaseTypeConstraint CalendarShowDetailsPropertyInfo = IsCalendar
type AttrGetType CalendarShowDetailsPropertyInfo = Bool
type AttrLabel CalendarShowDetailsPropertyInfo = "show-details"
type AttrOrigin CalendarShowDetailsPropertyInfo = Calendar
attrGet _ = getCalendarShowDetails
attrSet _ = setCalendarShowDetails
attrConstruct _ = constructCalendarShowDetails
attrClear _ = undefined
#endif
getCalendarShowHeading :: (MonadIO m, IsCalendar o) => o -> m Bool
getCalendarShowHeading obj = liftIO $ B.Properties.getObjectPropertyBool obj "show-heading"
setCalendarShowHeading :: (MonadIO m, IsCalendar o) => o -> Bool -> m ()
setCalendarShowHeading obj val = liftIO $ B.Properties.setObjectPropertyBool obj "show-heading" val
constructCalendarShowHeading :: (IsCalendar o) => Bool -> IO (GValueConstruct o)
constructCalendarShowHeading val = B.Properties.constructObjectPropertyBool "show-heading" val
#if ENABLE_OVERLOADING
data CalendarShowHeadingPropertyInfo
instance AttrInfo CalendarShowHeadingPropertyInfo where
type AttrAllowedOps CalendarShowHeadingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint CalendarShowHeadingPropertyInfo = (~) Bool
type AttrBaseTypeConstraint CalendarShowHeadingPropertyInfo = IsCalendar
type AttrGetType CalendarShowHeadingPropertyInfo = Bool
type AttrLabel CalendarShowHeadingPropertyInfo = "show-heading"
type AttrOrigin CalendarShowHeadingPropertyInfo = Calendar
attrGet _ = getCalendarShowHeading
attrSet _ = setCalendarShowHeading
attrConstruct _ = constructCalendarShowHeading
attrClear _ = undefined
#endif
getCalendarShowWeekNumbers :: (MonadIO m, IsCalendar o) => o -> m Bool
getCalendarShowWeekNumbers obj = liftIO $ B.Properties.getObjectPropertyBool obj "show-week-numbers"
setCalendarShowWeekNumbers :: (MonadIO m, IsCalendar o) => o -> Bool -> m ()
setCalendarShowWeekNumbers obj val = liftIO $ B.Properties.setObjectPropertyBool obj "show-week-numbers" val
constructCalendarShowWeekNumbers :: (IsCalendar o) => Bool -> IO (GValueConstruct o)
constructCalendarShowWeekNumbers val = B.Properties.constructObjectPropertyBool "show-week-numbers" val
#if ENABLE_OVERLOADING
data CalendarShowWeekNumbersPropertyInfo
instance AttrInfo CalendarShowWeekNumbersPropertyInfo where
type AttrAllowedOps CalendarShowWeekNumbersPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint CalendarShowWeekNumbersPropertyInfo = (~) Bool
type AttrBaseTypeConstraint CalendarShowWeekNumbersPropertyInfo = IsCalendar
type AttrGetType CalendarShowWeekNumbersPropertyInfo = Bool
type AttrLabel CalendarShowWeekNumbersPropertyInfo = "show-week-numbers"
type AttrOrigin CalendarShowWeekNumbersPropertyInfo = Calendar
attrGet _ = getCalendarShowWeekNumbers
attrSet _ = setCalendarShowWeekNumbers
attrConstruct _ = constructCalendarShowWeekNumbers
attrClear _ = undefined
#endif
getCalendarYear :: (MonadIO m, IsCalendar o) => o -> m Int32
getCalendarYear obj = liftIO $ B.Properties.getObjectPropertyInt32 obj "year"
setCalendarYear :: (MonadIO m, IsCalendar o) => o -> Int32 -> m ()
setCalendarYear obj val = liftIO $ B.Properties.setObjectPropertyInt32 obj "year" val
constructCalendarYear :: (IsCalendar o) => Int32 -> IO (GValueConstruct o)
constructCalendarYear val = B.Properties.constructObjectPropertyInt32 "year" val
#if ENABLE_OVERLOADING
data CalendarYearPropertyInfo
instance AttrInfo CalendarYearPropertyInfo where
type AttrAllowedOps CalendarYearPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint CalendarYearPropertyInfo = (~) Int32
type AttrBaseTypeConstraint CalendarYearPropertyInfo = IsCalendar
type AttrGetType CalendarYearPropertyInfo = Int32
type AttrLabel CalendarYearPropertyInfo = "year"
type AttrOrigin CalendarYearPropertyInfo = Calendar
attrGet _ = getCalendarYear
attrSet _ = setCalendarYear
attrConstruct _ = constructCalendarYear
attrClear _ = undefined
#endif
#if ENABLE_OVERLOADING
instance O.HasAttributeList Calendar
type instance O.AttributeList Calendar = CalendarAttributeList
type CalendarAttributeList = ('[ '("appPaintable", Gtk.Widget.WidgetAppPaintablePropertyInfo), '("canDefault", Gtk.Widget.WidgetCanDefaultPropertyInfo), '("canFocus", Gtk.Widget.WidgetCanFocusPropertyInfo), '("compositeChild", Gtk.Widget.WidgetCompositeChildPropertyInfo), '("day", CalendarDayPropertyInfo), '("detailHeightRows", CalendarDetailHeightRowsPropertyInfo), '("detailWidthChars", CalendarDetailWidthCharsPropertyInfo), '("doubleBuffered", Gtk.Widget.WidgetDoubleBufferedPropertyInfo), '("events", Gtk.Widget.WidgetEventsPropertyInfo), '("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), '("margin", Gtk.Widget.WidgetMarginPropertyInfo), '("marginBottom", Gtk.Widget.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.Widget.WidgetMarginEndPropertyInfo), '("marginLeft", Gtk.Widget.WidgetMarginLeftPropertyInfo), '("marginRight", Gtk.Widget.WidgetMarginRightPropertyInfo), '("marginStart", Gtk.Widget.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.Widget.WidgetMarginTopPropertyInfo), '("month", CalendarMonthPropertyInfo), '("name", Gtk.Widget.WidgetNamePropertyInfo), '("noMonthChange", CalendarNoMonthChangePropertyInfo), '("noShowAll", Gtk.Widget.WidgetNoShowAllPropertyInfo), '("opacity", Gtk.Widget.WidgetOpacityPropertyInfo), '("parent", Gtk.Widget.WidgetParentPropertyInfo), '("receivesDefault", Gtk.Widget.WidgetReceivesDefaultPropertyInfo), '("scaleFactor", Gtk.Widget.WidgetScaleFactorPropertyInfo), '("sensitive", Gtk.Widget.WidgetSensitivePropertyInfo), '("showDayNames", CalendarShowDayNamesPropertyInfo), '("showDetails", CalendarShowDetailsPropertyInfo), '("showHeading", CalendarShowHeadingPropertyInfo), '("showWeekNumbers", CalendarShowWeekNumbersPropertyInfo), '("style", Gtk.Widget.WidgetStylePropertyInfo), '("tooltipMarkup", Gtk.Widget.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.Widget.WidgetTooltipTextPropertyInfo), '("valign", Gtk.Widget.WidgetValignPropertyInfo), '("vexpand", Gtk.Widget.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.Widget.WidgetVexpandSetPropertyInfo), '("visible", Gtk.Widget.WidgetVisiblePropertyInfo), '("widthRequest", Gtk.Widget.WidgetWidthRequestPropertyInfo), '("window", Gtk.Widget.WidgetWindowPropertyInfo), '("year", CalendarYearPropertyInfo)] :: [(Symbol, *)])
#endif
#if ENABLE_OVERLOADING
calendarDay :: AttrLabelProxy "day"
calendarDay = AttrLabelProxy
calendarDetailHeightRows :: AttrLabelProxy "detailHeightRows"
calendarDetailHeightRows = AttrLabelProxy
calendarDetailWidthChars :: AttrLabelProxy "detailWidthChars"
calendarDetailWidthChars = AttrLabelProxy
calendarMonth :: AttrLabelProxy "month"
calendarMonth = AttrLabelProxy
calendarNoMonthChange :: AttrLabelProxy "noMonthChange"
calendarNoMonthChange = AttrLabelProxy
calendarShowDayNames :: AttrLabelProxy "showDayNames"
calendarShowDayNames = AttrLabelProxy
calendarShowDetails :: AttrLabelProxy "showDetails"
calendarShowDetails = AttrLabelProxy
calendarShowHeading :: AttrLabelProxy "showHeading"
calendarShowHeading = AttrLabelProxy
calendarShowWeekNumbers :: AttrLabelProxy "showWeekNumbers"
calendarShowWeekNumbers = AttrLabelProxy
calendarYear :: AttrLabelProxy "year"
calendarYear = AttrLabelProxy
#endif
#if ENABLE_OVERLOADING
data CalendarDaySelectedSignalInfo
instance SignalInfo CalendarDaySelectedSignalInfo where
type HaskellCallbackType CalendarDaySelectedSignalInfo = CalendarDaySelectedCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_CalendarDaySelectedCallback cb
cb'' <- mk_CalendarDaySelectedCallback cb'
connectSignalFunPtr obj "day-selected" cb'' connectMode
data CalendarDaySelectedDoubleClickSignalInfo
instance SignalInfo CalendarDaySelectedDoubleClickSignalInfo where
type HaskellCallbackType CalendarDaySelectedDoubleClickSignalInfo = CalendarDaySelectedDoubleClickCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_CalendarDaySelectedDoubleClickCallback cb
cb'' <- mk_CalendarDaySelectedDoubleClickCallback cb'
connectSignalFunPtr obj "day-selected-double-click" cb'' connectMode
data CalendarMonthChangedSignalInfo
instance SignalInfo CalendarMonthChangedSignalInfo where
type HaskellCallbackType CalendarMonthChangedSignalInfo = CalendarMonthChangedCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_CalendarMonthChangedCallback cb
cb'' <- mk_CalendarMonthChangedCallback cb'
connectSignalFunPtr obj "month-changed" cb'' connectMode
data CalendarNextMonthSignalInfo
instance SignalInfo CalendarNextMonthSignalInfo where
type HaskellCallbackType CalendarNextMonthSignalInfo = CalendarNextMonthCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_CalendarNextMonthCallback cb
cb'' <- mk_CalendarNextMonthCallback cb'
connectSignalFunPtr obj "next-month" cb'' connectMode
data CalendarNextYearSignalInfo
instance SignalInfo CalendarNextYearSignalInfo where
type HaskellCallbackType CalendarNextYearSignalInfo = CalendarNextYearCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_CalendarNextYearCallback cb
cb'' <- mk_CalendarNextYearCallback cb'
connectSignalFunPtr obj "next-year" cb'' connectMode
data CalendarPrevMonthSignalInfo
instance SignalInfo CalendarPrevMonthSignalInfo where
type HaskellCallbackType CalendarPrevMonthSignalInfo = CalendarPrevMonthCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_CalendarPrevMonthCallback cb
cb'' <- mk_CalendarPrevMonthCallback cb'
connectSignalFunPtr obj "prev-month" cb'' connectMode
data CalendarPrevYearSignalInfo
instance SignalInfo CalendarPrevYearSignalInfo where
type HaskellCallbackType CalendarPrevYearSignalInfo = CalendarPrevYearCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_CalendarPrevYearCallback cb
cb'' <- mk_CalendarPrevYearCallback cb'
connectSignalFunPtr obj "prev-year" cb'' connectMode
type instance O.SignalList Calendar = CalendarSignalList
type CalendarSignalList = ('[ '("accelClosuresChanged", Gtk.Widget.WidgetAccelClosuresChangedSignalInfo), '("buttonPressEvent", Gtk.Widget.WidgetButtonPressEventSignalInfo), '("buttonReleaseEvent", Gtk.Widget.WidgetButtonReleaseEventSignalInfo), '("canActivateAccel", Gtk.Widget.WidgetCanActivateAccelSignalInfo), '("childNotify", Gtk.Widget.WidgetChildNotifySignalInfo), '("compositedChanged", Gtk.Widget.WidgetCompositedChangedSignalInfo), '("configureEvent", Gtk.Widget.WidgetConfigureEventSignalInfo), '("damageEvent", Gtk.Widget.WidgetDamageEventSignalInfo), '("daySelected", CalendarDaySelectedSignalInfo), '("daySelectedDoubleClick", CalendarDaySelectedDoubleClickSignalInfo), '("deleteEvent", Gtk.Widget.WidgetDeleteEventSignalInfo), '("destroy", Gtk.Widget.WidgetDestroySignalInfo), '("destroyEvent", Gtk.Widget.WidgetDestroyEventSignalInfo), '("directionChanged", Gtk.Widget.WidgetDirectionChangedSignalInfo), '("dragBegin", Gtk.Widget.WidgetDragBeginSignalInfo), '("dragDataDelete", Gtk.Widget.WidgetDragDataDeleteSignalInfo), '("dragDataGet", Gtk.Widget.WidgetDragDataGetSignalInfo), '("dragDataReceived", Gtk.Widget.WidgetDragDataReceivedSignalInfo), '("dragDrop", Gtk.Widget.WidgetDragDropSignalInfo), '("dragEnd", Gtk.Widget.WidgetDragEndSignalInfo), '("dragFailed", Gtk.Widget.WidgetDragFailedSignalInfo), '("dragLeave", Gtk.Widget.WidgetDragLeaveSignalInfo), '("dragMotion", Gtk.Widget.WidgetDragMotionSignalInfo), '("draw", Gtk.Widget.WidgetDrawSignalInfo), '("enterNotifyEvent", Gtk.Widget.WidgetEnterNotifyEventSignalInfo), '("event", Gtk.Widget.WidgetEventSignalInfo), '("eventAfter", Gtk.Widget.WidgetEventAfterSignalInfo), '("focus", Gtk.Widget.WidgetFocusSignalInfo), '("focusInEvent", Gtk.Widget.WidgetFocusInEventSignalInfo), '("focusOutEvent", Gtk.Widget.WidgetFocusOutEventSignalInfo), '("grabBrokenEvent", Gtk.Widget.WidgetGrabBrokenEventSignalInfo), '("grabFocus", Gtk.Widget.WidgetGrabFocusSignalInfo), '("grabNotify", Gtk.Widget.WidgetGrabNotifySignalInfo), '("hide", Gtk.Widget.WidgetHideSignalInfo), '("hierarchyChanged", Gtk.Widget.WidgetHierarchyChangedSignalInfo), '("keyPressEvent", Gtk.Widget.WidgetKeyPressEventSignalInfo), '("keyReleaseEvent", Gtk.Widget.WidgetKeyReleaseEventSignalInfo), '("keynavFailed", Gtk.Widget.WidgetKeynavFailedSignalInfo), '("leaveNotifyEvent", Gtk.Widget.WidgetLeaveNotifyEventSignalInfo), '("map", Gtk.Widget.WidgetMapSignalInfo), '("mapEvent", Gtk.Widget.WidgetMapEventSignalInfo), '("mnemonicActivate", Gtk.Widget.WidgetMnemonicActivateSignalInfo), '("monthChanged", CalendarMonthChangedSignalInfo), '("motionNotifyEvent", Gtk.Widget.WidgetMotionNotifyEventSignalInfo), '("moveFocus", Gtk.Widget.WidgetMoveFocusSignalInfo), '("nextMonth", CalendarNextMonthSignalInfo), '("nextYear", CalendarNextYearSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo), '("parentSet", Gtk.Widget.WidgetParentSetSignalInfo), '("popupMenu", Gtk.Widget.WidgetPopupMenuSignalInfo), '("prevMonth", CalendarPrevMonthSignalInfo), '("prevYear", CalendarPrevYearSignalInfo), '("propertyNotifyEvent", Gtk.Widget.WidgetPropertyNotifyEventSignalInfo), '("proximityInEvent", Gtk.Widget.WidgetProximityInEventSignalInfo), '("proximityOutEvent", Gtk.Widget.WidgetProximityOutEventSignalInfo), '("queryTooltip", Gtk.Widget.WidgetQueryTooltipSignalInfo), '("realize", Gtk.Widget.WidgetRealizeSignalInfo), '("screenChanged", Gtk.Widget.WidgetScreenChangedSignalInfo), '("scrollEvent", Gtk.Widget.WidgetScrollEventSignalInfo), '("selectionClearEvent", Gtk.Widget.WidgetSelectionClearEventSignalInfo), '("selectionGet", Gtk.Widget.WidgetSelectionGetSignalInfo), '("selectionNotifyEvent", Gtk.Widget.WidgetSelectionNotifyEventSignalInfo), '("selectionReceived", Gtk.Widget.WidgetSelectionReceivedSignalInfo), '("selectionRequestEvent", Gtk.Widget.WidgetSelectionRequestEventSignalInfo), '("show", Gtk.Widget.WidgetShowSignalInfo), '("showHelp", Gtk.Widget.WidgetShowHelpSignalInfo), '("sizeAllocate", Gtk.Widget.WidgetSizeAllocateSignalInfo), '("stateChanged", Gtk.Widget.WidgetStateChangedSignalInfo), '("stateFlagsChanged", Gtk.Widget.WidgetStateFlagsChangedSignalInfo), '("styleSet", Gtk.Widget.WidgetStyleSetSignalInfo), '("styleUpdated", Gtk.Widget.WidgetStyleUpdatedSignalInfo), '("touchEvent", Gtk.Widget.WidgetTouchEventSignalInfo), '("unmap", Gtk.Widget.WidgetUnmapSignalInfo), '("unmapEvent", Gtk.Widget.WidgetUnmapEventSignalInfo), '("unrealize", Gtk.Widget.WidgetUnrealizeSignalInfo), '("visibilityNotifyEvent", Gtk.Widget.WidgetVisibilityNotifyEventSignalInfo), '("windowStateEvent", Gtk.Widget.WidgetWindowStateEventSignalInfo)] :: [(Symbol, *)])
#endif
foreign import ccall "gtk_calendar_new" gtk_calendar_new ::
IO (Ptr Calendar)
calendarNew ::
(B.CallStack.HasCallStack, MonadIO m) =>
m Calendar
calendarNew = liftIO $ do
result <- gtk_calendar_new
checkUnexpectedReturnNULL "calendarNew" result
result' <- (newObject Calendar) result
return result'
#if ENABLE_OVERLOADING
#endif
foreign import ccall "gtk_calendar_clear_marks" gtk_calendar_clear_marks ::
Ptr Calendar ->
IO ()
calendarClearMarks ::
(B.CallStack.HasCallStack, MonadIO m, IsCalendar a) =>
a
-> m ()
calendarClearMarks calendar = liftIO $ do
calendar' <- unsafeManagedPtrCastPtr calendar
gtk_calendar_clear_marks calendar'
touchManagedPtr calendar
return ()
#if ENABLE_OVERLOADING
data CalendarClearMarksMethodInfo
instance (signature ~ (m ()), MonadIO m, IsCalendar a) => O.MethodInfo CalendarClearMarksMethodInfo a signature where
overloadedMethod _ = calendarClearMarks
#endif
foreign import ccall "gtk_calendar_get_date" gtk_calendar_get_date ::
Ptr Calendar ->
Ptr Word32 ->
Ptr Word32 ->
Ptr Word32 ->
IO ()
calendarGetDate ::
(B.CallStack.HasCallStack, MonadIO m, IsCalendar a) =>
a
-> m ((Word32, Word32, Word32))
calendarGetDate calendar = liftIO $ do
calendar' <- unsafeManagedPtrCastPtr calendar
year <- allocMem :: IO (Ptr Word32)
month <- allocMem :: IO (Ptr Word32)
day <- allocMem :: IO (Ptr Word32)
gtk_calendar_get_date calendar' year month day
year' <- peek year
month' <- peek month
day' <- peek day
touchManagedPtr calendar
freeMem year
freeMem month
freeMem day
return (year', month', day')
#if ENABLE_OVERLOADING
data CalendarGetDateMethodInfo
instance (signature ~ (m ((Word32, Word32, Word32))), MonadIO m, IsCalendar a) => O.MethodInfo CalendarGetDateMethodInfo a signature where
overloadedMethod _ = calendarGetDate
#endif
foreign import ccall "gtk_calendar_get_day_is_marked" gtk_calendar_get_day_is_marked ::
Ptr Calendar ->
Word32 ->
IO CInt
calendarGetDayIsMarked ::
(B.CallStack.HasCallStack, MonadIO m, IsCalendar a) =>
a
-> Word32
-> m Bool
calendarGetDayIsMarked calendar day = liftIO $ do
calendar' <- unsafeManagedPtrCastPtr calendar
result <- gtk_calendar_get_day_is_marked calendar' day
let result' = (/= 0) result
touchManagedPtr calendar
return result'
#if ENABLE_OVERLOADING
data CalendarGetDayIsMarkedMethodInfo
instance (signature ~ (Word32 -> m Bool), MonadIO m, IsCalendar a) => O.MethodInfo CalendarGetDayIsMarkedMethodInfo a signature where
overloadedMethod _ = calendarGetDayIsMarked
#endif
foreign import ccall "gtk_calendar_get_detail_height_rows" gtk_calendar_get_detail_height_rows ::
Ptr Calendar ->
IO Int32
calendarGetDetailHeightRows ::
(B.CallStack.HasCallStack, MonadIO m, IsCalendar a) =>
a
-> m Int32
calendarGetDetailHeightRows calendar = liftIO $ do
calendar' <- unsafeManagedPtrCastPtr calendar
result <- gtk_calendar_get_detail_height_rows calendar'
touchManagedPtr calendar
return result
#if ENABLE_OVERLOADING
data CalendarGetDetailHeightRowsMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsCalendar a) => O.MethodInfo CalendarGetDetailHeightRowsMethodInfo a signature where
overloadedMethod _ = calendarGetDetailHeightRows
#endif
foreign import ccall "gtk_calendar_get_detail_width_chars" gtk_calendar_get_detail_width_chars ::
Ptr Calendar ->
IO Int32
calendarGetDetailWidthChars ::
(B.CallStack.HasCallStack, MonadIO m, IsCalendar a) =>
a
-> m Int32
calendarGetDetailWidthChars calendar = liftIO $ do
calendar' <- unsafeManagedPtrCastPtr calendar
result <- gtk_calendar_get_detail_width_chars calendar'
touchManagedPtr calendar
return result
#if ENABLE_OVERLOADING
data CalendarGetDetailWidthCharsMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsCalendar a) => O.MethodInfo CalendarGetDetailWidthCharsMethodInfo a signature where
overloadedMethod _ = calendarGetDetailWidthChars
#endif
foreign import ccall "gtk_calendar_get_display_options" gtk_calendar_get_display_options ::
Ptr Calendar ->
IO CUInt
calendarGetDisplayOptions ::
(B.CallStack.HasCallStack, MonadIO m, IsCalendar a) =>
a
-> m [Gtk.Flags.CalendarDisplayOptions]
calendarGetDisplayOptions calendar = liftIO $ do
calendar' <- unsafeManagedPtrCastPtr calendar
result <- gtk_calendar_get_display_options calendar'
let result' = wordToGFlags result
touchManagedPtr calendar
return result'
#if ENABLE_OVERLOADING
data CalendarGetDisplayOptionsMethodInfo
instance (signature ~ (m [Gtk.Flags.CalendarDisplayOptions]), MonadIO m, IsCalendar a) => O.MethodInfo CalendarGetDisplayOptionsMethodInfo a signature where
overloadedMethod _ = calendarGetDisplayOptions
#endif
foreign import ccall "gtk_calendar_mark_day" gtk_calendar_mark_day ::
Ptr Calendar ->
Word32 ->
IO ()
calendarMarkDay ::
(B.CallStack.HasCallStack, MonadIO m, IsCalendar a) =>
a
-> Word32
-> m ()
calendarMarkDay calendar day = liftIO $ do
calendar' <- unsafeManagedPtrCastPtr calendar
gtk_calendar_mark_day calendar' day
touchManagedPtr calendar
return ()
#if ENABLE_OVERLOADING
data CalendarMarkDayMethodInfo
instance (signature ~ (Word32 -> m ()), MonadIO m, IsCalendar a) => O.MethodInfo CalendarMarkDayMethodInfo a signature where
overloadedMethod _ = calendarMarkDay
#endif
foreign import ccall "gtk_calendar_select_day" gtk_calendar_select_day ::
Ptr Calendar ->
Word32 ->
IO ()
calendarSelectDay ::
(B.CallStack.HasCallStack, MonadIO m, IsCalendar a) =>
a
-> Word32
-> m ()
calendarSelectDay calendar day = liftIO $ do
calendar' <- unsafeManagedPtrCastPtr calendar
gtk_calendar_select_day calendar' day
touchManagedPtr calendar
return ()
#if ENABLE_OVERLOADING
data CalendarSelectDayMethodInfo
instance (signature ~ (Word32 -> m ()), MonadIO m, IsCalendar a) => O.MethodInfo CalendarSelectDayMethodInfo a signature where
overloadedMethod _ = calendarSelectDay
#endif
foreign import ccall "gtk_calendar_select_month" gtk_calendar_select_month ::
Ptr Calendar ->
Word32 ->
Word32 ->
IO ()
calendarSelectMonth ::
(B.CallStack.HasCallStack, MonadIO m, IsCalendar a) =>
a
-> Word32
-> Word32
-> m ()
calendarSelectMonth calendar month year = liftIO $ do
calendar' <- unsafeManagedPtrCastPtr calendar
gtk_calendar_select_month calendar' month year
touchManagedPtr calendar
return ()
#if ENABLE_OVERLOADING
data CalendarSelectMonthMethodInfo
instance (signature ~ (Word32 -> Word32 -> m ()), MonadIO m, IsCalendar a) => O.MethodInfo CalendarSelectMonthMethodInfo a signature where
overloadedMethod _ = calendarSelectMonth
#endif
foreign import ccall "gtk_calendar_set_detail_func" gtk_calendar_set_detail_func ::
Ptr Calendar ->
FunPtr Gtk.Callbacks.C_CalendarDetailFunc ->
Ptr () ->
FunPtr GLib.Callbacks.C_DestroyNotify ->
IO ()
calendarSetDetailFunc ::
(B.CallStack.HasCallStack, MonadIO m, IsCalendar a) =>
a
-> Gtk.Callbacks.CalendarDetailFunc
-> m ()
calendarSetDetailFunc calendar func = liftIO $ do
calendar' <- unsafeManagedPtrCastPtr calendar
func' <- Gtk.Callbacks.mk_CalendarDetailFunc (Gtk.Callbacks.wrap_CalendarDetailFunc Nothing (Gtk.Callbacks.drop_closures_CalendarDetailFunc func))
let data_ = castFunPtrToPtr func'
let destroy = safeFreeFunPtrPtr
gtk_calendar_set_detail_func calendar' func' data_ destroy
touchManagedPtr calendar
return ()
#if ENABLE_OVERLOADING
data CalendarSetDetailFuncMethodInfo
instance (signature ~ (Gtk.Callbacks.CalendarDetailFunc -> m ()), MonadIO m, IsCalendar a) => O.MethodInfo CalendarSetDetailFuncMethodInfo a signature where
overloadedMethod _ = calendarSetDetailFunc
#endif
foreign import ccall "gtk_calendar_set_detail_height_rows" gtk_calendar_set_detail_height_rows ::
Ptr Calendar ->
Int32 ->
IO ()
calendarSetDetailHeightRows ::
(B.CallStack.HasCallStack, MonadIO m, IsCalendar a) =>
a
-> Int32
-> m ()
calendarSetDetailHeightRows calendar rows = liftIO $ do
calendar' <- unsafeManagedPtrCastPtr calendar
gtk_calendar_set_detail_height_rows calendar' rows
touchManagedPtr calendar
return ()
#if ENABLE_OVERLOADING
data CalendarSetDetailHeightRowsMethodInfo
instance (signature ~ (Int32 -> m ()), MonadIO m, IsCalendar a) => O.MethodInfo CalendarSetDetailHeightRowsMethodInfo a signature where
overloadedMethod _ = calendarSetDetailHeightRows
#endif
foreign import ccall "gtk_calendar_set_detail_width_chars" gtk_calendar_set_detail_width_chars ::
Ptr Calendar ->
Int32 ->
IO ()
calendarSetDetailWidthChars ::
(B.CallStack.HasCallStack, MonadIO m, IsCalendar a) =>
a
-> Int32
-> m ()
calendarSetDetailWidthChars calendar chars = liftIO $ do
calendar' <- unsafeManagedPtrCastPtr calendar
gtk_calendar_set_detail_width_chars calendar' chars
touchManagedPtr calendar
return ()
#if ENABLE_OVERLOADING
data CalendarSetDetailWidthCharsMethodInfo
instance (signature ~ (Int32 -> m ()), MonadIO m, IsCalendar a) => O.MethodInfo CalendarSetDetailWidthCharsMethodInfo a signature where
overloadedMethod _ = calendarSetDetailWidthChars
#endif
foreign import ccall "gtk_calendar_set_display_options" gtk_calendar_set_display_options ::
Ptr Calendar ->
CUInt ->
IO ()
calendarSetDisplayOptions ::
(B.CallStack.HasCallStack, MonadIO m, IsCalendar a) =>
a
-> [Gtk.Flags.CalendarDisplayOptions]
-> m ()
calendarSetDisplayOptions calendar flags = liftIO $ do
calendar' <- unsafeManagedPtrCastPtr calendar
let flags' = gflagsToWord flags
gtk_calendar_set_display_options calendar' flags'
touchManagedPtr calendar
return ()
#if ENABLE_OVERLOADING
data CalendarSetDisplayOptionsMethodInfo
instance (signature ~ ([Gtk.Flags.CalendarDisplayOptions] -> m ()), MonadIO m, IsCalendar a) => O.MethodInfo CalendarSetDisplayOptionsMethodInfo a signature where
overloadedMethod _ = calendarSetDisplayOptions
#endif
foreign import ccall "gtk_calendar_unmark_day" gtk_calendar_unmark_day ::
Ptr Calendar ->
Word32 ->
IO ()
calendarUnmarkDay ::
(B.CallStack.HasCallStack, MonadIO m, IsCalendar a) =>
a
-> Word32
-> m ()
calendarUnmarkDay calendar day = liftIO $ do
calendar' <- unsafeManagedPtrCastPtr calendar
gtk_calendar_unmark_day calendar' day
touchManagedPtr calendar
return ()
#if ENABLE_OVERLOADING
data CalendarUnmarkDayMethodInfo
instance (signature ~ (Word32 -> m ()), MonadIO m, IsCalendar a) => O.MethodInfo CalendarUnmarkDayMethodInfo a signature where
overloadedMethod _ = calendarUnmarkDay
#endif