gi-gtk-0.3.18.13: GI/Gtk/Objects/Calendar.hs

{- |
Copyright  : Will Thompson, Iñaki García Etxebarria and Jonas Platte
License    : LGPL-2.1
Maintainer : Iñaki García Etxebarria (garetxe@gmail.com)
-}

module GI.Gtk.Objects.Calendar
    ( 

-- * Exported types
    Calendar(..)                            ,
    CalendarK                               ,
    toCalendar                              ,
    noCalendar                              ,


 -- * Methods
-- ** calendarClearMarks
    CalendarClearMarksMethodInfo            ,
    calendarClearMarks                      ,


-- ** calendarGetDate
    CalendarGetDateMethodInfo               ,
    calendarGetDate                         ,


-- ** calendarGetDayIsMarked
    CalendarGetDayIsMarkedMethodInfo        ,
    calendarGetDayIsMarked                  ,


-- ** calendarGetDetailHeightRows
    CalendarGetDetailHeightRowsMethodInfo   ,
    calendarGetDetailHeightRows             ,


-- ** calendarGetDetailWidthChars
    CalendarGetDetailWidthCharsMethodInfo   ,
    calendarGetDetailWidthChars             ,


-- ** calendarGetDisplayOptions
    CalendarGetDisplayOptionsMethodInfo     ,
    calendarGetDisplayOptions               ,


-- ** calendarMarkDay
    CalendarMarkDayMethodInfo               ,
    calendarMarkDay                         ,


-- ** calendarNew
    calendarNew                             ,


-- ** calendarSelectDay
    CalendarSelectDayMethodInfo             ,
    calendarSelectDay                       ,


-- ** calendarSelectMonth
    CalendarSelectMonthMethodInfo           ,
    calendarSelectMonth                     ,


-- ** calendarSetDetailFunc
    CalendarSetDetailFuncMethodInfo         ,
    calendarSetDetailFunc                   ,


-- ** calendarSetDetailHeightRows
    CalendarSetDetailHeightRowsMethodInfo   ,
    calendarSetDetailHeightRows             ,


-- ** calendarSetDetailWidthChars
    CalendarSetDetailWidthCharsMethodInfo   ,
    calendarSetDetailWidthChars             ,


-- ** calendarSetDisplayOptions
    CalendarSetDisplayOptionsMethodInfo     ,
    calendarSetDisplayOptions               ,


-- ** calendarUnmarkDay
    CalendarUnmarkDayMethodInfo             ,
    calendarUnmarkDay                       ,




 -- * Properties
-- ** Day
    CalendarDayPropertyInfo                 ,
    constructCalendarDay                    ,
    getCalendarDay                          ,
    setCalendarDay                          ,


-- ** DetailHeightRows
    CalendarDetailHeightRowsPropertyInfo    ,
    constructCalendarDetailHeightRows       ,
    getCalendarDetailHeightRows             ,
    setCalendarDetailHeightRows             ,


-- ** DetailWidthChars
    CalendarDetailWidthCharsPropertyInfo    ,
    constructCalendarDetailWidthChars       ,
    getCalendarDetailWidthChars             ,
    setCalendarDetailWidthChars             ,


-- ** Month
    CalendarMonthPropertyInfo               ,
    constructCalendarMonth                  ,
    getCalendarMonth                        ,
    setCalendarMonth                        ,


-- ** NoMonthChange
    CalendarNoMonthChangePropertyInfo       ,
    constructCalendarNoMonthChange          ,
    getCalendarNoMonthChange                ,
    setCalendarNoMonthChange                ,


-- ** ShowDayNames
    CalendarShowDayNamesPropertyInfo        ,
    constructCalendarShowDayNames           ,
    getCalendarShowDayNames                 ,
    setCalendarShowDayNames                 ,


-- ** ShowDetails
    CalendarShowDetailsPropertyInfo         ,
    constructCalendarShowDetails            ,
    getCalendarShowDetails                  ,
    setCalendarShowDetails                  ,


-- ** ShowHeading
    CalendarShowHeadingPropertyInfo         ,
    constructCalendarShowHeading            ,
    getCalendarShowHeading                  ,
    setCalendarShowHeading                  ,


-- ** ShowWeekNumbers
    CalendarShowWeekNumbersPropertyInfo     ,
    constructCalendarShowWeekNumbers        ,
    getCalendarShowWeekNumbers              ,
    setCalendarShowWeekNumbers              ,


-- ** Year
    CalendarYearPropertyInfo                ,
    constructCalendarYear                   ,
    getCalendarYear                         ,
    setCalendarYear                         ,




 -- * Signals
-- ** DaySelected
    CalendarDaySelectedCallback             ,
    CalendarDaySelectedCallbackC            ,
    CalendarDaySelectedSignalInfo           ,
    afterCalendarDaySelected                ,
    calendarDaySelectedCallbackWrapper      ,
    calendarDaySelectedClosure              ,
    mkCalendarDaySelectedCallback           ,
    noCalendarDaySelectedCallback           ,
    onCalendarDaySelected                   ,


-- ** DaySelectedDoubleClick
    CalendarDaySelectedDoubleClickCallback  ,
    CalendarDaySelectedDoubleClickCallbackC ,
    CalendarDaySelectedDoubleClickSignalInfo,
    afterCalendarDaySelectedDoubleClick     ,
    calendarDaySelectedDoubleClickCallbackWrapper,
    calendarDaySelectedDoubleClickClosure   ,
    mkCalendarDaySelectedDoubleClickCallback,
    noCalendarDaySelectedDoubleClickCallback,
    onCalendarDaySelectedDoubleClick        ,


-- ** MonthChanged
    CalendarMonthChangedCallback            ,
    CalendarMonthChangedCallbackC           ,
    CalendarMonthChangedSignalInfo          ,
    afterCalendarMonthChanged               ,
    calendarMonthChangedCallbackWrapper     ,
    calendarMonthChangedClosure             ,
    mkCalendarMonthChangedCallback          ,
    noCalendarMonthChangedCallback          ,
    onCalendarMonthChanged                  ,


-- ** NextMonth
    CalendarNextMonthCallback               ,
    CalendarNextMonthCallbackC              ,
    CalendarNextMonthSignalInfo             ,
    afterCalendarNextMonth                  ,
    calendarNextMonthCallbackWrapper        ,
    calendarNextMonthClosure                ,
    mkCalendarNextMonthCallback             ,
    noCalendarNextMonthCallback             ,
    onCalendarNextMonth                     ,


-- ** NextYear
    CalendarNextYearCallback                ,
    CalendarNextYearCallbackC               ,
    CalendarNextYearSignalInfo              ,
    afterCalendarNextYear                   ,
    calendarNextYearCallbackWrapper         ,
    calendarNextYearClosure                 ,
    mkCalendarNextYearCallback              ,
    noCalendarNextYearCallback              ,
    onCalendarNextYear                      ,


-- ** PrevMonth
    CalendarPrevMonthCallback               ,
    CalendarPrevMonthCallbackC              ,
    CalendarPrevMonthSignalInfo             ,
    afterCalendarPrevMonth                  ,
    calendarPrevMonthCallbackWrapper        ,
    calendarPrevMonthClosure                ,
    mkCalendarPrevMonthCallback             ,
    noCalendarPrevMonthCallback             ,
    onCalendarPrevMonth                     ,


-- ** PrevYear
    CalendarPrevYearCallback                ,
    CalendarPrevYearCallbackC               ,
    CalendarPrevYearSignalInfo              ,
    afterCalendarPrevYear                   ,
    calendarPrevYearCallbackWrapper         ,
    calendarPrevYearClosure                 ,
    mkCalendarPrevYearCallback              ,
    noCalendarPrevYearCallback              ,
    onCalendarPrevYear                      ,




    ) where

import Prelude ()
import Data.GI.Base.ShortPrelude

import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map

import GI.Gtk.Types
import GI.Gtk.Callbacks
import qualified GI.Atk as Atk
import qualified GI.GLib as GLib
import qualified GI.GObject as GObject

newtype Calendar = Calendar (ForeignPtr Calendar)
foreign import ccall "gtk_calendar_get_type"
    c_gtk_calendar_get_type :: IO GType

type instance ParentTypes Calendar = CalendarParentTypes
type CalendarParentTypes = '[Widget, GObject.Object, Atk.ImplementorIface, Buildable]

instance GObject Calendar where
    gobjectIsInitiallyUnowned _ = True
    gobjectType _ = c_gtk_calendar_get_type
    

class GObject o => CalendarK o
instance (GObject o, IsDescendantOf Calendar o) => CalendarK o

toCalendar :: CalendarK o => o -> IO Calendar
toCalendar = unsafeCastTo Calendar

noCalendar :: Maybe Calendar
noCalendar = Nothing

