diff --git a/ChangeLog.md b/ChangeLog.md
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -1,5 +1,9 @@
 # Revision history for mysql-haskell
 
+## 0.8.4.3 -- 2020-11-04
+
+* Fix build with GHC 8.8.
+
 ## 0.8.4.2 -- 2019-01-22
 
 * Fix [stackage#4312](https://github.com/commercialhaskell/stackage/issues/4312): Relax `network` bounds.
diff --git a/Database/MySQL/Protocol/Command.hs b/Database/MySQL/Protocol/Command.hs
--- a/Database/MySQL/Protocol/Command.hs
+++ b/Database/MySQL/Protocol/Command.hs
@@ -83,7 +83,7 @@
 
 putCommand (COM_STMT_CLOSE stid) = putWord8 0x19 >> putWord32le stid
 putCommand (COM_STMT_RESET stid) = putWord8 0x1A >> putWord32le stid
-putCommand _                     = fail "unsupported command"
+putCommand _                     = error "unsupported command"
 
 --------------------------------------------------------------------------------
 --  Prepared statment related
diff --git a/Database/MySQL/TLS.hs b/Database/MySQL/TLS.hs
--- a/Database/MySQL/TLS.hs
+++ b/Database/MySQL/TLS.hs
@@ -66,7 +66,7 @@
                     if isOK q
                     then do
                         consumed <- newIORef True
-                        let conn = MySQLConn tlsIs' (write c) (TCP.close c) consumed
+                        let conn = MySQLConn tlsIs' (write tc) (TCP.close tc) consumed
                         return (greet, conn)
                     else TCP.close c >> decodeFromPacket q >>= throwIO . ERRException
             else error "Database.MySQL.TLS: server doesn't support TLS connection"
diff --git a/mysql-haskell.cabal b/mysql-haskell.cabal
--- a/mysql-haskell.cabal
+++ b/mysql-haskell.cabal
@@ -1,5 +1,5 @@
 name:                mysql-haskell
-version:             0.8.4.2
+version:             0.8.4.3
 synopsis:            pure haskell MySQL driver
 description:         pure haskell MySQL driver
 license:             BSD3
@@ -45,13 +45,13 @@
                     ,   bytestring    >= 0.10.2.0
                     ,   text          >= 1.1 && < 1.3
                     ,   cryptonite    == 0.*
-                    ,   memory        >= 0.14.4 && < 0.15
+                    ,   memory        >= 0.14.4 && < 0.16
                     ,   time          >= 1.5.0
                     ,   scientific    == 0.3.*
                     ,   bytestring-lexing == 0.5.*
                     ,   blaze-textual     == 0.2.*
                     ,   word24            >= 1.0 && <= 3.0
-                    ,   tls           >= 1.3.5 && < 1.5
+                    ,   tls           >= 1.3.5 && < 1.6
                     ,   vector        >= 0.8
 
     default-language:    Haskell2010
