diff options
| author | Björn Gustavsson <[email protected]> | 2016-02-28 13:40:18 +0100 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2016-03-09 13:20:00 +0100 |
| commit | 22785cd1e21600365e71fb0bd2835e5b53de8764 (patch) | |
| tree | 3f8a1a9fe9c138ef89fde4c763a1bc0e2ae704f7 /lib/stdlib/test/sys_SUITE.erl | |
| parent | e59b1c5ad43c010e6d7dd3d2eabc10df156fcc61 (diff) | |
| download | otp-22785cd1e21600365e71fb0bd2835e5b53de8764.tar.gz otp-22785cd1e21600365e71fb0bd2835e5b53de8764.tar.bz2 otp-22785cd1e21600365e71fb0bd2835e5b53de8764.zip | |
Eliminate use of test_server:messages_get/0
Diffstat (limited to 'lib/stdlib/test/sys_SUITE.erl')
| -rw-r--r-- | lib/stdlib/test/sys_SUITE.erl | 11 |
1 files changed, 8 insertions, 3 deletions
diff --git a/lib/stdlib/test/sys_SUITE.erl b/lib/stdlib/test/sys_SUITE.erl index 288361d26c..581fb71a7b 100644 --- a/lib/stdlib/test/sys_SUITE.erl +++ b/lib/stdlib/test/sys_SUITE.erl @@ -150,12 +150,17 @@ install(Config) when is_list(Config) -> ?line {ok,-3} = (catch public_call(3)), ?line sys:remove(?server,SpyFun), ?line {ok,-4} = (catch public_call(4)), - ?line Msgs = test_server:messages_get(), - ?line [{spy_got,{request,1},sys_SUITE_server}, - {spy_got,{request,3},sys_SUITE_server}] = Msgs, + [{spy_got,{request,1},sys_SUITE_server}, + {spy_got,{request,3},sys_SUITE_server}] = get_messages(), ?line stop(), ok. +get_messages() -> + receive + Msg -> [Msg|get_messages()] + after 1 -> [] + end. + special_process(suite) -> []; special_process(Config) when is_list(Config) -> ok = spec_proc(sys_sp1), |