diff --git a/hasql-notifications.cabal b/hasql-notifications.cabal
--- a/hasql-notifications.cabal
+++ b/hasql-notifications.cabal
@@ -1,5 +1,5 @@
 name:                hasql-notifications
-version:             0.2.2.0
+version:             0.2.2.1
 synopsis:            LISTEN/NOTIFY support for Hasql
 description:         Use PostgreSQL Asynchronous notification support with your Hasql Types.
 homepage:            https://github.com/diogob/hasql-notifications
@@ -19,7 +19,7 @@
   build-depends:       base >= 4.7 && < 5
                      , bytestring >= 0.10.8.2
                      , text >= 2 && < 2.2
-                     , hasql-pool >= 0.4 && < 1.1
+                     , hasql-pool >= 0.5 && < 0.6
                      , bytestring >= 0.10
                      , postgresql-libpq >= 0.9 && < 1.0
                      , hasql >= 0.19
diff --git a/src/Hasql/Notifications.hs b/src/Hasql/Notifications.hs
--- a/src/Hasql/Notifications.hs
+++ b/src/Hasql/Notifications.hs
@@ -17,8 +17,11 @@
     FatalError (..),
   )
 where
-
-import Control.Concurrent (threadDelay, threadWaitRead)
+#if defined(mingw32_HOST_OS)
+import Control.Concurrent ( threadDelay )
+#else
+import Control.Concurrent (threadWaitRead, threadDelay)
+#endif
 import Control.Exception (Exception, throw)
 import Control.Monad (forever, unless, void, when)
 import Data.ByteString.Char8 (ByteString)
@@ -190,9 +193,13 @@
           mfd <- PQ.socket pqCon
           case mfd of
             Nothing -> void $ threadDelay 1000000
+#if defined(mingw32_HOST_OS)
+            Just _ -> do
+              void $ threadDelay 1000000
+#else
             Just fd -> do
               void $ threadWaitRead fd
-
+#endif
               result <- PQ.consumeInput pqCon
               unless result $ do
                 mError <- PQ.errorMessage pqCon