diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,5 +1,13 @@
 # Revision history for lifted-async
 
+## v0.10.1.1 - 2020-06-29
+
+* Bump up cabal-version to 1.24
+
+## v0.10.1 - 2020-06-29
+
+* Fix typechecking errors with GHC HEAD 8.11 ([#31](https://github.com/maoe/lifted-async/pull/31))
+
 ## v0.10.0.6 - 2020-03-31
 
 * Relax upper version bound for base to suppose GHC 8.10 ([#30](https://github.com/maoe/lifted-async/pull/30))
diff --git a/lifted-async.cabal b/lifted-async.cabal
--- a/lifted-async.cabal
+++ b/lifted-async.cabal
@@ -1,5 +1,6 @@
+cabal-version:       1.24
 name:                lifted-async
-version:             0.10.0.6
+version:             0.10.1.1
 synopsis:            Run lifted IO operations asynchronously and wait for their results
 homepage:            https://github.com/maoe/lifted-async
 bug-reports:         https://github.com/maoe/lifted-async/issues
@@ -10,7 +11,6 @@
 copyright:           Copyright (C) 2012-2020 Mitsutoshi Aoe
 category:            Concurrency
 build-type:          Simple
-cabal-version:       >= 1.8
 tested-with:
   GHC == 8.10.1
   GHC == 8.8.3
@@ -44,6 +44,7 @@
     build-depends: constraints >= 0.2 && < 0.6
   ghc-options: -Wall
   hs-source-dirs: src
+  default-language: Haskell2010
 
 test-suite test-lifted-async
   type: exitcode-stdio-1.0
@@ -66,6 +67,7 @@
     , tasty-expected-failure < 0.12
     , tasty-hunit >= 0.9 && < 0.11
     , tasty-th
+  default-language: Haskell2010
 
 test-suite regression-tests
   type: exitcode-stdio-1.0
@@ -79,6 +81,7 @@
     , mtl
     , tasty-hunit >= 0.9 && < 0.11
     , tasty-th
+  default-language: Haskell2010
 
 benchmark benchmark-lifted-async
   type: exitcode-stdio-1.0
@@ -91,6 +94,7 @@
     , criterion
     , deepseq
     , lifted-async
+  default-language: Haskell2010
 
 benchmark benchmark-lifted-async-threaded
   type: exitcode-stdio-1.0
@@ -103,6 +107,7 @@
     , criterion
     , deepseq
     , lifted-async
+  default-language: Haskell2010
 
 source-repository head
   type: git
diff --git a/src/Control/Concurrent/Async/Lifted.hs b/src/Control/Concurrent/Async/Lifted.hs
--- a/src/Control/Concurrent/Async/Lifted.hs
+++ b/src/Control/Concurrent/Async/Lifted.hs
@@ -448,7 +448,7 @@
     Concurrently $ uncurry ($) <$> concurrently fs as
 
 instance MonadBaseControl IO m => Alternative (Concurrently m) where
-  empty = Concurrently $ liftBaseWith $ const (forever $ threadDelay maxBound)
+  empty = Concurrently $ liftBaseWith $ \_ -> forever $ threadDelay maxBound
   Concurrently as <|> Concurrently bs =
     Concurrently $ either id id <$> race as bs
 
diff --git a/src/Control/Concurrent/Async/Lifted/Safe.hs b/src/Control/Concurrent/Async/Lifted/Safe.hs
--- a/src/Control/Concurrent/Async/Lifted/Safe.hs
+++ b/src/Control/Concurrent/Async/Lifted/Safe.hs
@@ -432,7 +432,7 @@
 
 instance (MonadBaseControl IO m, Forall (Pure m)) =>
   Alternative (Concurrently m) where
-    empty = Concurrently $ liftBaseWith $ const (forever $ threadDelay maxBound)
+    empty = Concurrently $ liftBaseWith $ \_ -> forever $ threadDelay maxBound
     Concurrently (as :: m a) <|> Concurrently bs =
       Concurrently (either id id <$> race as bs)
         \\ (inst :: Forall (Pure m) :- Pure m a)