Merge pull request #189 from well-typed/finley/increase-ping-rate-limit

Increase default PING rate limit to 100 per sec
well-typed · Jul 15, 2024 · 77f4ba1 · 77f4ba1
2 parents fd8989c + e6d0f5a
commit 77f4ba1
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/src/Network/GRPC/Common/HTTP2Settings.hs b/src/Network/GRPC/Common/HTTP2Settings.hs
@@ -74,14 +74,14 @@ data HTTP2Settings = HTTP2Settings {
 -- deadlock discussed at 'http2ConnectionWindowSize'.
 --
 -- The ping rate limit imposed by the [@http2@
--- package](https://hackage.haskell.org/package/http2) is not overridden by
--- default.
+-- package](https://hackage.haskell.org/package/http2) is overridden to 100
+-- PINGs/sec.
 defaultHTTP2Settings :: HTTP2Settings
 defaultHTTP2Settings = HTTP2Settings {
       http2MaxConcurrentStreams  = defMaxConcurrentStreams
     , http2StreamWindowSize      = defInitialStreamWindowSize
     , http2ConnectionWindowSize  = defMaxConcurrentStreams * defInitialStreamWindowSize
-    , http2OverridePingRateLimit = Nothing
+    , http2OverridePingRateLimit = Just 100
     }
   where
     defMaxConcurrentStreams    = 128