File 1084-Fix-old-timing-sensitive-test-case.patch of Package erlang
From 190c41be15a6e56a0702952bd7b37faa1ac5d1dd Mon Sep 17 00:00:00 2001
From: Raimo Niskanen <raimo@erlang.org>
Date: Wed, 11 Feb 2026 19:22:20 +0100
Subject: [PATCH 4/5] Fix old timing sensitive test case
---
lib/tftp/test/tftp_SUITE.erl | 7 ++++++-
1 file changed, 6 insertions(+), 1 deletion(-)
diff --git a/lib/tftp/test/tftp_SUITE.erl b/lib/tftp/test/tftp_SUITE.erl
index a84d608bd7..1d26871d10 100644
--- a/lib/tftp/test/tftp_SUITE.erl
+++ b/lib/tftp/test/tftp_SUITE.erl
@@ -787,11 +787,16 @@ resend_read_server(Host, BlkSize) ->
Data6Bin = list_to_binary([0, 3, 0, 6 | Block6]),
?VERIFY(ok, gen_udp:send(ServerSocket, Host, ClientPort, Data6Bin)),
+ %% Recv ACK #6
+ Ack6Bin = <<0, 4, 0, 6>>,
+ ?VERIFY({udp, ServerSocket, Host, ClientPort, Ack6Bin}, recv(Timeout)),
+
%% Close daemon and server sockets
?VERIFY(ok, gen_udp:close(ServerSocket)),
?VERIFY(ok, gen_udp:close(DaemonSocket)),
- ?VERIFY({ClientPid, {tftp_client_reply, {ok, Blob}}}, recv(Timeout)),
+ ?VERIFY({ClientPid, {tftp_client_reply, {ok, Blob}}},
+ recv(2 * (Timeout + timer:seconds(1)))),
?VERIFY(timeout, recv(Timeout)),
ok.
--
2.51.0