diff options
author | Gustav Simonsson <[email protected]> | 2012-04-11 11:50:15 +0200 |
---|---|---|
committer | Gustav Simonsson <[email protected]> | 2012-04-11 11:50:15 +0200 |
commit | aff21f5dffc035dd97215ec1a2c281b84412f29f (patch) | |
tree | 97774bd8ac82bbe6bfe8c5300e83b39db09acfa5 /lib/ssl/test/ssl_test_lib.erl | |
parent | 8929e4d94620c109d31387e6fadfa83b71121a6a (diff) | |
parent | b438fd313917b2e16e5717f12472d5345ca1a976 (diff) | |
download | otp-aff21f5dffc035dd97215ec1a2c281b84412f29f.tar.gz otp-aff21f5dffc035dd97215ec1a2c281b84412f29f.tar.bz2 otp-aff21f5dffc035dd97215ec1a2c281b84412f29f.zip |
Merge branch 'ia/R14B04_ssl_send_user_badarg_patch' into maint-r14
Diffstat (limited to 'lib/ssl/test/ssl_test_lib.erl')
-rw-r--r-- | lib/ssl/test/ssl_test_lib.erl | 23 |
1 files changed, 22 insertions, 1 deletions
diff --git a/lib/ssl/test/ssl_test_lib.erl b/lib/ssl/test/ssl_test_lib.erl index b7916b96eb..2d46453285 100644 --- a/lib/ssl/test/ssl_test_lib.erl +++ b/lib/ssl/test/ssl_test_lib.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 2008-2011. All Rights Reserved. +%% Copyright Ericsson AB 2008-2012. All Rights Reserved. %% %% The contents of this file are subject to the Erlang Public License, %% Version 1.1, (the "License"); you may not use this file except in @@ -673,3 +673,24 @@ cipher_result(Socket, Result) -> session_info_result(Socket) -> ssl:session_info(Socket). + + +receive_rizzo_duong_beast() -> + receive + {ssl, _, "ello\n"} -> + receive + {ssl, _, " "} -> + receive + {ssl, _, "world\n"} -> + ok + end + end + end. + +state([{data,[{"State", State}]} | _]) -> + State; +state([{data,[{"StateData", State}]} | _]) -> + State; +state([_ | Rest]) -> + state(Rest). + |