data Modifiers = Shift | Lock | Control | Mod1 | Mod2 | Mod3 | Mod4 | Mod5 | Button1 | Button2 | Button3 | Button4 | Button5 | Any instance Enum Modifiers instance Eq Modifiers instance Ord Modifiers instance Show Modifiers type ModState = [Modifiers] data EventMask = KeyPressMask | KeyReleaseMask | ButtonPressMask | ButtonReleaseMask | EnterWindowMask | LeaveWindowMask | PointerMotionMask | PointerMotionHintMask | Button1MotionMask | Button2MotionMask | Button3MotionMask | Button4MotionMask | Button5MotionMask | ButtonMotionMask | KeymapStateMask | ExposureMask | VisibilityChangeMask | StructureNotifyMask | ResizeRedirectMask | SubstructureNotifyMask | SubstructureRedirectMask | FocusChangeMask | PropertyChangeMask | ColormapChangeMask | OwnerGrabButtonMask instance Enum EventMask instance Eq EventMask instance Ord EventMask instance Show EventMask data Button = AnyButton | Button Int instance Eq Button instance Ord Button instance Show Button data BackingStore = NotUseful | WhenMapped | Always instance Enum BackingStore instance Eq BackingStore instance Ord BackingStore instance Show BackingStore data CoordMode = CoordModeOrigin | CoordModePrevious instance Enum CoordMode instance Eq CoordMode instance Ord CoordMode instance Show CoordMode data Shape = Complex | Nonconvex | Convex instance Enum Shape instance Eq Shape instance Ord Shape instance Show Shape data GrabPointerResult = GrabSuccess | AlreadyGrabbed | GrabInvalidTime | GrabNotViewable | GrabFrozen instance Enum GrabPointerResult instance Eq GrabPointerResult instance Ord GrabPointerResult instance Show GrabPointerResult data WindowAttributes = CWEventMask [EventMask] | CWBackingStore BackingStore | CWSaveUnder Bool | CWDontPropagate [EventMask] | CWOverrideRedirect Bool | CWBackPixel Pixel | CWCursor CursorId | CWBitGravity Gravity | CWWinGravity Gravity | CWBackPixmap PixmapId | CWBorderPixmap PixmapId | CWBorderPixel Pixel instance Eq WindowAttributes instance Ord WindowAttributes instance Show WindowAttributes data WindowChanges = CWX Int | CWY Int | CWWidth Int | CWHeight Int | CWBorderWidth Int | CWStackMode StackMode instance Eq WindowChanges instance Ord WindowChanges instance Show WindowChanges data StackMode = StackAbove | StackBelow | TopIf | BottomIf | Opposite instance Enum StackMode instance Eq StackMode instance Ord StackMode instance Show StackMode data Gravity = ForgetGravity | NorthWestGravity | NorthGravity | NorthEastGravity | WestGravity | CenterGravity | EastGravity | SouthWestGravity | SouthGravity | SouthEastGravity | StaticGravity instance Enum Gravity instance Eq Gravity instance Ord Gravity instance Show Gravity data ShapeKind = ShapeBounding | ShapeClip instance Enum ShapeKind instance Eq ShapeKind instance Ord ShapeKind instance Show ShapeKind data ShapeOperation = ShapeSet | ShapeUnion | ShapeIntersect | ShapeSubtract | ShapeInvert instance Enum ShapeOperation instance Eq ShapeOperation instance Ord ShapeOperation instance Show ShapeOperation data RGB = RGB Int Int Int instance Ix RGB instance Eq RGB instance Ord RGB instance Show RGB data Color = Color Pixel RGB instance Eq Color instance Ord Color instance Show Color
