From 01389117a62537af3b3e2693b70e45d449019a19 Mon Sep 17 00:00:00 2001
From: Jens Nolte <git@queezle.net>
Date: Sun, 26 Sep 2021 17:44:39 +0200
Subject: [PATCH] Implement WireFormat instance for Void

---
 src/Quasar/Wayland/Protocol/Core.hs | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/Quasar/Wayland/Protocol/Core.hs b/src/Quasar/Wayland/Protocol/Core.hs
index 69da977..eaade36 100644
--- a/src/Quasar/Wayland/Protocol/Core.hs
+++ b/src/Quasar/Wayland/Protocol/Core.hs
@@ -174,9 +174,9 @@ instance WireFormat GenericNewId where
   showArgument newId = "new [unknown]@" <> show newId
 
 instance WireFormat Void where
-  putArgument = undefined
-  getArgument = undefined
-  showArgument = undefined
+  putArgument = absurd
+  getArgument = pure <$> get
+  showArgument = absurd
 
 
 -- | Class for a proxy type (in the haskell sense) that describes a Wayland interface.
-- 
GitLab