diff options
author | Raimo Niskanen <[email protected]> | 2017-10-13 15:46:20 +0200 |
---|---|---|
committer | Raimo Niskanen <[email protected]> | 2017-12-04 13:56:30 +0100 |
commit | 057155088f14e111791489a50d25de67065b16ba (patch) | |
tree | f265e4f25feeb985a5621d47ba8254082473ba8a /lib | |
parent | 1b3a894b6ef2f62974228f5904ff7fe469a4926a (diff) | |
download | otp-057155088f14e111791489a50d25de67065b16ba.tar.gz otp-057155088f14e111791489a50d25de67065b16ba.tar.bz2 otp-057155088f14e111791489a50d25de67065b16ba.zip |
Handle whitebox test message
Diffstat (limited to 'lib')
-rw-r--r-- | lib/ssl/src/ssl_connection.erl | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/lib/ssl/src/ssl_connection.erl b/lib/ssl/src/ssl_connection.erl index b1efcbb857..ef64388361 100644 --- a/lib/ssl/src/ssl_connection.erl +++ b/lib/ssl/src/ssl_connection.erl @@ -1034,6 +1034,20 @@ connection( death_row(State, Reason) end; connection( + info, {send, From, Ref, Data}, + #state{ + ssl_options = #ssl_options{erl_dist = true}, + protocol_specific = #{d_handle := _}}, + _) -> + %% This is for testing only! + %% + %% Needed by some OTP distribution + %% test suites... + From ! {Ref, ok}, + {keep_state_and_data, + [{next_event, {call, {self(), undefined}}, + {application_data, iolist_to_binary(Data)}}]}; +connection( info, tick = Msg, #state{ ssl_options = #ssl_options{erl_dist = true}, |