From a29790e9f9cbccba61590f443b0d13ea5b19dea8 Mon Sep 17 00:00:00 2001
From: Neil Mitchell <ndmitchell@gmail.com>
Date: Sun, 14 Jan 2024 12:34:07 +0000
Subject: [PATCH] Disable the self-test everywhere

---
 src/Test/Self.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/Test/Self.hs b/src/Test/Self.hs
index ea5ab296..7df7f307 100644
--- a/src/Test/Self.hs
+++ b/src/Test/Self.hs
@@ -19,8 +19,8 @@ newtype GhcFlags = GhcFlags () deriving (Show,Typeable,Eq,Hashable,Binary,NFData
 type instance RuleResult GhcPkg = [String]
 type instance RuleResult GhcFlags = [String]
 
--- Doesn't work on the Windows CI for reasons I don't understand
-main = testBuild (notWindowsCI . defaultTest) $ do
+-- Doesn't work on CI, seems self-building under `cabal test` is just hard
+main = testBuild (notCI . defaultTest) $ do
     let moduleToFile ext xs = replace "." "/" xs <.> ext
     want ["Main" <.> exe]