type family ResolveCalendarMethod (t :: Symbol) (o :: *) :: * where
    ResolveCalendarMethod "activate" o = WidgetActivateMethodInfo
    ResolveCalendarMethod "addAccelerator" o = WidgetAddAcceleratorMethodInfo
    ResolveCalendarMethod "addChild" o = BuildableAddChildMethodInfo
    ResolveCalendarMethod "addDeviceEvents" o = WidgetAddDeviceEventsMethodInfo
    ResolveCalendarMethod "addEvents" o = WidgetAddEventsMethodInfo
    ResolveCalendarMethod "addMnemonicLabel" o = WidgetAddMnemonicLabelMethodInfo
    ResolveCalendarMethod "addTickCallback" o = WidgetAddTickCallbackMethodInfo
    ResolveCalendarMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo
    ResolveCalendarMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo
    ResolveCalendarMethod "canActivateAccel" o = WidgetCanActivateAccelMethodInfo
    ResolveCalendarMethod "childFocus" o = WidgetChildFocusMethodInfo
    ResolveCalendarMethod "childNotify" o = WidgetChildNotifyMethodInfo
    ResolveCalendarMethod "classPath" o = WidgetClassPathMethodInfo
    ResolveCalendarMethod "clearMarks" o = CalendarClearMarksMethodInfo
    ResolveCalendarMethod "computeExpand" o = WidgetComputeExpandMethodInfo
    ResolveCalendarMethod "constructChild" o = BuildableConstructChildMethodInfo
    ResolveCalendarMethod "createPangoContext" o = WidgetCreatePangoContextMethodInfo
    ResolveCalendarMethod "createPangoLayout" o = WidgetCreatePangoLayoutMethodInfo
    ResolveCalendarMethod "customFinished" o = BuildableCustomFinishedMethodInfo
    ResolveCalendarMethod "customTagEnd" o = BuildableCustomTagEndMethodInfo
    ResolveCalendarMethod "customTagStart" o = BuildableCustomTagStartMethodInfo
    ResolveCalendarMethod "destroy" o = WidgetDestroyMethodInfo
    ResolveCalendarMethod "destroyed" o = WidgetDestroyedMethodInfo
    ResolveCalendarMethod "deviceIsShadowed" o = WidgetDeviceIsShadowedMethodInfo
    ResolveCalendarMethod "dragBegin" o = WidgetDragBeginMethodInfo
    ResolveCalendarMethod "dragBeginWithCoordinates" o = WidgetDragBeginWithCoordinatesMethodInfo
    ResolveCalendarMethod "dragCheckThreshold" o = WidgetDragCheckThresholdMethodInfo
    ResolveCalendarMethod "dragDestAddImageTargets" o = WidgetDragDestAddImageTargetsMethodInfo
    ResolveCalendarMethod "dragDestAddTextTargets" o = WidgetDragDestAddTextTargetsMethodInfo
    ResolveCalendarMethod "dragDestAddUriTargets" o = WidgetDragDestAddUriTargetsMethodInfo
    ResolveCalendarMethod "dragDestFindTarget" o = WidgetDragDestFindTargetMethodInfo
    ResolveCalendarMethod "dragDestGetTargetList" o = WidgetDragDestGetTargetListMethodInfo
    ResolveCalendarMethod "dragDestGetTrackMotion" o = WidgetDragDestGetTrackMotionMethodInfo
    ResolveCalendarMethod "dragDestSet" o = WidgetDragDestSetMethodInfo
    ResolveCalendarMethod "dragDestSetProxy" o = WidgetDragDestSetProxyMethodInfo
    ResolveCalendarMethod "dragDestSetTargetList" o = WidgetDragDestSetTargetListMethodInfo
    ResolveCalendarMethod "dragDestSetTrackMotion" o = WidgetDragDestSetTrackMotionMethodInfo
    ResolveCalendarMethod "dragDestUnset" o = WidgetDragDestUnsetMethodInfo
    ResolveCalendarMethod "dragGetData" o = WidgetDragGetDataMethodInfo
    ResolveCalendarMethod "dragHighlight" o = WidgetDragHighlightMethodInfo
    ResolveCalendarMethod "dragSourceAddImageTargets" o = WidgetDragSourceAddImageTargetsMethodInfo
    ResolveCalendarMethod "dragSourceAddTextTargets" o = WidgetDragSourceAddTextTargetsMethodInfo
    ResolveCalendarMethod "dragSourceAddUriTargets" o = WidgetDragSourceAddUriTargetsMethodInfo
    ResolveCalendarMethod "dragSourceGetTargetList" o = WidgetDragSourceGetTargetListMethodInfo
    ResolveCalendarMethod "dragSourceSet" o = WidgetDragSourceSetMethodInfo
    ResolveCalendarMethod "dragSourceSetIconGicon" o = WidgetDragSourceSetIconGiconMethodInfo
    ResolveCalendarMethod "dragSourceSetIconName" o = WidgetDragSourceSetIconNameMethodInfo
    ResolveCalendarMethod "dragSourceSetIconPixbuf" o = WidgetDragSourceSetIconPixbufMethodInfo
    ResolveCalendarMethod "dragSourceSetIconStock" o = WidgetDragSourceSetIconStockMethodInfo
    ResolveCalendarMethod "dragSourceSetTargetList" o = WidgetDragSourceSetTargetListMethodInfo
    ResolveCalendarMethod "dragSourceUnset" o = WidgetDragSourceUnsetMethodInfo
    ResolveCalendarMethod "dragUnhighlight" o = WidgetDragUnhighlightMethodInfo
    ResolveCalendarMethod "draw" o = WidgetDrawMethodInfo
    ResolveCalendarMethod "ensureStyle" o = WidgetEnsureStyleMethodInfo
    ResolveCalendarMethod "errorBell" o = WidgetErrorBellMethodInfo
    ResolveCalendarMethod "event" o = WidgetEventMethodInfo
    ResolveCalendarMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo
    ResolveCalendarMethod "freezeChildNotify" o = WidgetFreezeChildNotifyMethodInfo
    ResolveCalendarMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo
    ResolveCalendarMethod "grabAdd" o = WidgetGrabAddMethodInfo
    ResolveCalendarMethod "grabDefault" o = WidgetGrabDefaultMethodInfo
    ResolveCalendarMethod "grabFocus" o = WidgetGrabFocusMethodInfo
    ResolveCalendarMethod "grabRemove" o = WidgetGrabRemoveMethodInfo
    ResolveCalendarMethod "hasDefault" o = WidgetHasDefaultMethodInfo
    ResolveCalendarMethod "hasFocus" o = WidgetHasFocusMethodInfo
    ResolveCalendarMethod "hasGrab" o = WidgetHasGrabMethodInfo
    ResolveCalendarMethod "hasRcStyle" o = WidgetHasRcStyleMethodInfo
    ResolveCalendarMethod "hasScreen" o = WidgetHasScreenMethodInfo
    ResolveCalendarMethod "hasVisibleFocus" o = WidgetHasVisibleFocusMethodInfo
    ResolveCalendarMethod "hide" o = WidgetHideMethodInfo
    ResolveCalendarMethod "hideOnDelete" o = WidgetHideOnDeleteMethodInfo
    ResolveCalendarMethod "inDestruction" o = WidgetInDestructionMethodInfo
    ResolveCalendarMethod "initTemplate" o = WidgetInitTemplateMethodInfo
    ResolveCalendarMethod "inputShapeCombineRegion" o = WidgetInputShapeCombineRegionMethodInfo
    ResolveCalendarMethod "insertActionGroup" o = WidgetInsertActionGroupMethodInfo
    ResolveCalendarMethod "intersect" o = WidgetIntersectMethodInfo
    ResolveCalendarMethod "isAncestor" o = WidgetIsAncestorMethodInfo
    ResolveCalendarMethod "isComposited" o = WidgetIsCompositedMethodInfo
    ResolveCalendarMethod "isDrawable" o = WidgetIsDrawableMethodInfo
    ResolveCalendarMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo
    ResolveCalendarMethod "isFocus" o = WidgetIsFocusMethodInfo
    ResolveCalendarMethod "isSensitive" o = WidgetIsSensitiveMethodInfo
    ResolveCalendarMethod "isToplevel" o = WidgetIsToplevelMethodInfo
    ResolveCalendarMethod "isVisible" o = WidgetIsVisibleMethodInfo
    ResolveCalendarMethod "keynavFailed" o = WidgetKeynavFailedMethodInfo
    ResolveCalendarMethod "listAccelClosures" o = WidgetListAccelClosuresMethodInfo
    ResolveCalendarMethod "listActionPrefixes" o = WidgetListActionPrefixesMethodInfo
    ResolveCalendarMethod "listMnemonicLabels" o = WidgetListMnemonicLabelsMethodInfo
    ResolveCalendarMethod "map" o = WidgetMapMethodInfo
    ResolveCalendarMethod "markDay" o = CalendarMarkDayMethodInfo
    ResolveCalendarMethod "mnemonicActivate" o = WidgetMnemonicActivateMethodInfo
    ResolveCalendarMethod "modifyBase" o = WidgetModifyBaseMethodInfo
    ResolveCalendarMethod "modifyBg" o = WidgetModifyBgMethodInfo
    ResolveCalendarMethod "modifyCursor" o = WidgetModifyCursorMethodInfo
    ResolveCalendarMethod "modifyFg" o = WidgetModifyFgMethodInfo
    ResolveCalendarMethod "modifyFont" o = WidgetModifyFontMethodInfo
    ResolveCalendarMethod "modifyStyle" o = WidgetModifyStyleMethodInfo
    ResolveCalendarMethod "modifyText" o = WidgetModifyTextMethodInfo
    ResolveCalendarMethod "notify" o = GObject.ObjectNotifyMethodInfo
    ResolveCalendarMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo
    ResolveCalendarMethod "overrideBackgroundColor" o = WidgetOverrideBackgroundColorMethodInfo
    ResolveCalendarMethod "overrideColor" o = WidgetOverrideColorMethodInfo
    ResolveCalendarMethod "overrideCursor" o = WidgetOverrideCursorMethodInfo
    ResolveCalendarMethod "overrideFont" o = WidgetOverrideFontMethodInfo
    ResolveCalendarMethod "overrideSymbolicColor" o = WidgetOverrideSymbolicColorMethodInfo
    ResolveCalendarMethod "parserFinished" o = BuildableParserFinishedMethodInfo
    ResolveCalendarMethod "path" o = WidgetPathMethodInfo
    ResolveCalendarMethod "queueComputeExpand" o = WidgetQueueComputeExpandMethodInfo
    ResolveCalendarMethod "queueDraw" o = WidgetQueueDrawMethodInfo
    ResolveCalendarMethod "queueDrawArea" o = WidgetQueueDrawAreaMethodInfo
    ResolveCalendarMethod "queueDrawRegion" o = WidgetQueueDrawRegionMethodInfo
    ResolveCalendarMethod "queueResize" o = WidgetQueueResizeMethodInfo
    ResolveCalendarMethod "queueResizeNoRedraw" o = WidgetQueueResizeNoRedrawMethodInfo
    ResolveCalendarMethod "realize" o = WidgetRealizeMethodInfo
    ResolveCalendarMethod "ref" o = GObject.ObjectRefMethodInfo
    ResolveCalendarMethod "refSink" o = GObject.ObjectRefSinkMethodInfo
    ResolveCalendarMethod "regionIntersect" o = WidgetRegionIntersectMethodInfo
    ResolveCalendarMethod "registerWindow" o = WidgetRegisterWindowMethodInfo
    ResolveCalendarMethod "removeAccelerator" o = WidgetRemoveAcceleratorMethodInfo
    ResolveCalendarMethod "removeMnemonicLabel" o = WidgetRemoveMnemonicLabelMethodInfo
    ResolveCalendarMethod "removeTickCallback" o = WidgetRemoveTickCallbackMethodInfo
    ResolveCalendarMethod "renderIcon" o = WidgetRenderIconMethodInfo
    ResolveCalendarMethod "renderIconPixbuf" o = WidgetRenderIconPixbufMethodInfo
    ResolveCalendarMethod "reparent" o = WidgetReparentMethodInfo
    ResolveCalendarMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo
    ResolveCalendarMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo
    ResolveCalendarMethod "resetRcStyles" o = WidgetResetRcStylesMethodInfo
    ResolveCalendarMethod "resetStyle" o = WidgetResetStyleMethodInfo
    ResolveCalendarMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo
    ResolveCalendarMethod "selectDay" o = CalendarSelectDayMethodInfo
    ResolveCalendarMethod "selectMonth" o = CalendarSelectMonthMethodInfo
    ResolveCalendarMethod "sendExpose" o = WidgetSendExposeMethodInfo
    ResolveCalendarMethod "sendFocusChange" o = WidgetSendFocusChangeMethodInfo
    ResolveCalendarMethod "shapeCombineRegion" o = WidgetShapeCombineRegionMethodInfo
    ResolveCalendarMethod "show" o = WidgetShowMethodInfo
    ResolveCalendarMethod "showAll" o = WidgetShowAllMethodInfo
    ResolveCalendarMethod "showNow" o = WidgetShowNowMethodInfo
    ResolveCalendarMethod "sizeAllocate" o = WidgetSizeAllocateMethodInfo
    ResolveCalendarMethod "sizeAllocateWithBaseline" o = WidgetSizeAllocateWithBaselineMethodInfo
    ResolveCalendarMethod "sizeRequest" o = WidgetSizeRequestMethodInfo
    ResolveCalendarMethod "stealData" o = GObject.ObjectStealDataMethodInfo
    ResolveCalendarMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo
    ResolveCalendarMethod "styleAttach" o = WidgetStyleAttachMethodInfo
    ResolveCalendarMethod "styleGetProperty" o = WidgetStyleGetPropertyMethodInfo
    ResolveCalendarMethod "thawChildNotify" o = WidgetThawChildNotifyMethodInfo
    ResolveCalendarMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo
    ResolveCalendarMethod "translateCoordinates" o = WidgetTranslateCoordinatesMethodInfo
    ResolveCalendarMethod "triggerTooltipQuery" o = WidgetTriggerTooltipQueryMethodInfo
    ResolveCalendarMethod "unmap" o = WidgetUnmapMethodInfo
    ResolveCalendarMethod "unmarkDay" o = CalendarUnmarkDayMethodInfo
    ResolveCalendarMethod "unparent" o = WidgetUnparentMethodInfo
    ResolveCalendarMethod "unrealize" o = WidgetUnrealizeMethodInfo
    ResolveCalendarMethod "unref" o = GObject.ObjectUnrefMethodInfo
    ResolveCalendarMethod "unregisterWindow" o = WidgetUnregisterWindowMethodInfo
    ResolveCalendarMethod "unsetStateFlags" o = WidgetUnsetStateFlagsMethodInfo
    ResolveCalendarMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo
    ResolveCalendarMethod "getAccessible" o = WidgetGetAccessibleMethodInfo
    ResolveCalendarMethod "getActionGroup" o = WidgetGetActionGroupMethodInfo
    ResolveCalendarMethod "getAllocatedBaseline" o = WidgetGetAllocatedBaselineMethodInfo
    ResolveCalendarMethod "getAllocatedHeight" o = WidgetGetAllocatedHeightMethodInfo
    ResolveCalendarMethod "getAllocatedWidth" o = WidgetGetAllocatedWidthMethodInfo
    ResolveCalendarMethod "getAllocation" o = WidgetGetAllocationMethodInfo
    ResolveCalendarMethod "getAncestor" o = WidgetGetAncestorMethodInfo
    ResolveCalendarMethod "getAppPaintable" o = WidgetGetAppPaintableMethodInfo
    ResolveCalendarMethod "getCanDefault" o = WidgetGetCanDefaultMethodInfo
    ResolveCalendarMethod "getCanFocus" o = WidgetGetCanFocusMethodInfo
    ResolveCalendarMethod "getChildRequisition" o = WidgetGetChildRequisitionMethodInfo
    ResolveCalendarMethod "getChildVisible" o = WidgetGetChildVisibleMethodInfo
    ResolveCalendarMethod "getClip" o = WidgetGetClipMethodInfo
    ResolveCalendarMethod "getClipboard" o = WidgetGetClipboardMethodInfo
    ResolveCalendarMethod "getCompositeName" o = WidgetGetCompositeNameMethodInfo
    ResolveCalendarMethod "getData" o = GObject.ObjectGetDataMethodInfo
    ResolveCalendarMethod "getDate" o = CalendarGetDateMethodInfo
    ResolveCalendarMethod "getDayIsMarked" o = CalendarGetDayIsMarkedMethodInfo
    ResolveCalendarMethod "getDetailHeightRows" o = CalendarGetDetailHeightRowsMethodInfo
    ResolveCalendarMethod "getDetailWidthChars" o = CalendarGetDetailWidthCharsMethodInfo
    ResolveCalendarMethod "getDeviceEnabled" o = WidgetGetDeviceEnabledMethodInfo
    ResolveCalendarMethod "getDeviceEvents" o = WidgetGetDeviceEventsMethodInfo
    ResolveCalendarMethod "getDirection" o = WidgetGetDirectionMethodInfo
    ResolveCalendarMethod "getDisplay" o = WidgetGetDisplayMethodInfo
    ResolveCalendarMethod "getDisplayOptions" o = CalendarGetDisplayOptionsMethodInfo
    ResolveCalendarMethod "getDoubleBuffered" o = WidgetGetDoubleBufferedMethodInfo
    ResolveCalendarMethod "getEvents" o = WidgetGetEventsMethodInfo
    ResolveCalendarMethod "getFontMap" o = WidgetGetFontMapMethodInfo
    ResolveCalendarMethod "getFontOptions" o = WidgetGetFontOptionsMethodInfo
    ResolveCalendarMethod "getFrameClock" o = WidgetGetFrameClockMethodInfo
    ResolveCalendarMethod "getHalign" o = WidgetGetHalignMethodInfo
    ResolveCalendarMethod "getHasTooltip" o = WidgetGetHasTooltipMethodInfo
    ResolveCalendarMethod "getHasWindow" o = WidgetGetHasWindowMethodInfo
    ResolveCalendarMethod "getHexpand" o = WidgetGetHexpandMethodInfo
    ResolveCalendarMethod "getHexpandSet" o = WidgetGetHexpandSetMethodInfo
    ResolveCalendarMethod "getInternalChild" o = BuildableGetInternalChildMethodInfo
    ResolveCalendarMethod "getMapped" o = WidgetGetMappedMethodInfo
    ResolveCalendarMethod "getMarginBottom" o = WidgetGetMarginBottomMethodInfo
    ResolveCalendarMethod "getMarginEnd" o = WidgetGetMarginEndMethodInfo
    ResolveCalendarMethod "getMarginLeft" o = WidgetGetMarginLeftMethodInfo
    ResolveCalendarMethod "getMarginRight" o = WidgetGetMarginRightMethodInfo
    ResolveCalendarMethod "getMarginStart" o = WidgetGetMarginStartMethodInfo
    ResolveCalendarMethod "getMarginTop" o = WidgetGetMarginTopMethodInfo
    ResolveCalendarMethod "getModifierMask" o = WidgetGetModifierMaskMethodInfo
    ResolveCalendarMethod "getModifierStyle" o = WidgetGetModifierStyleMethodInfo
    ResolveCalendarMethod "getNoShowAll" o = WidgetGetNoShowAllMethodInfo
    ResolveCalendarMethod "getOpacity" o = WidgetGetOpacityMethodInfo
    ResolveCalendarMethod "getPangoContext" o = WidgetGetPangoContextMethodInfo
    ResolveCalendarMethod "getParent" o = WidgetGetParentMethodInfo
    ResolveCalendarMethod "getParentWindow" o = WidgetGetParentWindowMethodInfo
    ResolveCalendarMethod "getPath" o = WidgetGetPathMethodInfo
    ResolveCalendarMethod "getPointer" o = WidgetGetPointerMethodInfo
    ResolveCalendarMethod "getPreferredHeight" o = WidgetGetPreferredHeightMethodInfo
    ResolveCalendarMethod "getPreferredHeightAndBaselineForWidth" o = WidgetGetPreferredHeightAndBaselineForWidthMethodInfo
    ResolveCalendarMethod "getPreferredHeightForWidth" o = WidgetGetPreferredHeightForWidthMethodInfo
    ResolveCalendarMethod "getPreferredSize" o = WidgetGetPreferredSizeMethodInfo
    ResolveCalendarMethod "getPreferredWidth" o = WidgetGetPreferredWidthMethodInfo
    ResolveCalendarMethod "getPreferredWidthForHeight" o = WidgetGetPreferredWidthForHeightMethodInfo
    ResolveCalendarMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo
    ResolveCalendarMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo
    ResolveCalendarMethod "getRealized" o = WidgetGetRealizedMethodInfo
    ResolveCalendarMethod "getReceivesDefault" o = WidgetGetReceivesDefaultMethodInfo
    ResolveCalendarMethod "getRequestMode" o = WidgetGetRequestModeMethodInfo
    ResolveCalendarMethod "getRequisition" o = WidgetGetRequisitionMethodInfo
    ResolveCalendarMethod "getRootWindow" o = WidgetGetRootWindowMethodInfo
    ResolveCalendarMethod "getScaleFactor" o = WidgetGetScaleFactorMethodInfo
    ResolveCalendarMethod "getScreen" o = WidgetGetScreenMethodInfo
    ResolveCalendarMethod "getSensitive" o = WidgetGetSensitiveMethodInfo
    ResolveCalendarMethod "getSettings" o = WidgetGetSettingsMethodInfo
    ResolveCalendarMethod "getSizeRequest" o = WidgetGetSizeRequestMethodInfo
    ResolveCalendarMethod "getState" o = WidgetGetStateMethodInfo
    ResolveCalendarMethod "getStateFlags" o = WidgetGetStateFlagsMethodInfo
    ResolveCalendarMethod "getStyle" o = WidgetGetStyleMethodInfo
    ResolveCalendarMethod "getStyleContext" o = WidgetGetStyleContextMethodInfo
    ResolveCalendarMethod "getSupportMultidevice" o = WidgetGetSupportMultideviceMethodInfo
    ResolveCalendarMethod "getTemplateChild" o = WidgetGetTemplateChildMethodInfo
    ResolveCalendarMethod "getTooltipMarkup" o = WidgetGetTooltipMarkupMethodInfo
    ResolveCalendarMethod "getTooltipText" o = WidgetGetTooltipTextMethodInfo
    ResolveCalendarMethod "getTooltipWindow" o = WidgetGetTooltipWindowMethodInfo
    ResolveCalendarMethod "getToplevel" o = WidgetGetToplevelMethodInfo
    ResolveCalendarMethod "getValign" o = WidgetGetValignMethodInfo
    ResolveCalendarMethod "getValignWithBaseline" o = WidgetGetValignWithBaselineMethodInfo
    ResolveCalendarMethod "getVexpand" o = WidgetGetVexpandMethodInfo
    ResolveCalendarMethod "getVexpandSet" o = WidgetGetVexpandSetMethodInfo
    ResolveCalendarMethod "getVisible" o = WidgetGetVisibleMethodInfo
    ResolveCalendarMethod "getVisual" o = WidgetGetVisualMethodInfo
    ResolveCalendarMethod "getWindow" o = WidgetGetWindowMethodInfo
    ResolveCalendarMethod "setAccelPath" o = WidgetSetAccelPathMethodInfo
    ResolveCalendarMethod "setAllocation" o = WidgetSetAllocationMethodInfo
    ResolveCalendarMethod "setAppPaintable" o = WidgetSetAppPaintableMethodInfo
    ResolveCalendarMethod "setBuildableProperty" o = BuildableSetBuildablePropertyMethodInfo
    ResolveCalendarMethod "setCanDefault" o = WidgetSetCanDefaultMethodInfo
    ResolveCalendarMethod "setCanFocus" o = WidgetSetCanFocusMethodInfo
    ResolveCalendarMethod "setChildVisible" o = WidgetSetChildVisibleMethodInfo
    ResolveCalendarMethod "setClip" o = WidgetSetClipMethodInfo
    ResolveCalendarMethod "setCompositeName" o = WidgetSetCompositeNameMethodInfo
    ResolveCalendarMethod "setData" o = GObject.ObjectSetDataMethodInfo
    ResolveCalendarMethod "setDetailFunc" o = CalendarSetDetailFuncMethodInfo
    ResolveCalendarMethod "setDetailHeightRows" o = CalendarSetDetailHeightRowsMethodInfo
    ResolveCalendarMethod "setDetailWidthChars" o = CalendarSetDetailWidthCharsMethodInfo
    ResolveCalendarMethod "setDeviceEnabled" o = WidgetSetDeviceEnabledMethodInfo
    ResolveCalendarMethod "setDeviceEvents" o = WidgetSetDeviceEventsMethodInfo
    ResolveCalendarMethod "setDirection" o = WidgetSetDirectionMethodInfo
    ResolveCalendarMethod "setDisplayOptions" o = CalendarSetDisplayOptionsMethodInfo
    ResolveCalendarMethod "setDoubleBuffered" o = WidgetSetDoubleBufferedMethodInfo
    ResolveCalendarMethod "setEvents" o = WidgetSetEventsMethodInfo
    ResolveCalendarMethod "setFontMap" o = WidgetSetFontMapMethodInfo
    ResolveCalendarMethod "setFontOptions" o = WidgetSetFontOptionsMethodInfo
    ResolveCalendarMethod "setHalign" o = WidgetSetHalignMethodInfo
    ResolveCalendarMethod "setHasTooltip" o = WidgetSetHasTooltipMethodInfo
    ResolveCalendarMethod "setHasWindow" o = WidgetSetHasWindowMethodInfo
    ResolveCalendarMethod "setHexpand" o = WidgetSetHexpandMethodInfo
    ResolveCalendarMethod "setHexpandSet" o = WidgetSetHexpandSetMethodInfo
    ResolveCalendarMethod "setMapped" o = WidgetSetMappedMethodInfo
    ResolveCalendarMethod "setMarginBottom" o = WidgetSetMarginBottomMethodInfo
    ResolveCalendarMethod "setMarginEnd" o = WidgetSetMarginEndMethodInfo
    ResolveCalendarMethod "setMarginLeft" o = WidgetSetMarginLeftMethodInfo
    ResolveCalendarMethod "setMarginRight" o = WidgetSetMarginRightMethodInfo
    ResolveCalendarMethod "setMarginStart" o = WidgetSetMarginStartMethodInfo
    ResolveCalendarMethod "setMarginTop" o = WidgetSetMarginTopMethodInfo
    ResolveCalendarMethod "setNoShowAll" o = WidgetSetNoShowAllMethodInfo
    ResolveCalendarMethod "setOpacity" o = WidgetSetOpacityMethodInfo
    ResolveCalendarMethod "setParent" o = WidgetSetParentMethodInfo
    ResolveCalendarMethod "setParentWindow" o = WidgetSetParentWindowMethodInfo
    ResolveCalendarMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo
    ResolveCalendarMethod "setRealized" o = WidgetSetRealizedMethodInfo
    ResolveCalendarMethod "setReceivesDefault" o = WidgetSetReceivesDefaultMethodInfo
    ResolveCalendarMethod "setRedrawOnAllocate" o = WidgetSetRedrawOnAllocateMethodInfo
    ResolveCalendarMethod "setSensitive" o = WidgetSetSensitiveMethodInfo
    ResolveCalendarMethod "setSizeRequest" o = WidgetSetSizeRequestMethodInfo
    ResolveCalendarMethod "setState" o = WidgetSetStateMethodInfo
    ResolveCalendarMethod "setStateFlags" o = WidgetSetStateFlagsMethodInfo
    ResolveCalendarMethod "setStyle" o = WidgetSetStyleMethodInfo
    ResolveCalendarMethod "setSupportMultidevice" o = WidgetSetSupportMultideviceMethodInfo
    ResolveCalendarMethod "setTooltipMarkup" o = WidgetSetTooltipMarkupMethodInfo
    ResolveCalendarMethod "setTooltipText" o = WidgetSetTooltipTextMethodInfo
    ResolveCalendarMethod "setTooltipWindow" o = WidgetSetTooltipWindowMethodInfo
    ResolveCalendarMethod "setValign" o = WidgetSetValignMethodInfo
    ResolveCalendarMethod "setVexpand" o = WidgetSetVexpandMethodInfo
    ResolveCalendarMethod "setVexpandSet" o = WidgetSetVexpandSetMethodInfo
    ResolveCalendarMethod "setVisible" o = WidgetSetVisibleMethodInfo
    ResolveCalendarMethod "setVisual" o = WidgetSetVisualMethodInfo
    ResolveCalendarMethod "setWindow" o = WidgetSetWindowMethodInfo
    ResolveCalendarMethod l o = MethodResolutionFailed l o

