 -- ['NotifyUnknown'] The level change does not fit into any of the other
 -- categories or could not be determined.
 --
-{#enum NotifyType {underscoreToCase}#}
+{#enum NotifyType {underscoreToCase} deriving(Show) #}
 
 -- | in which direction was scrolled?
 --
-{#enum ScrollDirection {underscoreToCase}#}
+{#enum ScrollDirection {underscoreToCase} deriving(Show) #}
 
 -- | Determine if child widget may be overdrawn.
 --
-{#enum SubwindowMode {underscoreToCase}#}
+{#enum SubwindowMode {underscoreToCase} deriving(Show) #}
 
 -- | visibility of a window
 --
 {#enum VisibilityState {underscoreToCase,
-			VISIBILITY_PARTIAL as VisibilityPartialObscured}#}
+			VISIBILITY_PARTIAL as VisibilityPartialObscured}
+			 deriving(Show) #}
 
 -- | The state a @DrawWindow@ is in.
 --
-{#enum WindowState {underscoreToCase} deriving (Bounded)#}
+{#enum WindowState {underscoreToCase} deriving (Bounded,Show)#}
 
 instance Flags WindowState
 
 -- | Determines a window edge or corner.
 --
-{#enum WindowEdge {underscoreToCase} #}
+{#enum WindowEdge {underscoreToCase} deriving(Show) #}
 
 -- | 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


-- | specify which input extension a widget desires
--
{#enum ExtensionMode {underscoreToCase} deriving(Bounded)#}

instance Flags ExtensionMode

-- | How objects are filled.
--
{#enum Fill {underscoreToCase}#}

-- | Determine how bitmap operations are carried out.
--
{#enum Function {underscoreToCase}#}

-- | Specify on what file condition a callback should be
-- done.

--
-- [@GrabFrozen@] the resource is frozen by an active grab of another client.
--
{#enum GrabStatus {underscoreToCase} deriving(Show) #}

