aboutsummaryrefslogtreecommitdiffstats
path: root/lib/stdlib/test/array_SUITE.erl
diff options
context:
space:
mode:
authorHans Bolinder <[email protected]>2018-02-05 12:32:07 +0100
committerHans Bolinder <[email protected]>2018-02-06 14:40:54 +0100
commit16cb4f9c59142b4e82f1a2ccbcc904be7dfdee4c (patch)
tree0585367b4f76b4ac5f253a2378c52c0c70a5c6e1 /lib/stdlib/test/array_SUITE.erl
parent121681f93bec0f92a965059055f3492fc119548c (diff)
downloadotp-16cb4f9c59142b4e82f1a2ccbcc904be7dfdee4c.tar.gz
otp-16cb4f9c59142b4e82f1a2ccbcc904be7dfdee4c.tar.bz2
otp-16cb4f9c59142b4e82f1a2ccbcc904be7dfdee4c.zip
stdlib: Do not call erlang:get_stacktrace()
Diffstat (limited to 'lib/stdlib/test/array_SUITE.erl')
-rw-r--r--lib/stdlib/test/array_SUITE.erl8
1 files changed, 4 insertions, 4 deletions
diff --git a/lib/stdlib/test/array_SUITE.erl b/lib/stdlib/test/array_SUITE.erl
index 5836f275ba..956582c4fd 100644
--- a/lib/stdlib/test/array_SUITE.erl
+++ b/lib/stdlib/test/array_SUITE.erl
@@ -141,10 +141,10 @@ t(What) ->
io:format("Test ~p ~n",[T]),
try
?MODULE:T([])
- catch _E:_R ->
+ catch _E:_R:_S ->
Line = get(test_server_loc),
io:format("Failed ~p:~p ~p ~p~n ~p~n",
- [T,Line,_E,_R, erlang:get_stacktrace()])
+ [T,Line,_E,_R,_S])
end
end, What).
@@ -161,8 +161,8 @@ extract_tests() ->
end,
[Call(Test) || Test <- Tests],
io:format("Tests ~p~n", [Tests])
- catch _:Err ->
- io:format("Error: ~p ~p~n", [Err, erlang:get_stacktrace()])
+ catch _:Err:Stacktrace ->
+ io:format("Error: ~p ~p~n", [Err, Stacktrace])
end,
file:close(In),
file:close(Out).