instance (info ~ ResolveCalendarMethod t Calendar, MethodInfo info Calendar p) => IsLabelProxy t (Calendar -> p) where
    fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)

#if MIN_VERSION_base(4,9,0)
instance (info ~ ResolveCalendarMethod t Calendar, MethodInfo info Calendar p) => IsLabel t (Calendar -> p) where
    fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)
#endif

-- signal Calendar::day-selected
type CalendarDaySelectedCallback =
    IO ()

noCalendarDaySelectedCallback :: Maybe CalendarDaySelectedCallback
noCalendarDaySelectedCallback = Nothing

type CalendarDaySelectedCallbackC =
    Ptr () ->                               -- object
    Ptr () ->                               -- user_data
    IO ()

foreign import ccall "wrapper"
    mkCalendarDaySelectedCallback :: CalendarDaySelectedCallbackC -> IO (FunPtr CalendarDaySelectedCallbackC)

calendarDaySelectedClosure :: CalendarDaySelectedCallback -> IO Closure
calendarDaySelectedClosure cb = newCClosure =<< mkCalendarDaySelectedCallback wrapped
    where wrapped = calendarDaySelectedCallbackWrapper cb

calendarDaySelectedCallbackWrapper ::
    CalendarDaySelectedCallback ->
    Ptr () ->
    Ptr () ->
    IO ()
