diff options
author | Micael Karlberg <bmk@erlang.org> | 2023-03-23 14:57:10 +0100 |
---|---|---|
committer | Micael Karlberg <bmk@erlang.org> | 2023-04-14 11:09:08 +0200 |
commit | 8bae36a32e247ccde38f62f959656cd2c250da2f (patch) | |
tree | ac335120c927bc178800ee164a1c55d18f1815e5 | |
parent | 1f897adc9df5e0de5d5a85633a8629a7e45ddeab (diff) | |
download | erlang-8bae36a32e247ccde38f62f959656cd2c250da2f.tar.gz |
[kernel|esock|test] Fixed async cancel test cases
And some other stuff...
OTP-18029
-rw-r--r-- | lib/kernel/test/socket_SUITE.erl | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/lib/kernel/test/socket_SUITE.erl b/lib/kernel/test/socket_SUITE.erl index 5f0fd15923..ba3663273c 100644 --- a/lib/kernel/test/socket_SUITE.erl +++ b/lib/kernel/test/socket_SUITE.erl @@ -6926,7 +6926,8 @@ api_a_connect_tcp(InitState) -> {ok, State#{asynch_tag => select, connect_tag => ST}}; - {completion, {completion_info, CT, CompletionRef}} + {completion, + {completion_info, CT, CompletionRef}} when SR =:= nowait -> ?SEV_IPRINT("completion nowait ->" "~n tag: ~p" @@ -6935,7 +6936,8 @@ api_a_connect_tcp(InitState) -> {ok, State#{asynch_tag => completion, connect_tag => CT, connect_ref => CompletionRef}}; - {completion, {completion_info, CT, CR}} + {completion, + {completion_info, CT, CR}} when is_reference(CR) -> ?SEV_IPRINT("completion ref ->" "~n tag: ~p" @@ -9488,6 +9490,7 @@ api_a_recv_cancel_tcp(InitState) -> cmd => fun(#{tester := Tester} = _State) -> ?SEV_AWAIT_CONTINUE(Tester, tester, recv) end}, + #{desc => "try recv request (with nowait, expect select|completion)", cmd => fun(#{csock := Sock, recv := Recv, |