diff options
| author | Raimo Niskanen <[email protected]> | 2018-10-25 14:15:27 +0200 |
|---|---|---|
| committer | Raimo Niskanen <[email protected]> | 2018-11-16 14:40:44 +0100 |
| commit | 5d530cdfa1f6d7a75f8933b8ce95df8fdbb82b9e (patch) | |
| tree | e3b0327604bff195b5112d9de6a50be1de01eb31 /lib/stdlib/test/gen_fsm_SUITE.erl | |
| parent | 53850d6c310643393185819c179efd4b866943fe (diff) | |
| download | otp-5d530cdfa1f6d7a75f8933b8ce95df8fdbb82b9e.tar.gz otp-5d530cdfa1f6d7a75f8933b8ce95df8fdbb82b9e.tar.bz2 otp-5d530cdfa1f6d7a75f8933b8ce95df8fdbb82b9e.zip | |
Add client stacktrace
Diffstat (limited to 'lib/stdlib/test/gen_fsm_SUITE.erl')
| -rw-r--r-- | lib/stdlib/test/gen_fsm_SUITE.erl | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/lib/stdlib/test/gen_fsm_SUITE.erl b/lib/stdlib/test/gen_fsm_SUITE.erl index 41ee3246f5..4c463ff0d2 100644 --- a/lib/stdlib/test/gen_fsm_SUITE.erl +++ b/lib/stdlib/test/gen_fsm_SUITE.erl @@ -519,14 +519,16 @@ error_format_status(Config) when is_list(Config) -> error_logger_forwarder:register(), OldFl = process_flag(trap_exit, true), StateData = "called format_status", + Parent = self(), {ok, Pid} = gen_fsm:start(gen_fsm_SUITE, {state_data, StateData}, []), %% bad return value in the gen_fsm loop {'EXIT',{{bad_return_value, badreturn},_}} = (catch gen_fsm:sync_send_event(Pid, badreturn)), receive {error,_GroupLeader,{Pid, - "** State machine"++_, - [Pid,{_,_,badreturn},idle,{formatted,StateData},_]}} -> + "** State machine "++_, + [Pid,badreturn,{Parent,_},idle,{formatted,StateData}, + {bad_return_value,badreturn}|_]}} -> ok; Other -> io:format("Unexpected: ~p", [Other]), @@ -539,12 +541,14 @@ terminate_crash_format(Config) when is_list(Config) -> error_logger_forwarder:register(), OldFl = process_flag(trap_exit, true), StateData = crash_terminate, + Parent = self(), {ok, Pid} = gen_fsm:start(gen_fsm_SUITE, {state_data, StateData}, []), stop_it(Pid), receive {error,_GroupLeader,{Pid, - "** State machine"++_, - [Pid,{_,_,_},idle,{formatted, StateData},_]}} -> + "** State machine "++_, + [Pid,stop,{Parent,_},idle,{formatted, StateData}, + {crash,terminate}|_]}} -> ok; Other -> io:format("Unexpected: ~p", [Other]), |