calendarDaySelectedCallbackWrapper _cb _ _ = do
    _cb 

onCalendarDaySelected :: (GObject a, MonadIO m) => a -> CalendarDaySelectedCallback -> m SignalHandlerId
onCalendarDaySelected obj cb = liftIO $ connectCalendarDaySelected obj cb SignalConnectBefore
afterCalendarDaySelected :: (GObject a, MonadIO m) => a -> CalendarDaySelectedCallback -> m SignalHandlerId
afterCalendarDaySelected obj cb = connectCalendarDaySelected obj cb SignalConnectAfter

connectCalendarDaySelected :: (GObject a, MonadIO m) =>
                              a -> CalendarDaySelectedCallback -> SignalConnectMode -> m SignalHandlerId
connectCalendarDaySelected obj cb after = liftIO $ do
    cb' <- mkCalendarDaySelectedCallback (calendarDaySelectedCallbackWrapper cb)
    connectSignalFunPtr obj "day-selected" cb' after

-- signal Calendar::day-selected-double-click
type CalendarDaySelectedDoubleClickCallback =
    IO ()

noCalendarDaySelectedDoubleClickCallback :: Maybe CalendarDaySelectedDoubleClickCallback
noCalendarDaySelectedDoubleClickCallback = Nothing

type CalendarDaySelectedDoubleClickCallbackC =
    Ptr () ->                               -- object
    Ptr () ->                               -- user_data
    IO ()

foreign import ccall "wrapper"
    mkCalendarDaySelectedDoubleClickCallback :: CalendarDaySelectedDoubleClickCallbackC -> IO (FunPtr CalendarDaySelectedDoubleClickCallbackC)

calendarDaySelectedDoubleClickClosure :: CalendarDaySelectedDoubleClickCallback -> IO Closure
calendarDaySelectedDoubleClickClosure cb = newCClosure =<< mkCalendarDaySelectedDoubleClickCallback wrapped
    where wrapped = calendarDaySelectedDoubleClickCallbackWrapper cb

calendarDaySelectedDoubleClickCallbackWrapper ::
    CalendarDaySelectedDoubleClickCallback ->
    Ptr () ->
    Ptr () ->
    IO ()
calendarDaySelectedDoubleClickCallbackWrapper _cb _ _ = do
    _cb 

onCalendarDaySelectedDoubleClick :: (GObject a, MonadIO m) => a -> CalendarDaySelectedDoubleClickCallback -> m SignalHandlerId
onCalendarDaySelectedDoubleClick obj cb = liftIO $ connectCalendarDaySelectedDoubleClick obj cb SignalConnectBefore
afterCalendarDaySelectedDoubleClick :: (GObject a, MonadIO m) => a -> CalendarDaySelectedDoubleClickCallback -> m SignalHandlerId
afterCalendarDaySelectedDoubleClick obj cb = connectCalendarDaySelectedDoubleClick obj cb SignalConnectAfter

connectCalendarDaySelectedDoubleClick :: (GObject a, MonadIO m) =>
                                         a -> CalendarDaySelectedDoubleClickCallback -> SignalConnectMode -> m SignalHandlerId
connectCalendarDaySelectedDoubleClick obj cb after = liftIO $ do
    cb' <- mkCalendarDaySelectedDoubleClickCallback (calendarDaySelectedDoubleClickCallbackWrapper cb)
    connectSignalFunPtr obj "day-selected-double-click" cb' after

-- signal Calendar::month-changed
type CalendarMonthChangedCallback =
    IO ()

noCalendarMonthChangedCallback :: Maybe CalendarMonthChangedCallback
noCalendarMonthChangedCallback = Nothing

type CalendarMonthChangedCallbackC =
    Ptr () ->                               -- object
    Ptr () ->                               -- user_data
    IO ()

foreign import ccall "wrapper"
    mkCalendarMonthChangedCallback :: CalendarMonthChangedCallbackC -> IO (FunPtr CalendarMonthChangedCallbackC)

calendarMonthChangedClosure :: CalendarMonthChangedCallback -> IO Closure
calendarMonthChangedClosure cb = newCClosure =<< mkCalendarMonthChangedCallback wrapped
    where wrapped = calendarMonthChangedCallbackWrapper cb

calendarMonthChangedCallbackWrapper ::
    CalendarMonthChangedCallback ->
    Ptr () ->
    Ptr () ->
    IO ()
calendarMonthChangedCallbackWrapper _cb _ _ = do
    _cb 

onCalendarMonthChanged :: (GObject a, MonadIO m) => a -> CalendarMonthChangedCallback -> m SignalHandlerId
onCalendarMonthChanged obj cb = liftIO $ connectCalendarMonthChanged obj cb SignalConnectBefore
afterCalendarMonthChanged :: (GObject a, MonadIO m) => a -> CalendarMonthChangedCallback -> m SignalHandlerId
afterCalendarMonthChanged obj cb = connectCalendarMonthChanged obj cb SignalConnectAfter

connectCalendarMonthChanged :: (GObject a, MonadIO m) =>
                               a -> CalendarMonthChangedCallback -> SignalConnectMode -> m SignalHandlerId
connectCalendarMonthChanged obj cb after = liftIO $ do
    cb' <- mkCalendarMonthChangedCallback (calendarMonthChangedCallbackWrapper cb)
    connectSignalFunPtr obj "month-changed" cb' after

-- signal Calendar::next-month
type CalendarNextMonthCallback =
    IO ()

noCalendarNextMonthCallback :: Maybe CalendarNextMonthCallback
noCalendarNextMonthCallback = Nothing

type CalendarNextMonthCallbackC =
    Ptr () ->                               -- object
    Ptr () ->                               -- user_data
    IO ()

foreign import ccall "wrapper"
    mkCalendarNextMonthCallback :: CalendarNextMonthCallbackC -> IO (FunPtr CalendarNextMonthCallbackC)

calendarNextMonthClosure :: CalendarNextMonthCallback -> IO Closure
calendarNextMonthClosure cb = newCClosure =<< mkCalendarNextMonthCallback wrapped
    where wrapped = calendarNextMonthCallbackWrapper cb

calendarNextMonthCallbackWrapper ::
    CalendarNextMonthCallback ->
    Ptr () ->
    Ptr () ->
    IO ()
calendarNextMonthCallbackWrapper _cb _ _ = do
    _cb 

