From 71451df3872af807ea79ec52ee5a7ce4fd62908f Mon Sep 17 00:00:00 2001
From: nek0 <nek0@nek0.eu>
Date: Sun, 10 Dec 2023 12:57:36 +0100
Subject: [PATCH] some comments

---
 src-client/Main.hs | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src-client/Main.hs b/src-client/Main.hs
index 09a815c..38d32e1 100644
--- a/src-client/Main.hs
+++ b/src-client/Main.hs
@@ -17,11 +17,13 @@ main = do
   (Options socketLocation) <- execParser opts
   putStrLn $ "connecting to Socket " <> socketLocation
   handle <- connectSocket socketLocation
+  -- mock communication code
   hPutStrLn handle "meow!"
   hFlush handle
   threadDelay $ 5 * 10 ^ 6
   hPutStrLn handle "Goodbye!"
   hFlush handle
+  -- end mock
   where
     opts = info (options <**> helper)
       ( fullDesc