From 031475b473b0d5c5fb5bae822559435280603ad3 Mon Sep 17 00:00:00 2001 From: shum Date: Fri, 16 Oct 2026 16:08:05 +0000 Subject: [PATCH] tests: run proxy leak tests with test environment --- tests/SMPProxyTests.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/tests/SMPProxyTests.hs b/tests/SMPProxyTests.hs index 98c39c945..5cbb9ae45 100644 --- a/tests/SMPProxyTests.hs +++ b/tests/SMPProxyTests.hs @@ -554,7 +554,7 @@ testProxyReconnectAfterRelayRestart = race_ (threadDelay 1000000) requestRelaySession requireProxyReconnect -testProxyForwardTimeoutStuckSession :: IO () +testProxyForwardTimeoutStuckSession :: HasTestEnv => IO () testProxyForwardTimeoutStuckSession = withSmpServerConfigOn (transport @TLS) proxyCfgForwardTimeout testPort $ \_ -> do g <- C.newRandom @@ -567,7 +567,7 @@ testProxyForwardTimeoutStuckSession = rs <- forM ([1 .. 10] :: [Int]) $ \_ -> runExceptT' (proxySMPMessage pc NRMInteractive sess Nothing sId noMsgFlags "hi") rs `shouldSatisfy` elem (Left (ProxyProtocolError (SMP.PROXY SMP.NO_SESSION))) -testForwardOversizedNotKept :: IO () +testForwardOversizedNotKept :: HasTestEnv => IO () testForwardOversizedNotKept = withSmpServerConfigOn (transport @TLS) proxyCfg testPort $ \_ -> do g <- C.newRandom