diff --git a/app/Main.hs b/app/Main.hs
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -223,6 +223,8 @@
 
     _gtfo conn HTTP2.NoError _finalMessage
 
+    _close conn
+
     return ()
   where
     tlsParams = TLS.ClientParams {
diff --git a/http2-client.cabal b/http2-client.cabal
--- a/http2-client.cabal
+++ b/http2-client.cabal
@@ -1,5 +1,5 @@
 name:                http2-client
-version:             0.3.0.1
+version:             0.3.0.2
 synopsis:            A native HTTP2 client library.
 description:         Please read the README.md at the homepage.
 homepage:            https://github.com/lucasdicioccio/http2-client
diff --git a/src/Network/HTTP2/Client.hs b/src/Network/HTTP2/Client.hs
--- a/src/Network/HTTP2/Client.hs
+++ b/src/Network/HTTP2/Client.hs
@@ -170,6 +170,8 @@
   -- ^ Returns a function to split a payload.
   , _asyncs         :: !Http2ClientAsyncs
   -- ^ Asynchronous operations threads.
+  , _close           :: IO ()
+  -- ^ Closes the network connection.
   }
 
 -- | Set of Async threads running an Http2Client.
@@ -446,6 +448,8 @@
     aSettings <- async =<< _settings initSettings
 
     let _asyncs = Http2ClientAsyncs aSettings aCredit aHPACK aControl aIncoming
+
+    let _close = closeConnection conn
 
     return $ Http2Client{..}