onCalendarNextMonth :: (GObject a, MonadIO m) => a -> CalendarNextMonthCallback -> m SignalHandlerId
onCalendarNextMonth obj cb = liftIO $ connectCalendarNextMonth obj cb SignalConnectBefore
afterCalendarNextMonth :: (GObject a, MonadIO m) => a -> CalendarNextMonthCallback -> m SignalHandlerId
afterCalendarNextMonth obj cb = connectCalendarNextMonth obj cb SignalConnectAfter

connectCalendarNextMonth :: (GObject a, MonadIO m) =>
                            a -> CalendarNextMonthCallback -> SignalConnectMode -> m SignalHandlerId
connectCalendarNextMonth obj cb after = liftIO $ do
    cb' <- mkCalendarNextMonthCallback (calendarNextMonthCallbackWrapper cb)
    connectSignalFunPtr obj "next-month" cb' after

-- signal Calendar::next-year
type CalendarNextYearCallback =
    IO ()

noCalendarNextYearCallback :: Maybe CalendarNextYearCallback
noCalendarNextYearCallback = Nothing

type CalendarNextYearCallbackC =
    Ptr () ->                               -- object
    Ptr () ->                               -- user_data
    IO ()

foreign import ccall "wrapper"
    mkCalendarNextYearCallback :: CalendarNextYearCallbackC -> IO (FunPtr CalendarNextYearCallbackC)

calendarNextYearClosure :: CalendarNextYearCallback -> IO Closure
calendarNextYearClosure cb = newCClosure =<< mkCalendarNextYearCallback wrapped
    where wrapped = calendarNextYearCallbackWrapper cb

calendarNextYearCallbackWrapper ::
    CalendarNextYearCallback ->
    Ptr () ->
    Ptr () ->
    IO ()
calendarNextYearCallbackWrapper _cb _ _ = do
    _cb 

onCalendarNextYear :: (GObject a, MonadIO m) => a -> CalendarNextYearCallback -> m SignalHandlerId
onCalendarNextYear obj cb = liftIO $ connectCalendarNextYear obj cb SignalConnectBefore
afterCalendarNextYear :: (GObject a, MonadIO m) => a -> CalendarNextYearCallback -> m SignalHandlerId
afterCalendarNextYear obj cb = connectCalendarNextYear obj cb SignalConnectAfter

connectCalendarNextYear :: (GObject a, MonadIO m) =>
                           a -> CalendarNextYearCallback -> SignalConnectMode -> m SignalHandlerId
connectCalendarNextYear obj cb after = liftIO $ do
    cb' <- mkCalendarNextYearCallback (calendarNextYearCallbackWrapper cb)
    connectSignalFunPtr obj "next-year" cb' after

-- signal Calendar::prev-month
type CalendarPrevMonthCallback =
    IO ()

noCalendarPrevMonthCallback :: Maybe CalendarPrevMonthCallback
noCalendarPrevMonthCallback = Nothing

type CalendarPrevMonthCallbackC =
    Ptr () ->                               -- object
    Ptr () ->                               -- user_data
    IO ()

foreign import ccall "wrapper"
    mkCalendarPrevMonthCallback :: CalendarPrevMonthCallbackC -> IO (FunPtr CalendarPrevMonthCallbackC)

calendarPrevMonthClosure :: CalendarPrevMonthCallback -> IO Closure
calendarPrevMonthClosure cb = newCClosure =<< mkCalendarPrevMonthCallback wrapped
    where wrapped = calendarPrevMonthCallbackWrapper cb

calendarPrevMonthCallbackWrapper ::
    CalendarPrevMonthCallback ->
    Ptr () ->
    Ptr () ->
    IO ()
calendarPrevMonthCallbackWrapper _cb _ _ = do
    _cb 

onCalendarPrevMonth :: (GObject a, MonadIO m) => a -> CalendarPrevMonthCallback -> m SignalHandlerId
onCalendarPrevMonth obj cb = liftIO $ connectCalendarPrevMonth obj cb SignalConnectBefore
afterCalendarPrevMonth :: (GObject a, MonadIO m) => a -> CalendarPrevMonthCallback -> m SignalHandlerId
afterCalendarPrevMonth obj cb = connectCalendarPrevMonth obj cb SignalConnectAfter

connectCalendarPrevMonth :: (GObject a, MonadIO m) =>
                            a -> CalendarPrevMonthCallback -> SignalConnectMode -> m SignalHandlerId
connectCalendarPrevMonth obj cb after = liftIO $ do
    cb' <- mkCalendarPrevMonthCallback (calendarPrevMonthCallbackWrapper cb)
    connectSignalFunPtr obj "prev-month" cb' after

-- signal Calendar::prev-year
type CalendarPrevYearCallback =
    IO ()

noCalendarPrevYearCallback :: Maybe CalendarPrevYearCallback
noCalendarPrevYearCallback = Nothing

type CalendarPrevYearCallbackC =
    Ptr () ->                               -- object
    Ptr () ->                               -- user_data
    IO ()

foreign import ccall "wrapper"
    mkCalendarPrevYearCallback :: CalendarPrevYearCallbackC -> IO (FunPtr CalendarPrevYearCallbackC)

calendarPrevYearClosure :: CalendarPrevYearCallback -> IO Closure
calendarPrevYearClosure cb = newCClosure =<< mkCalendarPrevYearCallback wrapped
    where wrapped = calendarPrevYearCallbackWrapper cb

calendarPrevYearCallbackWrapper ::
    CalendarPrevYearCallback ->
    Ptr () ->
    Ptr () ->
    IO ()
calendarPrevYearCallbackWrapper _cb _ _ = do
    _cb 

onCalendarPrevYear :: (GObject a, MonadIO m) => a -> CalendarPrevYearCallback -> m SignalHandlerId
onCalendarPrevYear obj cb = liftIO $ connectCalendarPrevYear obj cb SignalConnectBefore
afterCalendarPrevYear :: (GObject a, MonadIO m) => a -> CalendarPrevYearCallback -> m SignalHandlerId
afterCalendarPrevYear obj cb = connectCalendarPrevYear obj cb SignalConnectAfter

connectCalendarPrevYear :: (GObject a, MonadIO m) =>
                           a -> CalendarPrevYearCallback -> SignalConnectMode -> m SignalHandlerId
connectCalendarPrevYear obj cb after = liftIO $ do
    cb' <- mkCalendarPrevYearCallback (calendarPrevYearCallbackWrapper cb)
    connectSignalFunPtr obj "prev-year" cb' after

-- VVV Prop "day"
   -- Type: TBasicType TInt32
   -- Flags: [PropertyReadable,PropertyWritable]

getCalendarDay :: (MonadIO m, CalendarK o) => o -> m Int32
getCalendarDay obj = liftIO $ getObjectPropertyCInt obj "day"

setCalendarDay :: (MonadIO m, CalendarK o) => o -> Int32 -> m ()
setCalendarDay obj val = liftIO $ setObjectPropertyCInt obj "day" val

constructCalendarDay :: Int32 -> IO ([Char], GValue)
constructCalendarDay val = constructObjectPropertyCInt "day" val

data CalendarDayPropertyInfo
instance AttrInfo CalendarDayPropertyInfo where
    type AttrAllowedOps CalendarDayPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint CalendarDayPropertyInfo = (~) Int32
    type AttrBaseTypeConstraint CalendarDayPropertyInfo = CalendarK
    type AttrGetType CalendarDayPropertyInfo = Int32
    type AttrLabel CalendarDayPropertyInfo = "day"
    attrGet _ = getCalendarDay
    attrSet _ = setCalendarDay
    attrConstruct _ = constructCalendarDay

-- VVV Prop "detail-height-rows"
   -- Type: TBasicType TInt32
   -- Flags: [PropertyReadable,PropertyWritable]

getCalendarDetailHeightRows :: (MonadIO m, CalendarK o) => o -> m Int32
getCalendarDetailHeightRows obj = liftIO $ getObjectPropertyCInt obj "detail-height-rows"

setCalendarDetailHeightRows :: (MonadIO m, CalendarK o) => o -> Int32 -> m ()
setCalendarDetailHeightRows obj val = liftIO $ setObjectPropertyCInt obj "detail-height-rows" val

constructCalendarDetailHeightRows :: Int32 -> IO ([Char], GValue)
constructCalendarDetailHeightRows val = constructObjectPropertyCInt "detail-height-rows" val

data CalendarDetailHeightRowsPropertyInfo
instance AttrInfo CalendarDetailHeightRowsPropertyInfo where
    type AttrAllowedOps CalendarDetailHeightRowsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint CalendarDetailHeightRowsPropertyInfo = (~) Int32
    type AttrBaseTypeConstraint CalendarDetailHeightRowsPropertyInfo = CalendarK
    type AttrGetType CalendarDetailHeightRowsPropertyInfo = Int32
    type AttrLabel CalendarDetailHeightRowsPropertyInfo = "detail-height-rows"
    attrGet _ = getCalendarDetailHeightRows
    attrSet _ = setCalendarDetailHeightRows
    attrConstruct _ = constructCalendarDetailHeightRows

-- VVV Prop "detail-width-chars"
   -- Type: TBasicType TInt32
   -- Flags: [PropertyReadable,PropertyWritable]

getCalendarDetailWidthChars :: (MonadIO m, CalendarK o) => o -> m Int32
getCalendarDetailWidthChars obj = liftIO $ getObjectPropertyCInt obj "detail-width-chars"

setCalendarDetailWidthChars :: (MonadIO m, CalendarK o) => o -> Int32 -> m ()
setCalendarDetailWidthChars obj val = liftIO $ setObjectPropertyCInt obj "detail-width-chars" val

constructCalendarDetailWidthChars :: Int32 -> IO ([Char], GValue)
constructCalendarDetailWidthChars val = constructObjectPropertyCInt "detail-width-chars" val

data CalendarDetailWidthCharsPropertyInfo
instance AttrInfo CalendarDetailWidthCharsPropertyInfo where
    type AttrAllowedOps CalendarDetailWidthCharsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint CalendarDetailWidthCharsPropertyInfo = (~) Int32
    type AttrBaseTypeConstraint CalendarDetailWidthCharsPropertyInfo = CalendarK
    type AttrGetType CalendarDetailWidthCharsPropertyInfo = Int32
    type AttrLabel CalendarDetailWidthCharsPropertyInfo = "detail-width-chars"
    attrGet _ = getCalendarDetailWidthChars
    attrSet _ = setCalendarDetailWidthChars
    attrConstruct _ = constructCalendarDetailWidthChars

-- VVV Prop "month"
   -- Type: TBasicType TInt32
   -- Flags: [PropertyReadable,PropertyWritable]

getCalendarMonth :: (MonadIO m, CalendarK o) => o -> m Int32
getCalendarMonth obj = liftIO $ getObjectPropertyCInt obj "month"

setCalendarMonth :: (MonadIO m, CalendarK o) => o -> Int32 -> m ()
setCalendarMonth obj val = liftIO $ setObjectPropertyCInt obj "month" val

constructCalendarMonth :: Int32 -> IO ([Char], GValue)
constructCalendarMonth val = constructObjectPropertyCInt "month" val

