diff options
Diffstat (limited to 'wayland/Wayland/Server')
| -rw-r--r-- | wayland/Wayland/Server/System.hsc | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/wayland/Wayland/Server/System.hsc b/wayland/Wayland/Server/System.hsc index 60940ce..f758a65 100644 --- a/wayland/Wayland/Server/System.hsc +++ b/wayland/Wayland/Server/System.hsc @@ -12,6 +12,7 @@ data WLMessage , msgSignature :: CString , msgTypes :: Ptr (Ptr WLInterface) } + deriving (Show) data WLInterface = WLInterface { ifName :: CString @@ -21,6 +22,7 @@ data WLInterface , ifEventCount :: CInt , ifEvents :: Ptr WLMessage } + deriving (Show) newtype WLDisplay = WLDisplay (Ptr WLDisplay) newtype WLEventLoop = WLEventLoop (Ptr WLEventLoop) |