{- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 Maintainer : Iñaki García Etxebarria (inaki@blueleaf.cc) -} #define ENABLE_OVERLOADING (MIN_VERSION_haskell_gi_overloading(1,0,0) \ && !defined(__HADDOCK_VERSION__)) module GI.Gdk.Enums ( -- * Enumerations -- ** AxisUse #enum:AxisUse# AxisUse(..) , -- ** ByteOrder #enum:ByteOrder# ByteOrder(..) , -- ** CrossingMode #enum:CrossingMode# CrossingMode(..) , -- ** CursorType #enum:CursorType# CursorType(..) , -- ** DevicePadFeature #enum:DevicePadFeature# DevicePadFeature(..) , -- ** DeviceToolType #enum:DeviceToolType# DeviceToolType(..) , -- ** DeviceType #enum:DeviceType# DeviceType(..) , -- ** DragCancelReason #enum:DragCancelReason# DragCancelReason(..) , -- ** DragProtocol #enum:DragProtocol# DragProtocol(..) , -- ** EventType #enum:EventType# EventType(..) , -- ** FilterReturn #enum:FilterReturn# FilterReturn(..) , -- ** FullscreenMode #enum:FullscreenMode# FullscreenMode(..) , -- ** GLError #enum:GLError# GLError(..) , catchGLError , handleGLError , -- ** GrabOwnership #enum:GrabOwnership# GrabOwnership(..) , -- ** GrabStatus #enum:GrabStatus# GrabStatus(..) , -- ** Gravity #enum:Gravity# Gravity(..) , -- ** InputMode #enum:InputMode# InputMode(..) , -- ** InputSource #enum:InputSource# InputSource(..) , -- ** ModifierIntent #enum:ModifierIntent# ModifierIntent(..) , -- ** NotifyType #enum:NotifyType# NotifyType(..) , -- ** OwnerChange #enum:OwnerChange# OwnerChange(..) , -- ** PropMode #enum:PropMode# PropMode(..) , -- ** PropertyState #enum:PropertyState# PropertyState(..) , -- ** ScrollDirection #enum:ScrollDirection# ScrollDirection(..) , -- ** SettingAction #enum:SettingAction# SettingAction(..) , -- ** Status #enum:Status# Status(..) , -- ** SubpixelLayout #enum:SubpixelLayout# SubpixelLayout(..) , -- ** TouchpadGesturePhase #enum:TouchpadGesturePhase# TouchpadGesturePhase(..) , -- ** VisibilityState #enum:VisibilityState# VisibilityState(..) , -- ** VisualType #enum:VisualType# VisualType(..) , -- ** WindowEdge #enum:WindowEdge# WindowEdge(..) , -- ** WindowType #enum:WindowType# WindowType(..) , -- ** WindowTypeHint #enum:WindowTypeHint# WindowTypeHint(..) , -- ** WindowWindowClass #enum:WindowWindowClass# WindowWindowClass(..) , ) 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 -- Enum WindowWindowClass {- | /@gDKINPUTOUTPUT@/ windows are the standard kind of window you might expect. Such windows receive events and are also displayed on screen. /@gDKINPUTONLY@/ windows are invisible; they are usually placed above other windows in order to trap or filter the events. You can’t draw on /@gDKINPUTONLY@/ windows. -} data WindowWindowClass = WindowWindowClassInputOutput {- ^ window for graphics and events -} | WindowWindowClassInputOnly {- ^ window for events only -} | AnotherWindowWindowClass Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum WindowWindowClass where fromEnum WindowWindowClassInputOutput = 0 fromEnum WindowWindowClassInputOnly = 1 fromEnum (AnotherWindowWindowClass k) = k toEnum 0 = WindowWindowClassInputOutput toEnum 1 = WindowWindowClassInputOnly toEnum k = AnotherWindowWindowClass k instance P.Ord WindowWindowClass where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_window_window_class_get_type" c_gdk_window_window_class_get_type :: IO GType instance BoxedEnum WindowWindowClass where boxedEnumType _ = c_gdk_window_window_class_get_type -- Enum WindowTypeHint {- | These are hints for the window manager that indicate what type of function the window has. The window manager can use this when determining decoration and behaviour of the window. The hint must be set before mapping the window. See the specification for more details about window types. -} data WindowTypeHint = WindowTypeHintNormal {- ^ Normal toplevel window. -} | WindowTypeHintDialog {- ^ Dialog window. -} | WindowTypeHintMenu {- ^ Window used to implement a menu; GTK+ uses this hint only for torn-off menus, see @/GtkTearoffMenuItem/@. -} | WindowTypeHintToolbar {- ^ Window used to implement toolbars. -} | WindowTypeHintSplashscreen {- ^ Window used to display a splash screen during application startup. -} | WindowTypeHintUtility {- ^ Utility windows which are not detached toolbars or dialogs. -} | WindowTypeHintDock {- ^ Used for creating dock or panel windows. -} | WindowTypeHintDesktop {- ^ Used for creating the desktop background window. -} | WindowTypeHintDropdownMenu {- ^ A menu that belongs to a menubar. -} | WindowTypeHintPopupMenu {- ^ A menu that does not belong to a menubar, e.g. a context menu. -} | WindowTypeHintTooltip {- ^ A tooltip. -} | WindowTypeHintNotification {- ^ A notification - typically a “bubble” that belongs to a status icon. -} | WindowTypeHintCombo {- ^ A popup from a combo box. -} | WindowTypeHintDnd {- ^ A window that is used to implement a DND cursor. -} | AnotherWindowTypeHint Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum WindowTypeHint where fromEnum WindowTypeHintNormal = 0 fromEnum WindowTypeHintDialog = 1 fromEnum WindowTypeHintMenu = 2 fromEnum WindowTypeHintToolbar = 3 fromEnum WindowTypeHintSplashscreen = 4 fromEnum WindowTypeHintUtility = 5 fromEnum WindowTypeHintDock = 6 fromEnum WindowTypeHintDesktop = 7 fromEnum WindowTypeHintDropdownMenu = 8 fromEnum WindowTypeHintPopupMenu = 9 fromEnum WindowTypeHintTooltip = 10 fromEnum WindowTypeHintNotification = 11 fromEnum WindowTypeHintCombo = 12 fromEnum WindowTypeHintDnd = 13 fromEnum (AnotherWindowTypeHint k) = k toEnum 0 = WindowTypeHintNormal toEnum 1 = WindowTypeHintDialog toEnum 2 = WindowTypeHintMenu toEnum 3 = WindowTypeHintToolbar toEnum 4 = WindowTypeHintSplashscreen toEnum 5 = WindowTypeHintUtility toEnum 6 = WindowTypeHintDock toEnum 7 = WindowTypeHintDesktop toEnum 8 = WindowTypeHintDropdownMenu toEnum 9 = WindowTypeHintPopupMenu toEnum 10 = WindowTypeHintTooltip toEnum 11 = WindowTypeHintNotification toEnum 12 = WindowTypeHintCombo toEnum 13 = WindowTypeHintDnd toEnum k = AnotherWindowTypeHint k instance P.Ord WindowTypeHint where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_window_type_hint_get_type" c_gdk_window_type_hint_get_type :: IO GType instance BoxedEnum WindowTypeHint where boxedEnumType _ = c_gdk_window_type_hint_get_type -- Enum WindowType {- | Describes the kind of window. -} data WindowType = WindowTypeRoot {- ^ root window; this window has no parent, covers the entire screen, and is created by the window system -} | WindowTypeToplevel {- ^ toplevel window (used to implement @/GtkWindow/@) -} | WindowTypeChild {- ^ child window (used to implement e.g. @/GtkEntry/@) -} | WindowTypeTemp {- ^ override redirect temporary window (used to implement @/GtkMenu/@) -} | WindowTypeForeign {- ^ foreign window (see @/gdk_window_foreign_new()/@) -} | WindowTypeOffscreen {- ^ offscreen window (see [Offscreen Windows][OFFSCREEN-WINDOWS]). Since 2.18 -} | WindowTypeSubsurface {- ^ subsurface-based window; This window is visually tied to a toplevel, and is moved\/stacked with it. Currently this window type is only implemented in Wayland. Since 3.14 -} | AnotherWindowType Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum WindowType where fromEnum WindowTypeRoot = 0 fromEnum WindowTypeToplevel = 1 fromEnum WindowTypeChild = 2 fromEnum WindowTypeTemp = 3 fromEnum WindowTypeForeign = 4 fromEnum WindowTypeOffscreen = 5 fromEnum WindowTypeSubsurface = 6 fromEnum (AnotherWindowType k) = k toEnum 0 = WindowTypeRoot toEnum 1 = WindowTypeToplevel toEnum 2 = WindowTypeChild toEnum 3 = WindowTypeTemp toEnum 4 = WindowTypeForeign toEnum 5 = WindowTypeOffscreen toEnum 6 = WindowTypeSubsurface toEnum k = AnotherWindowType k instance P.Ord WindowType where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_window_type_get_type" c_gdk_window_type_get_type :: IO GType instance BoxedEnum WindowType where boxedEnumType _ = c_gdk_window_type_get_type -- Enum WindowEdge {- | Determines a window edge or corner. -} data WindowEdge = WindowEdgeNorthWest {- ^ the top left corner. -} | WindowEdgeNorth {- ^ the top edge. -} | WindowEdgeNorthEast {- ^ the top right corner. -} | WindowEdgeWest {- ^ the left edge. -} | WindowEdgeEast {- ^ the right edge. -} | WindowEdgeSouthWest {- ^ the lower left corner. -} | WindowEdgeSouth {- ^ the lower edge. -} | WindowEdgeSouthEast {- ^ the lower right corner. -} | AnotherWindowEdge Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum WindowEdge where fromEnum WindowEdgeNorthWest = 0 fromEnum WindowEdgeNorth = 1 fromEnum WindowEdgeNorthEast = 2 fromEnum WindowEdgeWest = 3 fromEnum WindowEdgeEast = 4 fromEnum WindowEdgeSouthWest = 5 fromEnum WindowEdgeSouth = 6 fromEnum WindowEdgeSouthEast = 7 fromEnum (AnotherWindowEdge k) = k toEnum 0 = WindowEdgeNorthWest toEnum 1 = WindowEdgeNorth toEnum 2 = WindowEdgeNorthEast toEnum 3 = WindowEdgeWest toEnum 4 = WindowEdgeEast toEnum 5 = WindowEdgeSouthWest toEnum 6 = WindowEdgeSouth toEnum 7 = WindowEdgeSouthEast toEnum k = AnotherWindowEdge k instance P.Ord WindowEdge where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_window_edge_get_type" c_gdk_window_edge_get_type :: IO GType instance BoxedEnum WindowEdge where boxedEnumType _ = c_gdk_window_edge_get_type -- Enum VisualType {- | A set of values that describe the manner in which the pixel values for a visual are converted into RGB values for display. -} data VisualType = VisualTypeStaticGray {- ^ Each pixel value indexes a grayscale value directly. -} | VisualTypeGrayscale {- ^ Each pixel is an index into a color map that maps pixel values into grayscale values. The color map can be changed by an application. -} | VisualTypeStaticColor {- ^ Each pixel value is an index into a predefined, unmodifiable color map that maps pixel values into RGB values. -} | VisualTypePseudoColor {- ^ Each pixel is an index into a color map that maps pixel values into rgb values. The color map can be changed by an application. -} | VisualTypeTrueColor {- ^ Each pixel value directly contains red, green, and blue components. Use 'GI.Gdk.Objects.Visual.visualGetRedPixelDetails', etc, to obtain information about how the components are assembled into a pixel value. -} | VisualTypeDirectColor {- ^ Each pixel value contains red, green, and blue components as for 'GI.Gdk.Enums.VisualTypeTrueColor', but the components are mapped via a color table into the final output table instead of being converted directly. -} | AnotherVisualType Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum VisualType where fromEnum VisualTypeStaticGray = 0 fromEnum VisualTypeGrayscale = 1 fromEnum VisualTypeStaticColor = 2 fromEnum VisualTypePseudoColor = 3 fromEnum VisualTypeTrueColor = 4 fromEnum VisualTypeDirectColor = 5 fromEnum (AnotherVisualType k) = k toEnum 0 = VisualTypeStaticGray toEnum 1 = VisualTypeGrayscale toEnum 2 = VisualTypeStaticColor toEnum 3 = VisualTypePseudoColor toEnum 4 = VisualTypeTrueColor toEnum 5 = VisualTypeDirectColor toEnum k = AnotherVisualType k instance P.Ord VisualType where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_visual_type_get_type" c_gdk_visual_type_get_type :: IO GType instance BoxedEnum VisualType where boxedEnumType _ = c_gdk_visual_type_get_type -- Enum VisibilityState {- | Specifies the visiblity status of a window for a 'GI.Gdk.Structs.EventVisibility.EventVisibility'. -} data VisibilityState = VisibilityStateUnobscured {- ^ the window is completely visible. -} | VisibilityStatePartial {- ^ the window is partially visible. -} | VisibilityStateFullyObscured {- ^ the window is not visible at all. -} | AnotherVisibilityState Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum VisibilityState where fromEnum VisibilityStateUnobscured = 0 fromEnum VisibilityStatePartial = 1 fromEnum VisibilityStateFullyObscured = 2 fromEnum (AnotherVisibilityState k) = k toEnum 0 = VisibilityStateUnobscured toEnum 1 = VisibilityStatePartial toEnum 2 = VisibilityStateFullyObscured toEnum k = AnotherVisibilityState k instance P.Ord VisibilityState where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_visibility_state_get_type" c_gdk_visibility_state_get_type :: IO GType instance BoxedEnum VisibilityState where boxedEnumType _ = c_gdk_visibility_state_get_type -- Enum TouchpadGesturePhase {- | Specifies the current state of a touchpad gesture. All gestures are guaranteed to begin with an event with phase 'GI.Gdk.Enums.TouchpadGesturePhaseBegin', followed by 0 or several events with phase 'GI.Gdk.Enums.TouchpadGesturePhaseUpdate'. A finished gesture may have 2 possible outcomes, an event with phase 'GI.Gdk.Enums.TouchpadGesturePhaseEnd' will be emitted when the gesture is considered successful, this should be used as the hint to perform any permanent changes. Cancelled gestures may be so for a variety of reasons, due to hardware or the compositor, or due to the gesture recognition layers hinting the gesture did not finish resolutely (eg. a 3rd finger being added during a pinch gesture). In these cases, the last event will report the phase 'GI.Gdk.Enums.TouchpadGesturePhaseCancel', this should be used as a hint to undo any visible\/permanent changes that were done throughout the progress of the gesture. See also 'GI.Gdk.Structs.EventTouchpadSwipe.EventTouchpadSwipe' and 'GI.Gdk.Structs.EventTouchpadPinch.EventTouchpadPinch'. -} data TouchpadGesturePhase = TouchpadGesturePhaseBegin {- ^ The gesture has begun. -} | TouchpadGesturePhaseUpdate {- ^ The gesture has been updated. -} | TouchpadGesturePhaseEnd {- ^ The gesture was finished, changes should be permanently applied. -} | TouchpadGesturePhaseCancel {- ^ The gesture was cancelled, all changes should be undone. -} | AnotherTouchpadGesturePhase Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum TouchpadGesturePhase where fromEnum TouchpadGesturePhaseBegin = 0 fromEnum TouchpadGesturePhaseUpdate = 1 fromEnum TouchpadGesturePhaseEnd = 2 fromEnum TouchpadGesturePhaseCancel = 3 fromEnum (AnotherTouchpadGesturePhase k) = k toEnum 0 = TouchpadGesturePhaseBegin toEnum 1 = TouchpadGesturePhaseUpdate toEnum 2 = TouchpadGesturePhaseEnd toEnum 3 = TouchpadGesturePhaseCancel toEnum k = AnotherTouchpadGesturePhase k instance P.Ord TouchpadGesturePhase where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_touchpad_gesture_phase_get_type" c_gdk_touchpad_gesture_phase_get_type :: IO GType instance BoxedEnum TouchpadGesturePhase where boxedEnumType _ = c_gdk_touchpad_gesture_phase_get_type -- Enum SubpixelLayout {- | This enumeration describes how the red, green and blue components of physical pixels on an output device are laid out. /Since: 3.22/ -} data SubpixelLayout = SubpixelLayoutUnknown {- ^ The layout is not known -} | SubpixelLayoutNone {- ^ Not organized in this way -} | SubpixelLayoutHorizontalRgb {- ^ The layout is horizontal, the order is RGB -} | SubpixelLayoutHorizontalBgr {- ^ The layout is horizontal, the order is BGR -} | SubpixelLayoutVerticalRgb {- ^ The layout is vertical, the order is RGB -} | SubpixelLayoutVerticalBgr {- ^ The layout is vertical, the order is BGR -} | AnotherSubpixelLayout Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum SubpixelLayout where fromEnum SubpixelLayoutUnknown = 0 fromEnum SubpixelLayoutNone = 1 fromEnum SubpixelLayoutHorizontalRgb = 2 fromEnum SubpixelLayoutHorizontalBgr = 3 fromEnum SubpixelLayoutVerticalRgb = 4 fromEnum SubpixelLayoutVerticalBgr = 5 fromEnum (AnotherSubpixelLayout k) = k toEnum 0 = SubpixelLayoutUnknown toEnum 1 = SubpixelLayoutNone toEnum 2 = SubpixelLayoutHorizontalRgb toEnum 3 = SubpixelLayoutHorizontalBgr toEnum 4 = SubpixelLayoutVerticalRgb toEnum 5 = SubpixelLayoutVerticalBgr toEnum k = AnotherSubpixelLayout k instance P.Ord SubpixelLayout where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_subpixel_layout_get_type" c_gdk_subpixel_layout_get_type :: IO GType instance BoxedEnum SubpixelLayout where boxedEnumType _ = c_gdk_subpixel_layout_get_type -- Enum Status {- | /No description available in the introspection data./ -} data Status = StatusOk {- ^ /No description available in the introspection data./ -} | StatusError {- ^ /No description available in the introspection data./ -} | StatusErrorParam {- ^ /No description available in the introspection data./ -} | StatusErrorFile {- ^ /No description available in the introspection data./ -} | StatusErrorMem {- ^ /No description available in the introspection data./ -} | AnotherStatus Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum Status where fromEnum StatusOk = 0 fromEnum StatusError = -1 fromEnum StatusErrorParam = -2 fromEnum StatusErrorFile = -3 fromEnum StatusErrorMem = -4 fromEnum (AnotherStatus k) = k toEnum 0 = StatusOk toEnum -1 = StatusError toEnum -2 = StatusErrorParam toEnum -3 = StatusErrorFile toEnum -4 = StatusErrorMem toEnum k = AnotherStatus k instance P.Ord Status where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_status_get_type" c_gdk_status_get_type :: IO GType instance BoxedEnum Status where boxedEnumType _ = c_gdk_status_get_type -- Enum SettingAction {- | Specifies the kind of modification applied to a setting in a 'GI.Gdk.Structs.EventSetting.EventSetting'. -} data SettingAction = SettingActionNew {- ^ a setting was added. -} | SettingActionChanged {- ^ a setting was changed. -} | SettingActionDeleted {- ^ a setting was deleted. -} | AnotherSettingAction Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum SettingAction where fromEnum SettingActionNew = 0 fromEnum SettingActionChanged = 1 fromEnum SettingActionDeleted = 2 fromEnum (AnotherSettingAction k) = k toEnum 0 = SettingActionNew toEnum 1 = SettingActionChanged toEnum 2 = SettingActionDeleted toEnum k = AnotherSettingAction k instance P.Ord SettingAction where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_setting_action_get_type" c_gdk_setting_action_get_type :: IO GType instance BoxedEnum SettingAction where boxedEnumType _ = c_gdk_setting_action_get_type -- Enum ScrollDirection {- | Specifies the direction for 'GI.Gdk.Structs.EventScroll.EventScroll'. -} data ScrollDirection = ScrollDirectionUp {- ^ the window is scrolled up. -} | ScrollDirectionDown {- ^ the window is scrolled down. -} | ScrollDirectionLeft {- ^ the window is scrolled to the left. -} | ScrollDirectionRight {- ^ the window is scrolled to the right. -} | ScrollDirectionSmooth {- ^ the scrolling is determined by the delta values in 'GI.Gdk.Structs.EventScroll.EventScroll'. See 'GI.Gdk.Unions.Event.eventGetScrollDeltas'. Since: 3.4 -} | AnotherScrollDirection Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum ScrollDirection where fromEnum ScrollDirectionUp = 0 fromEnum ScrollDirectionDown = 1 fromEnum ScrollDirectionLeft = 2 fromEnum ScrollDirectionRight = 3 fromEnum ScrollDirectionSmooth = 4 fromEnum (AnotherScrollDirection k) = k toEnum 0 = ScrollDirectionUp toEnum 1 = ScrollDirectionDown toEnum 2 = ScrollDirectionLeft toEnum 3 = ScrollDirectionRight toEnum 4 = ScrollDirectionSmooth toEnum k = AnotherScrollDirection k instance P.Ord ScrollDirection where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_scroll_direction_get_type" c_gdk_scroll_direction_get_type :: IO GType instance BoxedEnum ScrollDirection where boxedEnumType _ = c_gdk_scroll_direction_get_type -- Enum PropertyState {- | Specifies the type of a property change for a 'GI.Gdk.Structs.EventProperty.EventProperty'. -} data PropertyState = PropertyStateNewValue {- ^ the property value was changed. -} | PropertyStateDelete {- ^ the property was deleted. -} | AnotherPropertyState Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum PropertyState where fromEnum PropertyStateNewValue = 0 fromEnum PropertyStateDelete = 1 fromEnum (AnotherPropertyState k) = k toEnum 0 = PropertyStateNewValue toEnum 1 = PropertyStateDelete toEnum k = AnotherPropertyState k instance P.Ord PropertyState where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_property_state_get_type" c_gdk_property_state_get_type :: IO GType instance BoxedEnum PropertyState where boxedEnumType _ = c_gdk_property_state_get_type -- Enum PropMode {- | Describes how existing data is combined with new data when using @/gdk_property_change()/@. -} data PropMode = PropModeReplace {- ^ the new data replaces the existing data. -} | PropModePrepend {- ^ the new data is prepended to the existing data. -} | PropModeAppend {- ^ the new data is appended to the existing data. -} | AnotherPropMode Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum PropMode where fromEnum PropModeReplace = 0 fromEnum PropModePrepend = 1 fromEnum PropModeAppend = 2 fromEnum (AnotherPropMode k) = k toEnum 0 = PropModeReplace toEnum 1 = PropModePrepend toEnum 2 = PropModeAppend toEnum k = AnotherPropMode k instance P.Ord PropMode where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_prop_mode_get_type" c_gdk_prop_mode_get_type :: IO GType instance BoxedEnum PropMode where boxedEnumType _ = c_gdk_prop_mode_get_type -- Enum OwnerChange {- | Specifies why a selection ownership was changed. -} data OwnerChange = OwnerChangeNewOwner {- ^ some other app claimed the ownership -} | OwnerChangeDestroy {- ^ the window was destroyed -} | OwnerChangeClose {- ^ the client was closed -} | AnotherOwnerChange Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum OwnerChange where fromEnum OwnerChangeNewOwner = 0 fromEnum OwnerChangeDestroy = 1 fromEnum OwnerChangeClose = 2 fromEnum (AnotherOwnerChange k) = k toEnum 0 = OwnerChangeNewOwner toEnum 1 = OwnerChangeDestroy toEnum 2 = OwnerChangeClose toEnum k = AnotherOwnerChange k instance P.Ord OwnerChange where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_owner_change_get_type" c_gdk_owner_change_get_type :: IO GType instance BoxedEnum OwnerChange where boxedEnumType _ = c_gdk_owner_change_get_type -- Enum NotifyType {- | Specifies the kind of crossing for 'GI.Gdk.Structs.EventCrossing.EventCrossing'. See the X11 protocol specification of LeaveNotify for full details of crossing event generation. -} data NotifyType = NotifyTypeAncestor {- ^ the window is entered from an ancestor or left towards an ancestor. -} | NotifyTypeVirtual {- ^ the pointer moves between an ancestor and an inferior of the window. -} | NotifyTypeInferior {- ^ the window is entered from an inferior or left towards an inferior. -} | NotifyTypeNonlinear {- ^ the window is entered from or left towards a window which is neither an ancestor nor an inferior. -} | NotifyTypeNonlinearVirtual {- ^ the pointer moves between two windows which are not ancestors of each other and the window is part of the ancestor chain between one of these windows and their least common ancestor. -} | NotifyTypeUnknown {- ^ an unknown type of enter\/leave event occurred. -} | AnotherNotifyType Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum NotifyType where fromEnum NotifyTypeAncestor = 0 fromEnum NotifyTypeVirtual = 1 fromEnum NotifyTypeInferior = 2 fromEnum NotifyTypeNonlinear = 3 fromEnum NotifyTypeNonlinearVirtual = 4 fromEnum NotifyTypeUnknown = 5 fromEnum (AnotherNotifyType k) = k toEnum 0 = NotifyTypeAncestor toEnum 1 = NotifyTypeVirtual toEnum 2 = NotifyTypeInferior toEnum 3 = NotifyTypeNonlinear toEnum 4 = NotifyTypeNonlinearVirtual toEnum 5 = NotifyTypeUnknown toEnum k = AnotherNotifyType k instance P.Ord NotifyType where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_notify_type_get_type" c_gdk_notify_type_get_type :: IO GType instance BoxedEnum NotifyType where boxedEnumType _ = c_gdk_notify_type_get_type -- Enum ModifierIntent {- | This enum is used with 'GI.Gdk.Objects.Keymap.keymapGetModifierMask' in order to determine what modifiers the currently used windowing system backend uses for particular purposes. For example, on X11\/Windows, the Control key is used for invoking menu shortcuts (accelerators), whereas on Apple computers it’s the Command key (which correspond to 'GI.Gdk.Flags.ModifierTypeControlMask' and 'GI.Gdk.Flags.ModifierTypeMod2Mask', respectively). /Since: 3.4/ -} data ModifierIntent = ModifierIntentPrimaryAccelerator {- ^ the primary modifier used to invoke menu accelerators. -} | ModifierIntentContextMenu {- ^ the modifier used to invoke context menus. Note that mouse button 3 always triggers context menus. When this modifier is not 0, it additionally triggers context menus when used with mouse button 1. -} | ModifierIntentExtendSelection {- ^ the modifier used to extend selections using @modifier@-click or @modifier@-cursor-key -} | ModifierIntentModifySelection {- ^ the modifier used to modify selections, which in most cases means toggling the clicked item into or out of the selection. -} | ModifierIntentNoTextInput {- ^ when any of these modifiers is pressed, the key event cannot produce a symbol directly. This is meant to be used for input methods, and for use cases like typeahead search. -} | ModifierIntentShiftGroup {- ^ the modifier that switches between keyboard groups (AltGr on X11\/Windows and Option\/Alt on OS X). -} | ModifierIntentDefaultModMask {- ^ The set of modifier masks accepted as modifiers in accelerators. Needed because Command is mapped to MOD2 on OSX, which is widely used, but on X11 MOD2 is NumLock and using that for a mod key is problematic at best. Ref: https:\/\/bugzilla.gnome.org\/show_bug.cgi?id=736125. -} | AnotherModifierIntent Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum ModifierIntent where fromEnum ModifierIntentPrimaryAccelerator = 0 fromEnum ModifierIntentContextMenu = 1 fromEnum ModifierIntentExtendSelection = 2 fromEnum ModifierIntentModifySelection = 3 fromEnum ModifierIntentNoTextInput = 4 fromEnum ModifierIntentShiftGroup = 5 fromEnum ModifierIntentDefaultModMask = 6 fromEnum (AnotherModifierIntent k) = k toEnum 0 = ModifierIntentPrimaryAccelerator toEnum 1 = ModifierIntentContextMenu toEnum 2 = ModifierIntentExtendSelection toEnum 3 = ModifierIntentModifySelection toEnum 4 = ModifierIntentNoTextInput toEnum 5 = ModifierIntentShiftGroup toEnum 6 = ModifierIntentDefaultModMask toEnum k = AnotherModifierIntent k instance P.Ord ModifierIntent where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_modifier_intent_get_type" c_gdk_modifier_intent_get_type :: IO GType instance BoxedEnum ModifierIntent where boxedEnumType _ = c_gdk_modifier_intent_get_type -- Enum InputSource {- | An enumeration describing the type of an input device in general terms. -} data InputSource = InputSourceMouse {- ^ the device is a mouse. (This will be reported for the core pointer, even if it is something else, such as a trackball.) -} | InputSourcePen {- ^ the device is a stylus of a graphics tablet or similar device. -} | InputSourceEraser {- ^ the device is an eraser. Typically, this would be the other end of a stylus on a graphics tablet. -} | InputSourceCursor {- ^ the device is a graphics tablet “puck” or similar device. -} | InputSourceKeyboard {- ^ the device is a keyboard. -} | InputSourceTouchscreen {- ^ the device is a direct-input touch device, such as a touchscreen or tablet. This device type has been added in 3.4. -} | InputSourceTouchpad {- ^ the device is an indirect touch device, such as a touchpad. This device type has been added in 3.4. -} | InputSourceTrackpoint {- ^ the device is a trackpoint. This device type has been added in 3.22 -} | InputSourceTabletPad {- ^ the device is a \"pad\", a collection of buttons, rings and strips found in drawing tablets. This device type has been added in 3.22. -} | AnotherInputSource Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum InputSource where fromEnum InputSourceMouse = 0 fromEnum InputSourcePen = 1 fromEnum InputSourceEraser = 2 fromEnum InputSourceCursor = 3 fromEnum InputSourceKeyboard = 4 fromEnum InputSourceTouchscreen = 5 fromEnum InputSourceTouchpad = 6 fromEnum InputSourceTrackpoint = 7 fromEnum InputSourceTabletPad = 8 fromEnum (AnotherInputSource k) = k toEnum 0 = InputSourceMouse toEnum 1 = InputSourcePen toEnum 2 = InputSourceEraser toEnum 3 = InputSourceCursor toEnum 4 = InputSourceKeyboard toEnum 5 = InputSourceTouchscreen toEnum 6 = InputSourceTouchpad toEnum 7 = InputSourceTrackpoint toEnum 8 = InputSourceTabletPad toEnum k = AnotherInputSource k instance P.Ord InputSource where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_input_source_get_type" c_gdk_input_source_get_type :: IO GType instance BoxedEnum InputSource where boxedEnumType _ = c_gdk_input_source_get_type -- Enum InputMode {- | An enumeration that describes the mode of an input device. -} data InputMode = InputModeDisabled {- ^ the device is disabled and will not report any events. -} | InputModeScreen {- ^ the device is enabled. The device’s coordinate space maps to the entire screen. -} | InputModeWindow {- ^ the device is enabled. The device’s coordinate space is mapped to a single window. The manner in which this window is chosen is undefined, but it will typically be the same way in which the focus window for key events is determined. -} | AnotherInputMode Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum InputMode where fromEnum InputModeDisabled = 0 fromEnum InputModeScreen = 1 fromEnum InputModeWindow = 2 fromEnum (AnotherInputMode k) = k toEnum 0 = InputModeDisabled toEnum 1 = InputModeScreen toEnum 2 = InputModeWindow toEnum k = AnotherInputMode k instance P.Ord InputMode where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_input_mode_get_type" c_gdk_input_mode_get_type :: IO GType instance BoxedEnum InputMode where boxedEnumType _ = c_gdk_input_mode_get_type -- Enum Gravity {- | Defines the reference point of a window and the meaning of coordinates passed to @/gtk_window_move()/@. See @/gtk_window_move()/@ and the \"implementation notes\" section of the specification for more details. -} data Gravity = GravityNorthWest {- ^ the reference point is at the top left corner. -} | GravityNorth {- ^ the reference point is in the middle of the top edge. -} | GravityNorthEast {- ^ the reference point is at the top right corner. -} | GravityWest {- ^ the reference point is at the middle of the left edge. -} | GravityCenter {- ^ the reference point is at the center of the window. -} | GravityEast {- ^ the reference point is at the middle of the right edge. -} | GravitySouthWest {- ^ the reference point is at the lower left corner. -} | GravitySouth {- ^ the reference point is at the middle of the lower edge. -} | GravitySouthEast {- ^ the reference point is at the lower right corner. -} | GravityStatic {- ^ the reference point is at the top left corner of the window itself, ignoring window manager decorations. -} | AnotherGravity Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum Gravity where fromEnum GravityNorthWest = 1 fromEnum GravityNorth = 2 fromEnum GravityNorthEast = 3 fromEnum GravityWest = 4 fromEnum GravityCenter = 5 fromEnum GravityEast = 6 fromEnum GravitySouthWest = 7 fromEnum GravitySouth = 8 fromEnum GravitySouthEast = 9 fromEnum GravityStatic = 10 fromEnum (AnotherGravity k) = k toEnum 1 = GravityNorthWest toEnum 2 = GravityNorth toEnum 3 = GravityNorthEast toEnum 4 = GravityWest toEnum 5 = GravityCenter toEnum 6 = GravityEast toEnum 7 = GravitySouthWest toEnum 8 = GravitySouth toEnum 9 = GravitySouthEast toEnum 10 = GravityStatic toEnum k = AnotherGravity k instance P.Ord Gravity where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_gravity_get_type" c_gdk_gravity_get_type :: IO GType instance BoxedEnum Gravity where boxedEnumType _ = c_gdk_gravity_get_type -- Enum GrabStatus {- | Returned by 'GI.Gdk.Objects.Device.deviceGrab', 'GI.Gdk.Functions.pointerGrab' and 'GI.Gdk.Functions.keyboardGrab' to indicate success or the reason for the failure of the grab attempt. -} data GrabStatus = GrabStatusSuccess {- ^ the resource was successfully grabbed. -} | GrabStatusAlreadyGrabbed {- ^ the resource is actively grabbed by another client. -} | GrabStatusInvalidTime {- ^ the resource was grabbed more recently than the specified time. -} | GrabStatusNotViewable {- ^ the grab window or the /@confineTo@/ window are not viewable. -} | GrabStatusFrozen {- ^ the resource is frozen by an active grab of another client. -} | GrabStatusFailed {- ^ the grab failed for some other reason. Since 3.16 -} | AnotherGrabStatus Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum GrabStatus where fromEnum GrabStatusSuccess = 0 fromEnum GrabStatusAlreadyGrabbed = 1 fromEnum GrabStatusInvalidTime = 2 fromEnum GrabStatusNotViewable = 3 fromEnum GrabStatusFrozen = 4 fromEnum GrabStatusFailed = 5 fromEnum (AnotherGrabStatus k) = k toEnum 0 = GrabStatusSuccess toEnum 1 = GrabStatusAlreadyGrabbed toEnum 2 = GrabStatusInvalidTime toEnum 3 = GrabStatusNotViewable toEnum 4 = GrabStatusFrozen toEnum 5 = GrabStatusFailed toEnum k = AnotherGrabStatus k instance P.Ord GrabStatus where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_grab_status_get_type" c_gdk_grab_status_get_type :: IO GType instance BoxedEnum GrabStatus where boxedEnumType _ = c_gdk_grab_status_get_type -- Enum GrabOwnership {- | Defines how device grabs interact with other devices. -} data GrabOwnership = GrabOwnershipNone {- ^ All other devices’ events are allowed. -} | GrabOwnershipWindow {- ^ Other devices’ events are blocked for the grab window. -} | GrabOwnershipApplication {- ^ Other devices’ events are blocked for the whole application. -} | AnotherGrabOwnership Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum GrabOwnership where fromEnum GrabOwnershipNone = 0 fromEnum GrabOwnershipWindow = 1 fromEnum GrabOwnershipApplication = 2 fromEnum (AnotherGrabOwnership k) = k toEnum 0 = GrabOwnershipNone toEnum 1 = GrabOwnershipWindow toEnum 2 = GrabOwnershipApplication toEnum k = AnotherGrabOwnership k instance P.Ord GrabOwnership where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_grab_ownership_get_type" c_gdk_grab_ownership_get_type :: IO GType instance BoxedEnum GrabOwnership where boxedEnumType _ = c_gdk_grab_ownership_get_type -- Enum GLError {- | Error enumeration for 'GI.Gdk.Objects.GLContext.GLContext'. /Since: 3.16/ -} data GLError = GLErrorNotAvailable {- ^ OpenGL support is not available -} | GLErrorUnsupportedFormat {- ^ The requested visual format is not supported -} | GLErrorUnsupportedProfile {- ^ The requested profile is not supported -} | AnotherGLError Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum GLError where fromEnum GLErrorNotAvailable = 0 fromEnum GLErrorUnsupportedFormat = 1 fromEnum GLErrorUnsupportedProfile = 2 fromEnum (AnotherGLError k) = k toEnum 0 = GLErrorNotAvailable toEnum 1 = GLErrorUnsupportedFormat toEnum 2 = GLErrorUnsupportedProfile toEnum k = AnotherGLError k instance P.Ord GLError where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) instance GErrorClass GLError where gerrorClassDomain _ = "gdk-gl-error-quark" -- | Catch exceptions of type `GLError`. This is a specialized version of `Data.GI.Base.GError.catchGErrorJustDomain`. catchGLError :: IO a -> (GLError -> GErrorMessage -> IO a) -> IO a catchGLError = catchGErrorJustDomain -- | Handle exceptions of type `GLError`. This is a specialized version of `Data.GI.Base.GError.handleGErrorJustDomain`. handleGLError :: (GLError -> GErrorMessage -> IO a) -> IO a -> IO a handleGLError = handleGErrorJustDomain foreign import ccall "gdk_gl_error_get_type" c_gdk_gl_error_get_type :: IO GType instance BoxedEnum GLError where boxedEnumType _ = c_gdk_gl_error_get_type -- Enum FullscreenMode {- | Indicates which monitor (in a multi-head setup) a window should span over when in fullscreen mode. /Since: 3.8/ -} data FullscreenMode = FullscreenModeCurrentMonitor {- ^ Fullscreen on current monitor only. -} | FullscreenModeAllMonitors {- ^ Span across all monitors when fullscreen. -} | AnotherFullscreenMode Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum FullscreenMode where fromEnum FullscreenModeCurrentMonitor = 0 fromEnum FullscreenModeAllMonitors = 1 fromEnum (AnotherFullscreenMode k) = k toEnum 0 = FullscreenModeCurrentMonitor toEnum 1 = FullscreenModeAllMonitors toEnum k = AnotherFullscreenMode k instance P.Ord FullscreenMode where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_fullscreen_mode_get_type" c_gdk_fullscreen_mode_get_type :: IO GType instance BoxedEnum FullscreenMode where boxedEnumType _ = c_gdk_fullscreen_mode_get_type -- Enum FilterReturn {- | Specifies the result of applying a 'GI.Gdk.Callbacks.FilterFunc' to a native event. -} data FilterReturn = FilterReturnContinue {- ^ event not handled, continue processing. -} | FilterReturnTranslate {- ^ native event translated into a GDK event and stored in the @event@ structure that was passed in. -} | FilterReturnRemove {- ^ event handled, terminate processing. -} | AnotherFilterReturn Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum FilterReturn where fromEnum FilterReturnContinue = 0 fromEnum FilterReturnTranslate = 1 fromEnum FilterReturnRemove = 2 fromEnum (AnotherFilterReturn k) = k toEnum 0 = FilterReturnContinue toEnum 1 = FilterReturnTranslate toEnum 2 = FilterReturnRemove toEnum k = AnotherFilterReturn k instance P.Ord FilterReturn where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_filter_return_get_type" c_gdk_filter_return_get_type :: IO GType instance BoxedEnum FilterReturn where boxedEnumType _ = c_gdk_filter_return_get_type -- Enum EventType {- | Specifies the type of the event. Do not confuse these events with the signals that GTK+ widgets emit. Although many of these events result in corresponding signals being emitted, the events are often transformed or filtered along the way. In some language bindings, the values 'GI.Gdk.Enums.EventType2buttonPress' and 'GI.Gdk.Enums.EventType3buttonPress' would translate into something syntactically invalid (eg @Gdk.EventType.2ButtonPress@, where a symbol is not allowed to start with a number). In that case, the aliases 'GI.Gdk.Enums.EventTypeDoubleButtonPress' and 'GI.Gdk.Enums.EventTypeTripleButtonPress' can be used instead. -} data EventType = EventTypeNothing {- ^ a special code to indicate a null event. -} | EventTypeDelete {- ^ the window manager has requested that the toplevel window be hidden or destroyed, usually when the user clicks on a special icon in the title bar. -} | EventTypeDestroy {- ^ the window has been destroyed. -} | EventTypeExpose {- ^ all or part of the window has become visible and needs to be redrawn. -} | EventTypeMotionNotify {- ^ the pointer (usually a mouse) has moved. -} | EventTypeButtonPress {- ^ a mouse button has been pressed. -} | EventType2buttonPress {- ^ a mouse button has been double-clicked (clicked twice within a short period of time). Note that each click also generates a 'GI.Gdk.Enums.EventTypeButtonPress' event. -} | EventTypeDoubleButtonPress {- ^ alias for 'GI.Gdk.Enums.EventType2buttonPress', added in 3.6. -} | EventType3buttonPress {- ^ a mouse button has been clicked 3 times in a short period of time. Note that each click also generates a 'GI.Gdk.Enums.EventTypeButtonPress' event. -} | EventTypeTripleButtonPress {- ^ alias for 'GI.Gdk.Enums.EventType3buttonPress', added in 3.6. -} | EventTypeButtonRelease {- ^ a mouse button has been released. -} | EventTypeKeyPress {- ^ a key has been pressed. -} | EventTypeKeyRelease {- ^ a key has been released. -} | EventTypeEnterNotify {- ^ the pointer has entered the window. -} | EventTypeLeaveNotify {- ^ the pointer has left the window. -} | EventTypeFocusChange {- ^ the keyboard focus has entered or left the window. -} | EventTypeConfigure {- ^ the size, position or stacking order of the window has changed. Note that GTK+ discards these events for 'GI.Gdk.Enums.WindowTypeChild' windows. -} | EventTypeMap {- ^ the window has been mapped. -} | EventTypeUnmap {- ^ the window has been unmapped. -} | EventTypePropertyNotify {- ^ a property on the window has been changed or deleted. -} | EventTypeSelectionClear {- ^ the application has lost ownership of a selection. -} | EventTypeSelectionRequest {- ^ another application has requested a selection. -} | EventTypeSelectionNotify {- ^ a selection has been received. -} | EventTypeProximityIn {- ^ an input device has moved into contact with a sensing surface (e.g. a touchscreen or graphics tablet). -} | EventTypeProximityOut {- ^ an input device has moved out of contact with a sensing surface. -} | EventTypeDragEnter {- ^ the mouse has entered the window while a drag is in progress. -} | EventTypeDragLeave {- ^ the mouse has left the window while a drag is in progress. -} | EventTypeDragMotion {- ^ the mouse has moved in the window while a drag is in progress. -} | EventTypeDragStatus {- ^ the status of the drag operation initiated by the window has changed. -} | EventTypeDropStart {- ^ a drop operation onto the window has started. -} | EventTypeDropFinished {- ^ the drop operation initiated by the window has completed. -} | EventTypeClientEvent {- ^ a message has been received from another application. -} | EventTypeVisibilityNotify {- ^ the window visibility status has changed. -} | EventTypeScroll {- ^ the scroll wheel was turned -} | EventTypeWindowState {- ^ the state of a window has changed. See 'GI.Gdk.Flags.WindowState' for the possible window states -} | EventTypeSetting {- ^ a setting has been modified. -} | EventTypeOwnerChange {- ^ the owner of a selection has changed. This event type was added in 2.6 -} | EventTypeGrabBroken {- ^ a pointer or keyboard grab was broken. This event type was added in 2.8. -} | EventTypeDamage {- ^ the content of the window has been changed. This event type was added in 2.14. -} | EventTypeTouchBegin {- ^ A new touch event sequence has just started. This event type was added in 3.4. -} | EventTypeTouchUpdate {- ^ A touch event sequence has been updated. This event type was added in 3.4. -} | EventTypeTouchEnd {- ^ A touch event sequence has finished. This event type was added in 3.4. -} | EventTypeTouchCancel {- ^ A touch event sequence has been canceled. This event type was added in 3.4. -} | EventTypeTouchpadSwipe {- ^ A touchpad swipe gesture event, the current state is determined by its phase field. This event type was added in 3.18. -} | EventTypeTouchpadPinch {- ^ A touchpad pinch gesture event, the current state is determined by its phase field. This event type was added in 3.18. -} | EventTypePadButtonPress {- ^ A tablet pad button press event. This event type was added in 3.22. -} | EventTypePadButtonRelease {- ^ A tablet pad button release event. This event type was added in 3.22. -} | EventTypePadRing {- ^ A tablet pad axis event from a \"ring\". This event type was added in 3.22. -} | EventTypePadStrip {- ^ A tablet pad axis event from a \"strip\". This event type was added in 3.22. -} | EventTypePadGroupMode {- ^ A tablet pad group mode change. This event type was added in 3.22. -} | EventTypeEventLast {- ^ marks the end of the GdkEventType enumeration. Added in 2.18 -} | AnotherEventType Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum EventType where fromEnum EventTypeNothing = -1 fromEnum EventTypeDelete = 0 fromEnum EventTypeDestroy = 1 fromEnum EventTypeExpose = 2 fromEnum EventTypeMotionNotify = 3 fromEnum EventTypeButtonPress = 4 fromEnum EventType2buttonPress = 5 fromEnum EventTypeDoubleButtonPress = 5 fromEnum EventType3buttonPress = 6 fromEnum EventTypeTripleButtonPress = 6 fromEnum EventTypeButtonRelease = 7 fromEnum EventTypeKeyPress = 8 fromEnum EventTypeKeyRelease = 9 fromEnum EventTypeEnterNotify = 10 fromEnum EventTypeLeaveNotify = 11 fromEnum EventTypeFocusChange = 12 fromEnum EventTypeConfigure = 13 fromEnum EventTypeMap = 14 fromEnum EventTypeUnmap = 15 fromEnum EventTypePropertyNotify = 16 fromEnum EventTypeSelectionClear = 17 fromEnum EventTypeSelectionRequest = 18 fromEnum EventTypeSelectionNotify = 19 fromEnum EventTypeProximityIn = 20 fromEnum EventTypeProximityOut = 21 fromEnum EventTypeDragEnter = 22 fromEnum EventTypeDragLeave = 23 fromEnum EventTypeDragMotion = 24 fromEnum EventTypeDragStatus = 25 fromEnum EventTypeDropStart = 26 fromEnum EventTypeDropFinished = 27 fromEnum EventTypeClientEvent = 28 fromEnum EventTypeVisibilityNotify = 29 fromEnum EventTypeScroll = 31 fromEnum EventTypeWindowState = 32 fromEnum EventTypeSetting = 33 fromEnum EventTypeOwnerChange = 34 fromEnum EventTypeGrabBroken = 35 fromEnum EventTypeDamage = 36 fromEnum EventTypeTouchBegin = 37 fromEnum EventTypeTouchUpdate = 38 fromEnum EventTypeTouchEnd = 39 fromEnum EventTypeTouchCancel = 40 fromEnum EventTypeTouchpadSwipe = 41 fromEnum EventTypeTouchpadPinch = 42 fromEnum EventTypePadButtonPress = 43 fromEnum EventTypePadButtonRelease = 44 fromEnum EventTypePadRing = 45 fromEnum EventTypePadStrip = 46 fromEnum EventTypePadGroupMode = 47 fromEnum EventTypeEventLast = 48 fromEnum (AnotherEventType k) = k toEnum -1 = EventTypeNothing toEnum 0 = EventTypeDelete toEnum 1 = EventTypeDestroy toEnum 2 = EventTypeExpose toEnum 3 = EventTypeMotionNotify toEnum 4 = EventTypeButtonPress toEnum 5 = EventType2buttonPress toEnum 5 = EventTypeDoubleButtonPress toEnum 6 = EventType3buttonPress toEnum 6 = EventTypeTripleButtonPress toEnum 7 = EventTypeButtonRelease toEnum 8 = EventTypeKeyPress toEnum 9 = EventTypeKeyRelease toEnum 10 = EventTypeEnterNotify toEnum 11 = EventTypeLeaveNotify toEnum 12 = EventTypeFocusChange toEnum 13 = EventTypeConfigure toEnum 14 = EventTypeMap toEnum 15 = EventTypeUnmap toEnum 16 = EventTypePropertyNotify toEnum 17 = EventTypeSelectionClear toEnum 18 = EventTypeSelectionRequest toEnum 19 = EventTypeSelectionNotify toEnum 20 = EventTypeProximityIn toEnum 21 = EventTypeProximityOut toEnum 22 = EventTypeDragEnter toEnum 23 = EventTypeDragLeave toEnum 24 = EventTypeDragMotion toEnum 25 = EventTypeDragStatus toEnum 26 = EventTypeDropStart toEnum 27 = EventTypeDropFinished toEnum 28 = EventTypeClientEvent toEnum 29 = EventTypeVisibilityNotify toEnum 31 = EventTypeScroll toEnum 32 = EventTypeWindowState toEnum 33 = EventTypeSetting toEnum 34 = EventTypeOwnerChange toEnum 35 = EventTypeGrabBroken toEnum 36 = EventTypeDamage toEnum 37 = EventTypeTouchBegin toEnum 38 = EventTypeTouchUpdate toEnum 39 = EventTypeTouchEnd toEnum 40 = EventTypeTouchCancel toEnum 41 = EventTypeTouchpadSwipe toEnum 42 = EventTypeTouchpadPinch toEnum 43 = EventTypePadButtonPress toEnum 44 = EventTypePadButtonRelease toEnum 45 = EventTypePadRing toEnum 46 = EventTypePadStrip toEnum 47 = EventTypePadGroupMode toEnum 48 = EventTypeEventLast toEnum k = AnotherEventType k instance P.Ord EventType where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_event_type_get_type" c_gdk_event_type_get_type :: IO GType instance BoxedEnum EventType where boxedEnumType _ = c_gdk_event_type_get_type -- Enum DragProtocol {- | Used in 'GI.Gdk.Objects.DragContext.DragContext' to indicate the protocol according to which DND is done. -} data DragProtocol = DragProtocolNone {- ^ no protocol. -} | DragProtocolMotif {- ^ The Motif DND protocol. No longer supported -} | DragProtocolXdnd {- ^ The Xdnd protocol. -} | DragProtocolRootwin {- ^ An extension to the Xdnd protocol for unclaimed root window drops. -} | DragProtocolWin32Dropfiles {- ^ The simple WM_DROPFILES protocol. -} | DragProtocolOle2 {- ^ The complex OLE2 DND protocol (not implemented). -} | DragProtocolLocal {- ^ Intra-application DND. -} | DragProtocolWayland {- ^ Wayland DND protocol. -} | AnotherDragProtocol Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum DragProtocol where fromEnum DragProtocolNone = 0 fromEnum DragProtocolMotif = 1 fromEnum DragProtocolXdnd = 2 fromEnum DragProtocolRootwin = 3 fromEnum DragProtocolWin32Dropfiles = 4 fromEnum DragProtocolOle2 = 5 fromEnum DragProtocolLocal = 6 fromEnum DragProtocolWayland = 7 fromEnum (AnotherDragProtocol k) = k toEnum 0 = DragProtocolNone toEnum 1 = DragProtocolMotif toEnum 2 = DragProtocolXdnd toEnum 3 = DragProtocolRootwin toEnum 4 = DragProtocolWin32Dropfiles toEnum 5 = DragProtocolOle2 toEnum 6 = DragProtocolLocal toEnum 7 = DragProtocolWayland toEnum k = AnotherDragProtocol k instance P.Ord DragProtocol where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_drag_protocol_get_type" c_gdk_drag_protocol_get_type :: IO GType instance BoxedEnum DragProtocol where boxedEnumType _ = c_gdk_drag_protocol_get_type -- Enum DragCancelReason {- | Used in 'GI.Gdk.Objects.DragContext.DragContext' to the reason of a cancelled DND operation. /Since: 3.20/ -} data DragCancelReason = DragCancelReasonNoTarget {- ^ There is no suitable drop target. -} | DragCancelReasonUserCancelled {- ^ Drag cancelled by the user -} | DragCancelReasonError {- ^ Unspecified error. -} | AnotherDragCancelReason Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum DragCancelReason where fromEnum DragCancelReasonNoTarget = 0 fromEnum DragCancelReasonUserCancelled = 1 fromEnum DragCancelReasonError = 2 fromEnum (AnotherDragCancelReason k) = k toEnum 0 = DragCancelReasonNoTarget toEnum 1 = DragCancelReasonUserCancelled toEnum 2 = DragCancelReasonError toEnum k = AnotherDragCancelReason k instance P.Ord DragCancelReason where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_drag_cancel_reason_get_type" c_gdk_drag_cancel_reason_get_type :: IO GType instance BoxedEnum DragCancelReason where boxedEnumType _ = c_gdk_drag_cancel_reason_get_type -- Enum DeviceType {- | Indicates the device type. See [above][GdkDeviceManager.description] for more information about the meaning of these device types. -} data DeviceType = DeviceTypeMaster {- ^ Device is a master (or virtual) device. There will be an associated focus indicator on the screen. -} | DeviceTypeSlave {- ^ Device is a slave (or physical) device. -} | DeviceTypeFloating {- ^ Device is a physical device, currently not attached to any virtual device. -} | AnotherDeviceType Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum DeviceType where fromEnum DeviceTypeMaster = 0 fromEnum DeviceTypeSlave = 1 fromEnum DeviceTypeFloating = 2 fromEnum (AnotherDeviceType k) = k toEnum 0 = DeviceTypeMaster toEnum 1 = DeviceTypeSlave toEnum 2 = DeviceTypeFloating toEnum k = AnotherDeviceType k instance P.Ord DeviceType where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_device_type_get_type" c_gdk_device_type_get_type :: IO GType instance BoxedEnum DeviceType where boxedEnumType _ = c_gdk_device_type_get_type -- Enum DeviceToolType {- | Indicates the specific type of tool being used being a tablet. Such as an airbrush, pencil, etc. /Since: 3.22/ -} data DeviceToolType = DeviceToolTypeUnknown {- ^ Tool is of an unknown type. -} | DeviceToolTypePen {- ^ Tool is a standard tablet stylus. -} | DeviceToolTypeEraser {- ^ Tool is standard tablet eraser. -} | DeviceToolTypeBrush {- ^ Tool is a brush stylus. -} | DeviceToolTypePencil {- ^ Tool is a pencil stylus. -} | DeviceToolTypeAirbrush {- ^ Tool is an airbrush stylus. -} | DeviceToolTypeMouse {- ^ Tool is a mouse. -} | DeviceToolTypeLens {- ^ Tool is a lens cursor. -} | AnotherDeviceToolType Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum DeviceToolType where fromEnum DeviceToolTypeUnknown = 0 fromEnum DeviceToolTypePen = 1 fromEnum DeviceToolTypeEraser = 2 fromEnum DeviceToolTypeBrush = 3 fromEnum DeviceToolTypePencil = 4 fromEnum DeviceToolTypeAirbrush = 5 fromEnum DeviceToolTypeMouse = 6 fromEnum DeviceToolTypeLens = 7 fromEnum (AnotherDeviceToolType k) = k toEnum 0 = DeviceToolTypeUnknown toEnum 1 = DeviceToolTypePen toEnum 2 = DeviceToolTypeEraser toEnum 3 = DeviceToolTypeBrush toEnum 4 = DeviceToolTypePencil toEnum 5 = DeviceToolTypeAirbrush toEnum 6 = DeviceToolTypeMouse toEnum 7 = DeviceToolTypeLens toEnum k = AnotherDeviceToolType k instance P.Ord DeviceToolType where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_device_tool_type_get_type" c_gdk_device_tool_type_get_type :: IO GType instance BoxedEnum DeviceToolType where boxedEnumType _ = c_gdk_device_tool_type_get_type -- Enum DevicePadFeature {- | A pad feature. -} data DevicePadFeature = DevicePadFeatureButton {- ^ a button -} | DevicePadFeatureRing {- ^ a ring-shaped interactive area -} | DevicePadFeatureStrip {- ^ a straight interactive area -} | AnotherDevicePadFeature Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum DevicePadFeature where fromEnum DevicePadFeatureButton = 0 fromEnum DevicePadFeatureRing = 1 fromEnum DevicePadFeatureStrip = 2 fromEnum (AnotherDevicePadFeature k) = k toEnum 0 = DevicePadFeatureButton toEnum 1 = DevicePadFeatureRing toEnum 2 = DevicePadFeatureStrip toEnum k = AnotherDevicePadFeature k instance P.Ord DevicePadFeature where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_device_pad_feature_get_type" c_gdk_device_pad_feature_get_type :: IO GType instance BoxedEnum DevicePadFeature where boxedEnumType _ = c_gdk_device_pad_feature_get_type -- Enum CursorType {- | Predefined cursors. Note that these IDs are directly taken from the X cursor font, and many of these cursors are either not useful, or are not available on other platforms. The recommended way to create cursors is to use 'GI.Gdk.Objects.Cursor.cursorNewFromName'. -} data CursorType = CursorTypeXCursor {- ^ <> -} | CursorTypeArrow {- ^ <> -} | CursorTypeBasedArrowDown {- ^ <> -} | CursorTypeBasedArrowUp {- ^ <> -} | CursorTypeBoat {- ^ <> -} | CursorTypeBogosity {- ^ <> -} | CursorTypeBottomLeftCorner {- ^ <> -} | CursorTypeBottomRightCorner {- ^ <> -} | CursorTypeBottomSide {- ^ <> -} | CursorTypeBottomTee {- ^ <> -} | CursorTypeBoxSpiral {- ^ <> -} | CursorTypeCenterPtr {- ^ <> -} | CursorTypeCircle {- ^ <> -} | CursorTypeClock {- ^ <> -} | CursorTypeCoffeeMug {- ^ <> -} | CursorTypeCross {- ^ <> -} | CursorTypeCrossReverse {- ^ <> -} | CursorTypeCrosshair {- ^ <> -} | CursorTypeDiamondCross {- ^ <> -} | CursorTypeDot {- ^ <> -} | CursorTypeDotbox {- ^ <> -} | CursorTypeDoubleArrow {- ^ <> -} | CursorTypeDraftLarge {- ^ <> -} | CursorTypeDraftSmall {- ^ <> -} | CursorTypeDrapedBox {- ^ <> -} | CursorTypeExchange {- ^ <> -} | CursorTypeFleur {- ^ <> -} | CursorTypeGobbler {- ^ <> -} | CursorTypeGumby {- ^ <> -} | CursorTypeHand1 {- ^ <> -} | CursorTypeHand2 {- ^ <> -} | CursorTypeHeart {- ^ <> -} | CursorTypeIcon {- ^ <> -} | CursorTypeIronCross {- ^ <> -} | CursorTypeLeftPtr {- ^ <> -} | CursorTypeLeftSide {- ^ <> -} | CursorTypeLeftTee {- ^ <> -} | CursorTypeLeftbutton {- ^ <> -} | CursorTypeLlAngle {- ^ <> -} | CursorTypeLrAngle {- ^ <> -} | CursorTypeMan {- ^ <> -} | CursorTypeMiddlebutton {- ^ <> -} | CursorTypeMouse {- ^ <> -} | CursorTypePencil {- ^ <> -} | CursorTypePirate {- ^ <> -} | CursorTypePlus {- ^ <> -} | CursorTypeQuestionArrow {- ^ <> -} | CursorTypeRightPtr {- ^ <> -} | CursorTypeRightSide {- ^ <> -} | CursorTypeRightTee {- ^ <> -} | CursorTypeRightbutton {- ^ <> -} | CursorTypeRtlLogo {- ^ <> -} | CursorTypeSailboat {- ^ <> -} | CursorTypeSbDownArrow {- ^ <> -} | CursorTypeSbHDoubleArrow {- ^ <> -} | CursorTypeSbLeftArrow {- ^ <> -} | CursorTypeSbRightArrow {- ^ <> -} | CursorTypeSbUpArrow {- ^ <> -} | CursorTypeSbVDoubleArrow {- ^ <> -} | CursorTypeShuttle {- ^ <> -} | CursorTypeSizing {- ^ <> -} | CursorTypeSpider {- ^ <> -} | CursorTypeSpraycan {- ^ <> -} | CursorTypeStar {- ^ <> -} | CursorTypeTarget {- ^ <> -} | CursorTypeTcross {- ^ <> -} | CursorTypeTopLeftArrow {- ^ <> -} | CursorTypeTopLeftCorner {- ^ <> -} | CursorTypeTopRightCorner {- ^ <> -} | CursorTypeTopSide {- ^ <> -} | CursorTypeTopTee {- ^ <> -} | CursorTypeTrek {- ^ <> -} | CursorTypeUlAngle {- ^ <> -} | CursorTypeUmbrella {- ^ <> -} | CursorTypeUrAngle {- ^ <> -} | CursorTypeWatch {- ^ <> -} | CursorTypeXterm {- ^ <> -} | CursorTypeLastCursor {- ^ last cursor type -} | CursorTypeBlankCursor {- ^ Blank cursor. Since 2.16 -} | CursorTypeCursorIsPixmap {- ^ type of cursors constructed with 'GI.Gdk.Objects.Cursor.cursorNewFromPixbuf' -} | AnotherCursorType Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum CursorType where fromEnum CursorTypeXCursor = 0 fromEnum CursorTypeArrow = 2 fromEnum CursorTypeBasedArrowDown = 4 fromEnum CursorTypeBasedArrowUp = 6 fromEnum CursorTypeBoat = 8 fromEnum CursorTypeBogosity = 10 fromEnum CursorTypeBottomLeftCorner = 12 fromEnum CursorTypeBottomRightCorner = 14 fromEnum CursorTypeBottomSide = 16 fromEnum CursorTypeBottomTee = 18 fromEnum CursorTypeBoxSpiral = 20 fromEnum CursorTypeCenterPtr = 22 fromEnum CursorTypeCircle = 24 fromEnum CursorTypeClock = 26 fromEnum CursorTypeCoffeeMug = 28 fromEnum CursorTypeCross = 30 fromEnum CursorTypeCrossReverse = 32 fromEnum CursorTypeCrosshair = 34 fromEnum CursorTypeDiamondCross = 36 fromEnum CursorTypeDot = 38 fromEnum CursorTypeDotbox = 40 fromEnum CursorTypeDoubleArrow = 42 fromEnum CursorTypeDraftLarge = 44 fromEnum CursorTypeDraftSmall = 46 fromEnum CursorTypeDrapedBox = 48 fromEnum CursorTypeExchange = 50 fromEnum CursorTypeFleur = 52 fromEnum CursorTypeGobbler = 54 fromEnum CursorTypeGumby = 56 fromEnum CursorTypeHand1 = 58 fromEnum CursorTypeHand2 = 60 fromEnum CursorTypeHeart = 62 fromEnum CursorTypeIcon = 64 fromEnum CursorTypeIronCross = 66 fromEnum CursorTypeLeftPtr = 68 fromEnum CursorTypeLeftSide = 70 fromEnum CursorTypeLeftTee = 72 fromEnum CursorTypeLeftbutton = 74 fromEnum CursorTypeLlAngle = 76 fromEnum CursorTypeLrAngle = 78 fromEnum CursorTypeMan = 80 fromEnum CursorTypeMiddlebutton = 82 fromEnum CursorTypeMouse = 84 fromEnum CursorTypePencil = 86 fromEnum CursorTypePirate = 88 fromEnum CursorTypePlus = 90 fromEnum CursorTypeQuestionArrow = 92 fromEnum CursorTypeRightPtr = 94 fromEnum CursorTypeRightSide = 96 fromEnum CursorTypeRightTee = 98 fromEnum CursorTypeRightbutton = 100 fromEnum CursorTypeRtlLogo = 102 fromEnum CursorTypeSailboat = 104 fromEnum CursorTypeSbDownArrow = 106 fromEnum CursorTypeSbHDoubleArrow = 108 fromEnum CursorTypeSbLeftArrow = 110 fromEnum CursorTypeSbRightArrow = 112 fromEnum CursorTypeSbUpArrow = 114 fromEnum CursorTypeSbVDoubleArrow = 116 fromEnum CursorTypeShuttle = 118 fromEnum CursorTypeSizing = 120 fromEnum CursorTypeSpider = 122 fromEnum CursorTypeSpraycan = 124 fromEnum CursorTypeStar = 126 fromEnum CursorTypeTarget = 128 fromEnum CursorTypeTcross = 130 fromEnum CursorTypeTopLeftArrow = 132 fromEnum CursorTypeTopLeftCorner = 134 fromEnum CursorTypeTopRightCorner = 136 fromEnum CursorTypeTopSide = 138 fromEnum CursorTypeTopTee = 140 fromEnum CursorTypeTrek = 142 fromEnum CursorTypeUlAngle = 144 fromEnum CursorTypeUmbrella = 146 fromEnum CursorTypeUrAngle = 148 fromEnum CursorTypeWatch = 150 fromEnum CursorTypeXterm = 152 fromEnum CursorTypeLastCursor = 153 fromEnum CursorTypeBlankCursor = -2 fromEnum CursorTypeCursorIsPixmap = -1 fromEnum (AnotherCursorType k) = k toEnum 0 = CursorTypeXCursor toEnum 2 = CursorTypeArrow toEnum 4 = CursorTypeBasedArrowDown toEnum 6 = CursorTypeBasedArrowUp toEnum 8 = CursorTypeBoat toEnum 10 = CursorTypeBogosity toEnum 12 = CursorTypeBottomLeftCorner toEnum 14 = CursorTypeBottomRightCorner toEnum 16 = CursorTypeBottomSide toEnum 18 = CursorTypeBottomTee toEnum 20 = CursorTypeBoxSpiral toEnum 22 = CursorTypeCenterPtr toEnum 24 = CursorTypeCircle toEnum 26 = CursorTypeClock toEnum 28 = CursorTypeCoffeeMug toEnum 30 = CursorTypeCross toEnum 32 = CursorTypeCrossReverse toEnum 34 = CursorTypeCrosshair toEnum 36 = CursorTypeDiamondCross toEnum 38 = CursorTypeDot toEnum 40 = CursorTypeDotbox toEnum 42 = CursorTypeDoubleArrow toEnum 44 = CursorTypeDraftLarge toEnum 46 = CursorTypeDraftSmall toEnum 48 = CursorTypeDrapedBox toEnum 50 = CursorTypeExchange toEnum 52 = CursorTypeFleur toEnum 54 = CursorTypeGobbler toEnum 56 = CursorTypeGumby toEnum 58 = CursorTypeHand1 toEnum 60 = CursorTypeHand2 toEnum 62 = CursorTypeHeart toEnum 64 = CursorTypeIcon toEnum 66 = CursorTypeIronCross toEnum 68 = CursorTypeLeftPtr toEnum 70 = CursorTypeLeftSide toEnum 72 = CursorTypeLeftTee toEnum 74 = CursorTypeLeftbutton toEnum 76 = CursorTypeLlAngle toEnum 78 = CursorTypeLrAngle toEnum 80 = CursorTypeMan toEnum 82 = CursorTypeMiddlebutton toEnum 84 = CursorTypeMouse toEnum 86 = CursorTypePencil toEnum 88 = CursorTypePirate toEnum 90 = CursorTypePlus toEnum 92 = CursorTypeQuestionArrow toEnum 94 = CursorTypeRightPtr toEnum 96 = CursorTypeRightSide toEnum 98 = CursorTypeRightTee toEnum 100 = CursorTypeRightbutton toEnum 102 = CursorTypeRtlLogo toEnum 104 = CursorTypeSailboat toEnum 106 = CursorTypeSbDownArrow toEnum 108 = CursorTypeSbHDoubleArrow toEnum 110 = CursorTypeSbLeftArrow toEnum 112 = CursorTypeSbRightArrow toEnum 114 = CursorTypeSbUpArrow toEnum 116 = CursorTypeSbVDoubleArrow toEnum 118 = CursorTypeShuttle toEnum 120 = CursorTypeSizing toEnum 122 = CursorTypeSpider toEnum 124 = CursorTypeSpraycan toEnum 126 = CursorTypeStar toEnum 128 = CursorTypeTarget toEnum 130 = CursorTypeTcross toEnum 132 = CursorTypeTopLeftArrow toEnum 134 = CursorTypeTopLeftCorner toEnum 136 = CursorTypeTopRightCorner toEnum 138 = CursorTypeTopSide toEnum 140 = CursorTypeTopTee toEnum 142 = CursorTypeTrek toEnum 144 = CursorTypeUlAngle toEnum 146 = CursorTypeUmbrella toEnum 148 = CursorTypeUrAngle toEnum 150 = CursorTypeWatch toEnum 152 = CursorTypeXterm toEnum 153 = CursorTypeLastCursor toEnum -2 = CursorTypeBlankCursor toEnum -1 = CursorTypeCursorIsPixmap toEnum k = AnotherCursorType k instance P.Ord CursorType where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_cursor_type_get_type" c_gdk_cursor_type_get_type :: IO GType instance BoxedEnum CursorType where boxedEnumType _ = c_gdk_cursor_type_get_type -- Enum CrossingMode {- | Specifies the crossing mode for 'GI.Gdk.Structs.EventCrossing.EventCrossing'. -} data CrossingMode = CrossingModeNormal {- ^ crossing because of pointer motion. -} | CrossingModeGrab {- ^ crossing because a grab is activated. -} | CrossingModeUngrab {- ^ crossing because a grab is deactivated. -} | CrossingModeGtkGrab {- ^ crossing because a GTK+ grab is activated. -} | CrossingModeGtkUngrab {- ^ crossing because a GTK+ grab is deactivated. -} | CrossingModeStateChanged {- ^ crossing because a GTK+ widget changed state (e.g. sensitivity). -} | CrossingModeTouchBegin {- ^ crossing because a touch sequence has begun, this event is synthetic as the pointer might have not left the window. -} | CrossingModeTouchEnd {- ^ crossing because a touch sequence has ended, this event is synthetic as the pointer might have not left the window. -} | CrossingModeDeviceSwitch {- ^ crossing because of a device switch (i.e. a mouse taking control of the pointer after a touch device), this event is synthetic as the pointer didn’t leave the window. -} | AnotherCrossingMode Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum CrossingMode where fromEnum CrossingModeNormal = 0 fromEnum CrossingModeGrab = 1 fromEnum CrossingModeUngrab = 2 fromEnum CrossingModeGtkGrab = 3 fromEnum CrossingModeGtkUngrab = 4 fromEnum CrossingModeStateChanged = 5 fromEnum CrossingModeTouchBegin = 6 fromEnum CrossingModeTouchEnd = 7 fromEnum CrossingModeDeviceSwitch = 8 fromEnum (AnotherCrossingMode k) = k toEnum 0 = CrossingModeNormal toEnum 1 = CrossingModeGrab toEnum 2 = CrossingModeUngrab toEnum 3 = CrossingModeGtkGrab toEnum 4 = CrossingModeGtkUngrab toEnum 5 = CrossingModeStateChanged toEnum 6 = CrossingModeTouchBegin toEnum 7 = CrossingModeTouchEnd toEnum 8 = CrossingModeDeviceSwitch toEnum k = AnotherCrossingMode k instance P.Ord CrossingMode where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_crossing_mode_get_type" c_gdk_crossing_mode_get_type :: IO GType instance BoxedEnum CrossingMode where boxedEnumType _ = c_gdk_crossing_mode_get_type -- Enum ByteOrder {- | A set of values describing the possible byte-orders for storing pixel values in memory. -} data ByteOrder = ByteOrderLsbFirst {- ^ The values are stored with the least-significant byte first. For instance, the 32-bit value 0xffeecc would be stored in memory as 0xcc, 0xee, 0xff, 0x00. -} | ByteOrderMsbFirst {- ^ The values are stored with the most-significant byte first. For instance, the 32-bit value 0xffeecc would be stored in memory as 0x00, 0xff, 0xee, 0xcc. -} | AnotherByteOrder Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum ByteOrder where fromEnum ByteOrderLsbFirst = 0 fromEnum ByteOrderMsbFirst = 1 fromEnum (AnotherByteOrder k) = k toEnum 0 = ByteOrderLsbFirst toEnum 1 = ByteOrderMsbFirst toEnum k = AnotherByteOrder k instance P.Ord ByteOrder where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_byte_order_get_type" c_gdk_byte_order_get_type :: IO GType instance BoxedEnum ByteOrder where boxedEnumType _ = c_gdk_byte_order_get_type -- Enum AxisUse {- | An enumeration describing the way in which a device axis (valuator) maps onto the predefined valuator types that GTK+ understands. Note that the X and Y axes are not really needed; pointer devices report their location via the x\/y members of events regardless. Whether X and Y are present as axes depends on the GDK backend. -} data AxisUse = AxisUseIgnore {- ^ the axis is ignored. -} | AxisUseX {- ^ the axis is used as the x axis. -} | AxisUseY {- ^ the axis is used as the y axis. -} | AxisUsePressure {- ^ the axis is used for pressure information. -} | AxisUseXtilt {- ^ the axis is used for x tilt information. -} | AxisUseYtilt {- ^ the axis is used for y tilt information. -} | AxisUseWheel {- ^ the axis is used for wheel information. -} | AxisUseDistance {- ^ the axis is used for pen\/tablet distance information. (Since: 3.22) -} | AxisUseRotation {- ^ the axis is used for pen rotation information. (Since: 3.22) -} | AxisUseSlider {- ^ the axis is used for pen slider information. (Since: 3.22) -} | AxisUseLast {- ^ a constant equal to the numerically highest axis value. -} | AnotherAxisUse Int -- ^ Catch-all for unknown values deriving (Show, Eq) instance P.Enum AxisUse where fromEnum AxisUseIgnore = 0 fromEnum AxisUseX = 1 fromEnum AxisUseY = 2 fromEnum AxisUsePressure = 3 fromEnum AxisUseXtilt = 4 fromEnum AxisUseYtilt = 5 fromEnum AxisUseWheel = 6 fromEnum AxisUseDistance = 7 fromEnum AxisUseRotation = 8 fromEnum AxisUseSlider = 9 fromEnum AxisUseLast = 10 fromEnum (AnotherAxisUse k) = k toEnum 0 = AxisUseIgnore toEnum 1 = AxisUseX toEnum 2 = AxisUseY toEnum 3 = AxisUsePressure toEnum 4 = AxisUseXtilt toEnum 5 = AxisUseYtilt toEnum 6 = AxisUseWheel toEnum 7 = AxisUseDistance toEnum 8 = AxisUseRotation toEnum 9 = AxisUseSlider toEnum 10 = AxisUseLast toEnum k = AnotherAxisUse k instance P.Ord AxisUse where compare a b = P.compare (P.fromEnum a) (P.fromEnum b) foreign import ccall "gdk_axis_use_get_type" c_gdk_axis_use_get_type :: IO GType instance BoxedEnum AxisUse where boxedEnumType _ = c_gdk_axis_use_get_type