data CalendarMonthPropertyInfo
instance AttrInfo CalendarMonthPropertyInfo where
    type AttrAllowedOps CalendarMonthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint CalendarMonthPropertyInfo = (~) Int32
    type AttrBaseTypeConstraint CalendarMonthPropertyInfo = CalendarK
    type AttrGetType CalendarMonthPropertyInfo = Int32
    type AttrLabel CalendarMonthPropertyInfo = "month"
    attrGet _ = getCalendarMonth
    attrSet _ = setCalendarMonth
    attrConstruct _ = constructCalendarMonth

-- VVV Prop "no-month-change"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable]

getCalendarNoMonthChange :: (MonadIO m, CalendarK o) => o -> m Bool
getCalendarNoMonthChange obj = liftIO $ getObjectPropertyBool obj "no-month-change"

setCalendarNoMonthChange :: (MonadIO m, CalendarK o) => o -> Bool -> m ()
setCalendarNoMonthChange obj val = liftIO $ setObjectPropertyBool obj "no-month-change" val

constructCalendarNoMonthChange :: Bool -> IO ([Char], GValue)
constructCalendarNoMonthChange val = constructObjectPropertyBool "no-month-change" val

data CalendarNoMonthChangePropertyInfo
instance AttrInfo CalendarNoMonthChangePropertyInfo where
    type AttrAllowedOps CalendarNoMonthChangePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint CalendarNoMonthChangePropertyInfo = (~) Bool
    type AttrBaseTypeConstraint CalendarNoMonthChangePropertyInfo = CalendarK
    type AttrGetType CalendarNoMonthChangePropertyInfo = Bool
    type AttrLabel CalendarNoMonthChangePropertyInfo = "no-month-change"
    attrGet _ = getCalendarNoMonthChange
    attrSet _ = setCalendarNoMonthChange
    attrConstruct _ = constructCalendarNoMonthChange

-- VVV Prop "show-day-names"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable]

getCalendarShowDayNames :: (MonadIO m, CalendarK o) => o -> m Bool
getCalendarShowDayNames obj = liftIO $ getObjectPropertyBool obj "show-day-names"

setCalendarShowDayNames :: (MonadIO m, CalendarK o) => o -> Bool -> m ()
setCalendarShowDayNames obj val = liftIO $ setObjectPropertyBool obj "show-day-names" val

constructCalendarShowDayNames :: Bool -> IO ([Char], GValue)
constructCalendarShowDayNames val = constructObjectPropertyBool "show-day-names" val

data CalendarShowDayNamesPropertyInfo
instance AttrInfo CalendarShowDayNamesPropertyInfo where
    type AttrAllowedOps CalendarShowDayNamesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint CalendarShowDayNamesPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint CalendarShowDayNamesPropertyInfo = CalendarK
    type AttrGetType CalendarShowDayNamesPropertyInfo = Bool
    type AttrLabel CalendarShowDayNamesPropertyInfo = "show-day-names"
    attrGet _ = getCalendarShowDayNames
    attrSet _ = setCalendarShowDayNames
    attrConstruct _ = constructCalendarShowDayNames

-- VVV Prop "show-details"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable]

getCalendarShowDetails :: (MonadIO m, CalendarK o) => o -> m Bool
getCalendarShowDetails obj = liftIO $ getObjectPropertyBool obj "show-details"

setCalendarShowDetails :: (MonadIO m, CalendarK o) => o -> Bool -> m ()
setCalendarShowDetails obj val = liftIO $ setObjectPropertyBool obj "show-details" val

constructCalendarShowDetails :: Bool -> IO ([Char], GValue)
constructCalendarShowDetails val = constructObjectPropertyBool "show-details" val

data CalendarShowDetailsPropertyInfo
instance AttrInfo CalendarShowDetailsPropertyInfo where
    type AttrAllowedOps CalendarShowDetailsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint CalendarShowDetailsPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint CalendarShowDetailsPropertyInfo = CalendarK
    type AttrGetType CalendarShowDetailsPropertyInfo = Bool
    type AttrLabel CalendarShowDetailsPropertyInfo = "show-details"
    attrGet _ = getCalendarShowDetails
    attrSet _ = setCalendarShowDetails
    attrConstruct _ = constructCalendarShowDetails

-- VVV Prop "show-heading"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable]

getCalendarShowHeading :: (MonadIO m, CalendarK o) => o -> m Bool
getCalendarShowHeading obj = liftIO $ getObjectPropertyBool obj "show-heading"

setCalendarShowHeading :: (MonadIO m, CalendarK o) => o -> Bool -> m ()
setCalendarShowHeading obj val = liftIO $ setObjectPropertyBool obj "show-heading" val

constructCalendarShowHeading :: Bool -> IO ([Char], GValue)
constructCalendarShowHeading val = constructObjectPropertyBool "show-heading" val

data CalendarShowHeadingPropertyInfo
instance AttrInfo CalendarShowHeadingPropertyInfo where
    type AttrAllowedOps CalendarShowHeadingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint CalendarShowHeadingPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint CalendarShowHeadingPropertyInfo = CalendarK
    type AttrGetType CalendarShowHeadingPropertyInfo = Bool
    type AttrLabel CalendarShowHeadingPropertyInfo = "show-heading"
    attrGet _ = getCalendarShowHeading
    attrSet _ = setCalendarShowHeading
    attrConstruct _ = constructCalendarShowHeading

-- VVV Prop "show-week-numbers"
   -- Type: TBasicType TBoolean
   -- Flags: [PropertyReadable,PropertyWritable]

getCalendarShowWeekNumbers :: (MonadIO m, CalendarK o) => o -> m Bool
getCalendarShowWeekNumbers obj = liftIO $ getObjectPropertyBool obj "show-week-numbers"

setCalendarShowWeekNumbers :: (MonadIO m, CalendarK o) => o -> Bool -> m ()
setCalendarShowWeekNumbers obj val = liftIO $ setObjectPropertyBool obj "show-week-numbers" val

constructCalendarShowWeekNumbers :: Bool -> IO ([Char], GValue)
constructCalendarShowWeekNumbers val = constructObjectPropertyBool "show-week-numbers" val

data CalendarShowWeekNumbersPropertyInfo
instance AttrInfo CalendarShowWeekNumbersPropertyInfo where
    type AttrAllowedOps CalendarShowWeekNumbersPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint CalendarShowWeekNumbersPropertyInfo = (~) Bool
    type AttrBaseTypeConstraint CalendarShowWeekNumbersPropertyInfo = CalendarK
    type AttrGetType CalendarShowWeekNumbersPropertyInfo = Bool
    type AttrLabel CalendarShowWeekNumbersPropertyInfo = "show-week-numbers"
    attrGet _ = getCalendarShowWeekNumbers
    attrSet _ = setCalendarShowWeekNumbers
    attrConstruct _ = constructCalendarShowWeekNumbers

-- VVV Prop "year"
   -- Type: TBasicType TInt32
   -- Flags: [PropertyReadable,PropertyWritable]

getCalendarYear :: (MonadIO m, CalendarK o) => o -> m Int32
getCalendarYear obj = liftIO $ getObjectPropertyCInt obj "year"

setCalendarYear :: (MonadIO m, CalendarK o) => o -> Int32 -> m ()
setCalendarYear obj val = liftIO $ setObjectPropertyCInt obj "year" val

constructCalendarYear :: Int32 -> IO ([Char], GValue)
constructCalendarYear val = constructObjectPropertyCInt "year" val

data CalendarYearPropertyInfo
instance AttrInfo CalendarYearPropertyInfo where
    type AttrAllowedOps CalendarYearPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrSetTypeConstraint CalendarYearPropertyInfo = (~) Int32
    type AttrBaseTypeConstraint CalendarYearPropertyInfo = CalendarK
    type AttrGetType CalendarYearPropertyInfo = Int32
    type AttrLabel CalendarYearPropertyInfo = "year"
    attrGet _ = getCalendarYear
    attrSet _ = setCalendarYear
    attrConstruct _ = constructCalendarYear

