From 2894e3de3c24186792dde2d040a9f2af7acedb58 Mon Sep 17 00:00:00 2001
From: Jens Nolte <git@queezle.net>
Date: Wed, 8 Sep 2021 02:06:57 +0200
Subject: [PATCH] Remove old code
---
src/Quasar/Wayland/Core.hs | 7 -------
1 file changed, 7 deletions(-)
diff --git a/src/Quasar/Wayland/Core.hs b/src/Quasar/Wayland/Core.hs
index 75c1604..7dc6c5d 100644
--- a/src/Quasar/Wayland/Core.hs
+++ b/src/Quasar/Wayland/Core.hs
@@ -12,8 +12,6 @@ module Quasar.Wayland.Core (
ClientCallback,
ServerCallback,
Callback(..),
- Request,
- Event,
ProtocolStep,
initialProtocolState,
sendMessage,
@@ -181,11 +179,6 @@ data ProtocolState (s :: Side) m = ProtocolState {
objects :: HashMap ObjectId SomeObject
}
-data Request = Request ObjectId Opcode BSL.ByteString
- deriving stock Show
-data Event = Event ObjectId Opcode (Either BSL.ByteString (Word32, BSL.ByteString, Word32))
- deriving stock Show
-
type ClientCallback m i = Callback 'Client m i
type ServerCallback m i = Callback 'Server m i
--
GitLab