From 9bf770a7c2e61b8872d75198d16a1d927bac20f6 Mon Sep 17 00:00:00 2001
From: Yuto Takano <moa17stock@gmail.com>
Date: Sat, 10 Aug 2024 09:26:05 +0100
Subject: [PATCH] temp: Check if readDesc is called for sdl

---
 Setup.hs | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/Setup.hs b/Setup.hs
index 06fea91..3bfe506 100644
--- a/Setup.hs
+++ b/Setup.hs
@@ -10,6 +10,7 @@ import Distribution.Simple
     ( Args
     , UserHooks
     , confHook
+    , readDesc
     , defaultMain
     , defaultMainWithHooks
     , simpleUserHooks
@@ -37,6 +38,7 @@ main = case buildOS of
     Windows -> defaultMainWithHooks simpleUserHooks
         { confHook = sdlConfHook
         , preBuild = sdlPreBuild
+        , readDesc = sdlReadDesc
         }
     _ -> defaultMain
 
@@ -86,3 +88,8 @@ sdlPreBuild args flags = do
     print flags
     putStrLn "\ESC[34mRunning custom SDL pre-build hook\ESC[m"
     pure emptyHookedBuildInfo
+
+sdlReadDesc :: IO (GenericPackageDescription)
+sdlReadDesc = do
+    putStrLn "\ESC[34mReading .cabal file\ESC[m"
+    pure Nothing