type instance AttributeList Calendar = CalendarAttributeList
type CalendarAttributeList = ('[ '("appPaintable", WidgetAppPaintablePropertyInfo), '("canDefault", WidgetCanDefaultPropertyInfo), '("canFocus", WidgetCanFocusPropertyInfo), '("compositeChild", WidgetCompositeChildPropertyInfo), '("day", CalendarDayPropertyInfo), '("detailHeightRows", CalendarDetailHeightRowsPropertyInfo), '("detailWidthChars", CalendarDetailWidthCharsPropertyInfo), '("doubleBuffered", WidgetDoubleBufferedPropertyInfo), '("events", WidgetEventsPropertyInfo), '("expand", WidgetExpandPropertyInfo), '("halign", WidgetHalignPropertyInfo), '("hasDefault", WidgetHasDefaultPropertyInfo), '("hasFocus", WidgetHasFocusPropertyInfo), '("hasTooltip", WidgetHasTooltipPropertyInfo), '("heightRequest", WidgetHeightRequestPropertyInfo), '("hexpand", WidgetHexpandPropertyInfo), '("hexpandSet", WidgetHexpandSetPropertyInfo), '("isFocus", WidgetIsFocusPropertyInfo), '("margin", WidgetMarginPropertyInfo), '("marginBottom", WidgetMarginBottomPropertyInfo), '("marginEnd", WidgetMarginEndPropertyInfo), '("marginLeft", WidgetMarginLeftPropertyInfo), '("marginRight", WidgetMarginRightPropertyInfo), '("marginStart", WidgetMarginStartPropertyInfo), '("marginTop", WidgetMarginTopPropertyInfo), '("month", CalendarMonthPropertyInfo), '("name", WidgetNamePropertyInfo), '("noMonthChange", CalendarNoMonthChangePropertyInfo), '("noShowAll", WidgetNoShowAllPropertyInfo), '("opacity", WidgetOpacityPropertyInfo), '("parent", WidgetParentPropertyInfo), '("receivesDefault", WidgetReceivesDefaultPropertyInfo), '("scaleFactor", WidgetScaleFactorPropertyInfo), '("sensitive", WidgetSensitivePropertyInfo), '("showDayNames", CalendarShowDayNamesPropertyInfo), '("showDetails", CalendarShowDetailsPropertyInfo), '("showHeading", CalendarShowHeadingPropertyInfo), '("showWeekNumbers", CalendarShowWeekNumbersPropertyInfo), '("style", WidgetStylePropertyInfo), '("tooltipMarkup", WidgetTooltipMarkupPropertyInfo), '("tooltipText", WidgetTooltipTextPropertyInfo), '("valign", WidgetValignPropertyInfo), '("vexpand", WidgetVexpandPropertyInfo), '("vexpandSet", WidgetVexpandSetPropertyInfo), '("visible", WidgetVisiblePropertyInfo), '("widthRequest", WidgetWidthRequestPropertyInfo), '("window", WidgetWindowPropertyInfo), '("year", CalendarYearPropertyInfo)] :: [(Symbol, *)])

data CalendarDaySelectedSignalInfo
instance SignalInfo CalendarDaySelectedSignalInfo where
    type HaskellCallbackType CalendarDaySelectedSignalInfo = CalendarDaySelectedCallback
    connectSignal _ = connectCalendarDaySelected

data CalendarDaySelectedDoubleClickSignalInfo
instance SignalInfo CalendarDaySelectedDoubleClickSignalInfo where
    type HaskellCallbackType CalendarDaySelectedDoubleClickSignalInfo = CalendarDaySelectedDoubleClickCallback
    connectSignal _ = connectCalendarDaySelectedDoubleClick

data CalendarMonthChangedSignalInfo
instance SignalInfo CalendarMonthChangedSignalInfo where
    type HaskellCallbackType CalendarMonthChangedSignalInfo = CalendarMonthChangedCallback
    connectSignal _ = connectCalendarMonthChanged

data CalendarNextMonthSignalInfo
instance SignalInfo CalendarNextMonthSignalInfo where
    type HaskellCallbackType CalendarNextMonthSignalInfo = CalendarNextMonthCallback
    connectSignal _ = connectCalendarNextMonth

data CalendarNextYearSignalInfo
instance SignalInfo CalendarNextYearSignalInfo where
    type HaskellCallbackType CalendarNextYearSignalInfo = CalendarNextYearCallback
    connectSignal _ = connectCalendarNextYear

data CalendarPrevMonthSignalInfo
instance SignalInfo CalendarPrevMonthSignalInfo where
    type HaskellCallbackType CalendarPrevMonthSignalInfo = CalendarPrevMonthCallback
    connectSignal _ = connectCalendarPrevMonth

data CalendarPrevYearSignalInfo
instance SignalInfo CalendarPrevYearSignalInfo where
    type HaskellCallbackType CalendarPrevYearSignalInfo = CalendarPrevYearCallback
    connectSignal _ = connectCalendarPrevYear

type instance SignalList Calendar = CalendarSignalList
type CalendarSignalList = ('[ '("accelClosuresChanged", WidgetAccelClosuresChangedSignalInfo), '("buttonPressEvent", WidgetButtonPressEventSignalInfo), '("buttonReleaseEvent", WidgetButtonReleaseEventSignalInfo), '("canActivateAccel", WidgetCanActivateAccelSignalInfo), '("childNotify", WidgetChildNotifySignalInfo), '("compositedChanged", WidgetCompositedChangedSignalInfo), '("configureEvent", WidgetConfigureEventSignalInfo), '("damageEvent", WidgetDamageEventSignalInfo), '("daySelected", CalendarDaySelectedSignalInfo), '("daySelectedDoubleClick", CalendarDaySelectedDoubleClickSignalInfo), '("deleteEvent", WidgetDeleteEventSignalInfo), '("destroy", WidgetDestroySignalInfo), '("destroyEvent", WidgetDestroyEventSignalInfo), '("directionChanged", WidgetDirectionChangedSignalInfo), '("dragBegin", WidgetDragBeginSignalInfo), '("dragDataDelete", WidgetDragDataDeleteSignalInfo), '("dragDataGet", WidgetDragDataGetSignalInfo), '("dragDataReceived", WidgetDragDataReceivedSignalInfo), '("dragDrop", WidgetDragDropSignalInfo), '("dragEnd", WidgetDragEndSignalInfo), '("dragFailed", WidgetDragFailedSignalInfo), '("dragLeave", WidgetDragLeaveSignalInfo), '("dragMotion", WidgetDragMotionSignalInfo), '("draw", WidgetDrawSignalInfo), '("enterNotifyEvent", WidgetEnterNotifyEventSignalInfo), '("event", WidgetEventSignalInfo), '("eventAfter", WidgetEventAfterSignalInfo), '("focus", WidgetFocusSignalInfo), '("focusInEvent", WidgetFocusInEventSignalInfo), '("focusOutEvent", WidgetFocusOutEventSignalInfo), '("grabBrokenEvent", WidgetGrabBrokenEventSignalInfo), '("grabFocus", WidgetGrabFocusSignalInfo), '("grabNotify", WidgetGrabNotifySignalInfo), '("hide", WidgetHideSignalInfo), '("hierarchyChanged", WidgetHierarchyChangedSignalInfo), '("keyPressEvent", WidgetKeyPressEventSignalInfo), '("keyReleaseEvent", WidgetKeyReleaseEventSignalInfo), '("keynavFailed", WidgetKeynavFailedSignalInfo), '("leaveNotifyEvent", WidgetLeaveNotifyEventSignalInfo), '("map", WidgetMapSignalInfo), '("mapEvent", WidgetMapEventSignalInfo), '("mnemonicActivate", WidgetMnemonicActivateSignalInfo), '("monthChanged", CalendarMonthChangedSignalInfo), '("motionNotifyEvent", WidgetMotionNotifyEventSignalInfo), '("moveFocus", WidgetMoveFocusSignalInfo), '("nextMonth", CalendarNextMonthSignalInfo), '("nextYear", CalendarNextYearSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("parentSet", WidgetParentSetSignalInfo), '("popupMenu", WidgetPopupMenuSignalInfo), '("prevMonth", CalendarPrevMonthSignalInfo), '("prevYear", CalendarPrevYearSignalInfo), '("propertyNotifyEvent", WidgetPropertyNotifyEventSignalInfo), '("proximityInEvent", WidgetProximityInEventSignalInfo), '("proximityOutEvent", WidgetProximityOutEventSignalInfo), '("queryTooltip", WidgetQueryTooltipSignalInfo), '("realize", WidgetRealizeSignalInfo), '("screenChanged", WidgetScreenChangedSignalInfo), '("scrollEvent", WidgetScrollEventSignalInfo), '("selectionClearEvent", WidgetSelectionClearEventSignalInfo), '("selectionGet", WidgetSelectionGetSignalInfo), '("selectionNotifyEvent", WidgetSelectionNotifyEventSignalInfo), '("selectionReceived", WidgetSelectionReceivedSignalInfo), '("selectionRequestEvent", WidgetSelectionRequestEventSignalInfo), '("show", WidgetShowSignalInfo), '("showHelp", WidgetShowHelpSignalInfo), '("sizeAllocate", WidgetSizeAllocateSignalInfo), '("stateChanged", WidgetStateChangedSignalInfo), '("stateFlagsChanged", WidgetStateFlagsChangedSignalInfo), '("styleSet", WidgetStyleSetSignalInfo), '("styleUpdated", WidgetStyleUpdatedSignalInfo), '("touchEvent", WidgetTouchEventSignalInfo), '("unmap", WidgetUnmapSignalInfo), '("unmapEvent", WidgetUnmapEventSignalInfo), '("unrealize", WidgetUnrealizeSignalInfo), '("visibilityNotifyEvent", WidgetVisibilityNotifyEventSignalInfo), '("windowStateEvent", WidgetWindowStateEventSignalInfo)] :: [(Symbol, *)])

-- method Calendar::new
-- method type : Constructor
-- Args : []
-- Lengths : []
-- returnType : TInterface "Gtk" "Calendar"
-- throws : False
-- Skip return : False

foreign import ccall "gtk_calendar_new" gtk_calendar_new :: 
    IO (Ptr Calendar)


calendarNew ::
    (MonadIO m) =>
    m Calendar                              -- result
calendarNew  = liftIO $ do
    result <- gtk_calendar_new
    checkUnexpectedReturnNULL "gtk_calendar_new" result
    result' <- (newObject Calendar) result
    return result'

-- method Calendar::clear_marks
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "Gtk" "Calendar", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False

foreign import ccall "gtk_calendar_clear_marks" gtk_calendar_clear_marks :: 
    Ptr Calendar ->                         -- _obj : TInterface "Gtk" "Calendar"
    IO ()


calendarClearMarks ::
    (MonadIO m, CalendarK a) =>
    a                                       -- _obj
    -> m ()                                 -- result
calendarClearMarks _obj = liftIO $ do
    let _obj' = unsafeManagedPtrCastPtr _obj
    gtk_calendar_clear_marks _obj'
    touchManagedPtr _obj
    return ()

data CalendarClearMarksMethodInfo
instance (signature ~ (m ()), MonadIO m, CalendarK a) => MethodInfo CalendarClearMarksMethodInfo a signature where
    overloadedMethod _ = calendarClearMarks

-- method Calendar::get_date
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "Gtk" "Calendar", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "year", argType = TBasicType TUInt32, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything},Arg {argCName = "month", argType = TBasicType TUInt32, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything},Arg {argCName = "day", argType = TBasicType TUInt32, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything}]
-- Lengths : []
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False

foreign import ccall "gtk_calendar_get_date" gtk_calendar_get_date :: 
    Ptr Calendar ->                         -- _obj : TInterface "Gtk" "Calendar"
    Ptr Word32 ->                           -- year : TBasicType TUInt32
    Ptr Word32 ->                           -- month : TBasicType TUInt32
    Ptr Word32 ->                           -- day : TBasicType TUInt32
    IO ()


calendarGetDate ::
    (MonadIO m, CalendarK a) =>
    a                                       -- _obj
    -> m (Word32,Word32,Word32)             -- result
