From 2a2739af004f2f8ec5367b17a7f0ae73c083eaf8 Mon Sep 17 00:00:00 2001
From: Nikita Volkov <nikita.y.volkov@mail.ru>
Date: Thu, 26 Aug 2021 10:35:53 +0300
Subject: [PATCH] Get rid of CPP by restricting the "base" dep

---
 library/ListT.hs | 5 -----
 list-t.cabal     | 2 +-
 2 files changed, 1 insertion(+), 6 deletions(-)

diff --git a/library/ListT.hs b/library/ListT.hs
index 7cf368e..a4b9378 100644
--- a/library/ListT.hs
+++ b/library/ListT.hs
@@ -1,4 +1,3 @@
-{-# LANGUAGE CPP #-}
 module ListT
 (
   ListT(..),
@@ -149,10 +148,6 @@ instance Monad m => Monad (ListT m) where
                 return Nothing
               Just (h1, t1) ->
                 uncons $ k2 h1 <> go t1
-#if !MIN_VERSION_base(4,11,0)
-  fail _ =
-    mempty
-#endif
 
 instance Monad m => MonadFail (ListT m) where
   fail _ =
diff --git a/list-t.cabal b/list-t.cabal
index b5f38e6..ddaba3e 100644
--- a/list-t.cabal
+++ b/list-t.cabal
@@ -28,7 +28,7 @@ library
   other-modules:
     ListT.Prelude
   build-depends:
-    base >=4.9 && <5,
+    base >=4.11 && <5,
     foldl >=1 && <2,
     mmorph ==1.*,
     monad-control >=0.3 && <2,