RosettaCodeData/Task/Stack-traces/Erlang/stack-traces.erl
2023-07-01 13:44:08 -04:00

18 lines
253 B
Erlang

-module(stack_traces).
-export([main/0]).
main() ->
{ok,A} = outer(),
io:format("~p\n", [A]).
outer() ->
{ok,A} = middle(),
{ok,A}.
middle() ->
{ok,A} = inner(),
{ok,A}.
inner() ->
try throw(42) catch 42 -> {ok,erlang:get_stacktrace()} end.