calendarGetDate _obj = liftIO $ do
    let _obj' = unsafeManagedPtrCastPtr _obj
    year <- allocMem :: IO (Ptr Word32)
    month <- allocMem :: IO (Ptr Word32)
    day <- allocMem :: IO (Ptr Word32)
    gtk_calendar_get_date _obj' year month day
    year' <- peek year
    month' <- peek month
    day' <- peek day
    touchManagedPtr _obj
    freeMem year
    freeMem month
    freeMem day
    return (year', month', day')

data CalendarGetDateMethodInfo
instance (signature ~ (m (Word32,Word32,Word32)), MonadIO m, CalendarK a) => MethodInfo CalendarGetDateMethodInfo a signature where
    overloadedMethod _ = calendarGetDate

-- method Calendar::get_day_is_marked
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "Gtk" "Calendar", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "day", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TBoolean
-- throws : False
-- Skip return : False

foreign import ccall "gtk_calendar_get_day_is_marked" gtk_calendar_get_day_is_marked :: 
    Ptr Calendar ->                         -- _obj : TInterface "Gtk" "Calendar"
    Word32 ->                               -- day : TBasicType TUInt32
    IO CInt


calendarGetDayIsMarked ::
    (MonadIO m, CalendarK a) =>
    a                                       -- _obj
    -> Word32                               -- day
    -> m Bool                               -- result
calendarGetDayIsMarked _obj day = liftIO $ do
    let _obj' = unsafeManagedPtrCastPtr _obj
    result <- gtk_calendar_get_day_is_marked _obj' day
    let result' = (/= 0) result
    touchManagedPtr _obj
    return result'

data CalendarGetDayIsMarkedMethodInfo
instance (signature ~ (Word32 -> m Bool), MonadIO m, CalendarK a) => MethodInfo CalendarGetDayIsMarkedMethodInfo a signature where
    overloadedMethod _ = calendarGetDayIsMarked

-- method Calendar::get_detail_height_rows
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "Gtk" "Calendar", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TInt32
-- throws : False
-- Skip return : False

foreign import ccall "gtk_calendar_get_detail_height_rows" gtk_calendar_get_detail_height_rows :: 
    Ptr Calendar ->                         -- _obj : TInterface "Gtk" "Calendar"
    IO Int32


calendarGetDetailHeightRows ::
    (MonadIO m, CalendarK a) =>
    a                                       -- _obj
    -> m Int32                              -- result
calendarGetDetailHeightRows _obj = liftIO $ do
    let _obj' = unsafeManagedPtrCastPtr _obj
    result <- gtk_calendar_get_detail_height_rows _obj'
    touchManagedPtr _obj
    return result

data CalendarGetDetailHeightRowsMethodInfo
instance (signature ~ (m Int32), MonadIO m, CalendarK a) => MethodInfo CalendarGetDetailHeightRowsMethodInfo a signature where
    overloadedMethod _ = calendarGetDetailHeightRows

-- method Calendar::get_detail_width_chars
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "Gtk" "Calendar", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TInt32
-- throws : False
-- Skip return : False

foreign import ccall "gtk_calendar_get_detail_width_chars" gtk_calendar_get_detail_width_chars :: 
    Ptr Calendar ->                         -- _obj : TInterface "Gtk" "Calendar"
    IO Int32


calendarGetDetailWidthChars ::
    (MonadIO m, CalendarK a) =>
    a                                       -- _obj
    -> m Int32                              -- result
calendarGetDetailWidthChars _obj = liftIO $ do
    let _obj' = unsafeManagedPtrCastPtr _obj
    result <- gtk_calendar_get_detail_width_chars _obj'
    touchManagedPtr _obj
    return result

data CalendarGetDetailWidthCharsMethodInfo
instance (signature ~ (m Int32), MonadIO m, CalendarK a) => MethodInfo CalendarGetDetailWidthCharsMethodInfo a signature where
    overloadedMethod _ = calendarGetDetailWidthChars

-- method Calendar::get_display_options
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "Gtk" "Calendar", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TInterface "Gtk" "CalendarDisplayOptions"
-- throws : False
-- Skip return : False

foreign import ccall "gtk_calendar_get_display_options" gtk_calendar_get_display_options :: 
    Ptr Calendar ->                         -- _obj : TInterface "Gtk" "Calendar"
    IO CUInt


calendarGetDisplayOptions ::
    (MonadIO m, CalendarK a) =>
    a                                       -- _obj
    -> m [CalendarDisplayOptions]           -- result
calendarGetDisplayOptions _obj = liftIO $ do
    let _obj' = unsafeManagedPtrCastPtr _obj
    result <- gtk_calendar_get_display_options _obj'
    let result' = wordToGFlags result
    touchManagedPtr _obj
    return result'

data CalendarGetDisplayOptionsMethodInfo
instance (signature ~ (m [CalendarDisplayOptions]), MonadIO m, CalendarK a) => MethodInfo CalendarGetDisplayOptionsMethodInfo a signature where
    overloadedMethod _ = calendarGetDisplayOptions

-- method Calendar::mark_day
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "Gtk" "Calendar", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "day", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False

foreign import ccall "gtk_calendar_mark_day" gtk_calendar_mark_day :: 
    Ptr Calendar ->                         -- _obj : TInterface "Gtk" "Calendar"
    Word32 ->                               -- day : TBasicType TUInt32
    IO ()


calendarMarkDay ::
    (MonadIO m, CalendarK a) =>
    a                                       -- _obj
    -> Word32                               -- day
    -> m ()                                 -- result
calendarMarkDay _obj day = liftIO $ do
    let _obj' = unsafeManagedPtrCastPtr _obj
    gtk_calendar_mark_day _obj' day
    touchManagedPtr _obj
    return ()

data CalendarMarkDayMethodInfo
instance (signature ~ (Word32 -> m ()), MonadIO m, CalendarK a) => MethodInfo CalendarMarkDayMethodInfo a signature where
    overloadedMethod _ = calendarMarkDay

-- method Calendar::select_day
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "Gtk" "Calendar", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "day", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False

foreign import ccall "gtk_calendar_select_day" gtk_calendar_select_day :: 
    Ptr Calendar ->                         -- _obj : TInterface "Gtk" "Calendar"
    Word32 ->                               -- day : TBasicType TUInt32
    IO ()


calendarSelectDay ::
    (MonadIO m, CalendarK a) =>
    a                                       -- _obj
    -> Word32                               -- day
    -> m ()                                 -- result
calendarSelectDay _obj day = liftIO $ do
    let _obj' = unsafeManagedPtrCastPtr _obj
    gtk_calendar_select_day _obj' day
    touchManagedPtr _obj
    return ()

data CalendarSelectDayMethodInfo
instance (signature ~ (Word32 -> m ()), MonadIO m, CalendarK a) => MethodInfo CalendarSelectDayMethodInfo a signature where
    overloadedMethod _ = calendarSelectDay

-- method Calendar::select_month
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "Gtk" "Calendar", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "month", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "year", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False

foreign import ccall "gtk_calendar_select_month" gtk_calendar_select_month :: 
    Ptr Calendar ->                         -- _obj : TInterface "Gtk" "Calendar"
    Word32 ->                               -- month : TBasicType TUInt32
    Word32 ->                               -- year : TBasicType TUInt32
    IO ()


calendarSelectMonth ::
    (MonadIO m, CalendarK a) =>
    a                                       -- _obj
    -> Word32                               -- month
    -> Word32                               -- year
    -> m ()                                 -- result
calendarSelectMonth _obj month year = liftIO $ do
    let _obj' = unsafeManagedPtrCastPtr _obj
    gtk_calendar_select_month _obj' month year
    touchManagedPtr _obj
    return ()

data CalendarSelectMonthMethodInfo
instance (signature ~ (Word32 -> Word32 -> m ()), MonadIO m, CalendarK a) => MethodInfo CalendarSelectMonthMethodInfo a signature where
    overloadedMethod _ = calendarSelectMonth

-- method Calendar::set_detail_func
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "Gtk" "Calendar", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "func", argType = TInterface "Gtk" "CalendarDetailFunc", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeNotified, argClosure = 2, argDestroy = 3, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "data", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "destroy", argType = TInterface "GLib" "DestroyNotify", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeAsync, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False

foreign import ccall "gtk_calendar_set_detail_func" gtk_calendar_set_detail_func :: 
    Ptr Calendar ->                         -- _obj : TInterface "Gtk" "Calendar"
    FunPtr CalendarDetailFuncC ->           -- func : TInterface "Gtk" "CalendarDetailFunc"
    Ptr () ->                               -- data : TBasicType TVoid
    FunPtr GLib.DestroyNotifyC ->           -- destroy : TInterface "GLib" "DestroyNotify"
    IO ()


calendarSetDetailFunc ::
    (MonadIO m, CalendarK a) =>
    a                                       -- _obj
    -> CalendarDetailFunc                   -- func
    -> m ()                                 -- result
calendarSetDetailFunc _obj func = liftIO $ do
    let _obj' = unsafeManagedPtrCastPtr _obj
    func' <- mkCalendarDetailFunc (calendarDetailFuncWrapper Nothing func)
    let data_ = castFunPtrToPtr func'
    let destroy = safeFreeFunPtrPtr
    gtk_calendar_set_detail_func _obj' func' data_ destroy
    touchManagedPtr _obj
    return ()

data CalendarSetDetailFuncMethodInfo
instance (signature ~ (CalendarDetailFunc -> m ()), MonadIO m, CalendarK a) => MethodInfo CalendarSetDetailFuncMethodInfo a signature where
    overloadedMethod _ = calendarSetDetailFunc

-- method Calendar::set_detail_height_rows
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "Gtk" "Calendar", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "rows", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False

foreign import ccall "gtk_calendar_set_detail_height_rows" gtk_calendar_set_detail_height_rows :: 
    Ptr Calendar ->                         -- _obj : TInterface "Gtk" "Calendar"
    Int32 ->                                -- rows : TBasicType TInt32
    IO ()


calendarSetDetailHeightRows ::
    (MonadIO m, CalendarK a) =>
    a                                       -- _obj
    -> Int32                                -- rows
    -> m ()                                 -- result
calendarSetDetailHeightRows _obj rows = liftIO $ do
    let _obj' = unsafeManagedPtrCastPtr _obj
    gtk_calendar_set_detail_height_rows _obj' rows
    touchManagedPtr _obj
    return ()

data CalendarSetDetailHeightRowsMethodInfo
instance (signature ~ (Int32 -> m ()), MonadIO m, CalendarK a) => MethodInfo CalendarSetDetailHeightRowsMethodInfo a signature where
    overloadedMethod _ = calendarSetDetailHeightRows

-- method Calendar::set_detail_width_chars
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "Gtk" "Calendar", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "chars", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False

foreign import ccall "gtk_calendar_set_detail_width_chars" gtk_calendar_set_detail_width_chars :: 
    Ptr Calendar ->                         -- _obj : TInterface "Gtk" "Calendar"
    Int32 ->                                -- chars : TBasicType TInt32
    IO ()


calendarSetDetailWidthChars ::
    (MonadIO m, CalendarK a) =>
    a                                       -- _obj
    -> Int32                                -- chars
    -> m ()                                 -- result
calendarSetDetailWidthChars _obj chars = liftIO $ do
    let _obj' = unsafeManagedPtrCastPtr _obj
    gtk_calendar_set_detail_width_chars _obj' chars
    touchManagedPtr _obj
    return ()

data CalendarSetDetailWidthCharsMethodInfo
instance (signature ~ (Int32 -> m ()), MonadIO m, CalendarK a) => MethodInfo CalendarSetDetailWidthCharsMethodInfo a signature where
    overloadedMethod _ = calendarSetDetailWidthChars

-- method Calendar::set_display_options
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "Gtk" "Calendar", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "flags", argType = TInterface "Gtk" "CalendarDisplayOptions", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False

foreign import ccall "gtk_calendar_set_display_options" gtk_calendar_set_display_options :: 
    Ptr Calendar ->                         -- _obj : TInterface "Gtk" "Calendar"
    CUInt ->                                -- flags : TInterface "Gtk" "CalendarDisplayOptions"
    IO ()


calendarSetDisplayOptions ::
    (MonadIO m, CalendarK a) =>
    a                                       -- _obj
    -> [CalendarDisplayOptions]             -- flags
    -> m ()                                 -- result
calendarSetDisplayOptions _obj flags = liftIO $ do
    let _obj' = unsafeManagedPtrCastPtr _obj
    let flags' = gflagsToWord flags
    gtk_calendar_set_display_options _obj' flags'
    touchManagedPtr _obj
    return ()

data CalendarSetDisplayOptionsMethodInfo
instance (signature ~ ([CalendarDisplayOptions] -> m ()), MonadIO m, CalendarK a) => MethodInfo CalendarSetDisplayOptionsMethodInfo a signature where
    overloadedMethod _ = calendarSetDisplayOptions

-- method Calendar::unmark_day
-- method type : OrdinaryMethod
-- Args : [Arg {argCName = "_obj", argType = TInterface "Gtk" "Calendar", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "day", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]
-- Lengths : []
-- returnType : TBasicType TVoid
-- throws : False
-- Skip return : False

foreign import ccall "gtk_calendar_unmark_day" gtk_calendar_unmark_day :: 
    Ptr Calendar ->                         -- _obj : TInterface "Gtk" "Calendar"
    Word32 ->                               -- day : TBasicType TUInt32
    IO ()


calendarUnmarkDay ::
    (MonadIO m, CalendarK a) =>
    a                                       -- _obj
    -> Word32                               -- day
    -> m ()                                 -- result
calendarUnmarkDay _obj day = liftIO $ do
    let _obj' = unsafeManagedPtrCastPtr _obj
    gtk_calendar_unmark_day _obj' day
    touchManagedPtr _obj
    return ()

data CalendarUnmarkDayMethodInfo
instance (signature ~ (Word32 -> m ()), MonadIO m, CalendarK a) => MethodInfo CalendarUnmarkDayMethodInfo a signature where
    overloadedMethod _ = calendarUnmarkDay