enlarging rtt for CI

haskell-tls · Feb 1, 2024 · 4372021 · 4372021
1 parent 4665650
commit 4372021
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/core/Network/TLS/Handshake/Common13.hs b/core/Network/TLS/Handshake/Common13.hs
@@ -590,5 +590,5 @@ setRTT :: Context -> Millisecond -> IO ()
 setRTT ctx chSentTime = do
     shRecvTime <- getCurrentTimeFromBase
     let rtt' = shRecvTime - chSentTime
-        rtt = if rtt' == 0 then 5 else rtt'
+        rtt = if rtt' == 0 then 10 else rtt'
     modifyTLS13State ctx $ \st -> st{tls13stRTT = rtt}