Removed fun_stacktrace
* introduced in ad2d57d8b6
* CI/CD uses R23 and onwards
* erlang:get_stacktrace/0 removed in R23.
[1] https://www.erlang.org/doc/general_info/removed#functions-removed-in-otp-23
This commit is contained in:
parent
5de3c80cc2
commit
c0a02892cd
2 changed files with 1 additions and 21 deletions
|
@ -8,11 +8,7 @@
|
||||||
{erl_first_files, ["ec_dictionary", "ec_vsn"]}.
|
{erl_first_files, ["ec_dictionary", "ec_vsn"]}.
|
||||||
|
|
||||||
%% Compiler Options ============================================================
|
%% Compiler Options ============================================================
|
||||||
{erl_opts,
|
{erl_opts, [debug_info, warnings_as_errors]}.
|
||||||
[{platform_define, "^2", unicode_str},
|
|
||||||
{platform_define, "^(R|1|20)", fun_stacktrace},
|
|
||||||
debug_info,
|
|
||||||
warnings_as_errors]}.
|
|
||||||
|
|
||||||
%% EUnit =======================================================================
|
%% EUnit =======================================================================
|
||||||
{eunit_opts, [verbose,
|
{eunit_opts, [verbose,
|
||||||
|
|
|
@ -858,21 +858,6 @@ cluster_runmany(_, _, [_Non|_Empty], []=_Nodes, []=_Running, _) ->
|
||||||
%% We have data, but no nodes either available or occupied
|
%% We have data, but no nodes either available or occupied
|
||||||
erlang:exit(allnodescrashed).
|
erlang:exit(allnodescrashed).
|
||||||
|
|
||||||
-ifdef(fun_stacktrace).
|
|
||||||
runmany_wrap(Fun, Parent) ->
|
|
||||||
try
|
|
||||||
Fun()
|
|
||||||
catch
|
|
||||||
exit:siblingdied ->
|
|
||||||
ok;
|
|
||||||
exit:Reason ->
|
|
||||||
Parent ! {erlang:self(), error, Reason};
|
|
||||||
error:R ->
|
|
||||||
Parent ! {erlang:self(), error, {R, erlang:get_stacktrace()}};
|
|
||||||
throw:R ->
|
|
||||||
Parent ! {erlang:self(), error, {{nocatch, R}, erlang:get_stacktrace()}}
|
|
||||||
end.
|
|
||||||
-else.
|
|
||||||
runmany_wrap(Fun, Parent) ->
|
runmany_wrap(Fun, Parent) ->
|
||||||
try
|
try
|
||||||
Fun()
|
Fun()
|
||||||
|
@ -886,7 +871,6 @@ runmany_wrap(Fun, Parent) ->
|
||||||
throw:R:Stacktrace ->
|
throw:R:Stacktrace ->
|
||||||
Parent ! {erlang:self(), error, {{nocatch, R}, Stacktrace}}
|
Parent ! {erlang:self(), error, {{nocatch, R}, Stacktrace}}
|
||||||
end.
|
end.
|
||||||
-endif.
|
|
||||||
|
|
||||||
delete_running(Pid, [{Pid, Node, List}|Running], Acc) ->
|
delete_running(Pid, [{Pid, Node, List}|Running], Acc) ->
|
||||||
{Running ++ Acc, Node, List};
|
{Running ++ Acc, Node, List};
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue