summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSiri Hansen <siri@erlang.org>2018-10-16 14:56:28 +0200
committerSiri Hansen <siri@erlang.org>2018-10-16 14:56:28 +0200
commitbc57192ba510216dc842e682a7e8876afc047ad3 (patch)
tree5388ff73d5981667198d7e07603cb11ac874c4db
parent5415e60c0b6a17accc33e128c73fa90ccb82c081 (diff)
downloaderlang-bc57192ba510216dc842e682a7e8876afc047ad3.tar.gz
Fix gen_fsm_SUITE:start2/1 to terminate process synchronously
-rw-r--r--lib/stdlib/test/gen_fsm_SUITE.erl2
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/stdlib/test/gen_fsm_SUITE.erl b/lib/stdlib/test/gen_fsm_SUITE.erl
index 41ee3246f5..a8264e5a84 100644
--- a/lib/stdlib/test/gen_fsm_SUITE.erl
+++ b/lib/stdlib/test/gen_fsm_SUITE.erl
@@ -124,8 +124,10 @@ start2(Config) when is_list(Config) ->
{ok, Pid0} = gen_fsm:start(gen_fsm_SUITE, [], []),
ok = do_func_test(Pid0),
ok = do_sync_func_test(Pid0),
+ MRef = monitor(process,Pid0),
shutdown_stopped =
gen_fsm:sync_send_all_state_event(Pid0, stop_shutdown),
+ receive {'DOWN',MRef,_,_,shutdown} -> ok end,
{'EXIT', {noproc,_}} =
(catch gen_fsm:sync_send_event(Pid0, hej)),