diff --git a/.gitlab/script/ghcup_release.sh b/.gitlab/script/ghcup_release.sh
index cb3c12a..51b4d47 100755
--- a/.gitlab/script/ghcup_release.sh
+++ b/.gitlab/script/ghcup_release.sh
@@ -19,7 +19,7 @@ if [ "${OS}" = "LINUX" ] ; then
 	if [ "${BIT}" = "32" ] ; then
 		ecabal build -w ghc-${GHC_VERSION} --ghc-options='-split-sections -optl-static' -ftui -ftar
 	else
-		ecabal build -w ghc-${GHC_VERSION} --ghc-options='-split-sections -optl-static' -ftui
+		ecabal build -w ghc-${GHC_VERSION} --ghc-options='-split-sections -optl-static' -ftui -finternal-downloader
 	fi
 elif [ "${OS}" = "FREEBSD" ] ; then
 	ecabal build -w ghc-${GHC_VERSION} --ghc-options='-split-sections' --constraint="zlib static" -ftui
diff --git a/lib/GHCup/Download/Internal.hs b/lib/GHCup/Download/Internal.hs
index e9eb7d3..a32c4a0 100644
--- a/lib/GHCup/Download/Internal.hs
+++ b/lib/GHCup/Download/Internal.hs
@@ -71,6 +71,7 @@ downloadBS' :: (MonadThrow m, MonadIO m)
                  (L.ByteString)
 downloadBS' uri' = do
   bref <- liftIO $ newIORef (mempty :: Builder)
+  -- TODO: performance
   let stepper bs = modifyIORef bref (<> byteString bs)
   downloadInternal False
                    (T.unpack . decUTF8Safe . serializeURIRef' $ uri')