File lager-3.8.0-stacktrace.patch of Package lager

diff -Ndurp lager-3.8.0/test/pr_stacktrace_test.erl lager-3.8.0-stacktrace/test/pr_stacktrace_test.erl
--- lager-3.8.0/test/pr_stacktrace_test.erl	2019-08-10 06:44:17.000000000 +0300
+++ lager-3.8.0-stacktrace/test/pr_stacktrace_test.erl	2020-08-31 00:52:51.136666727 +0300
@@ -3,9 +3,12 @@
 -compile([{parse_transform, lager_transform}]).
 
 -ifdef(OTP_RELEASE). %% this implies 21 or higher
+-if (?OTP_RELEASE >= 21).
 -define(EXCEPTION(Class, Reason, Stacktrace), Class:Reason:Stacktrace).
 -define(GET_STACK(Stacktrace), Stacktrace).
--else.
+-endif.
+-endif.
+-ifndef (EXCEPTION).
 -define(EXCEPTION(Class, Reason, _), Class:Reason).
 -define(GET_STACK(_), erlang:get_stacktrace()).
 -endif.
@@ -28,7 +31,7 @@ pr_stacktrace_throw_test() ->
         ?EXCEPTION(Class, Reason, Stacktrace) ->
             lager:pr_stacktrace(?GET_STACK(Stacktrace), {Class, Reason})
     end,
-    Want = "pr_stacktrace_test:pr_stacktrace_throw_test/0 line 26\n    pr_stacktrace_test:make_throw/0 line 16\nthrow:{test,exception}",
+    Want = "pr_stacktrace_test:pr_stacktrace_throw_test/0 line 29\n    pr_stacktrace_test:make_throw/0 line 19\nthrow:{test,exception}",
     ?assertNotEqual(nomatch, string:find(Got, Want)).
 
 pr_stacktrace_bad_arg_test() ->
@@ -38,7 +41,7 @@ pr_stacktrace_bad_arg_test() ->
         ?EXCEPTION(Class, Reason, Stacktrace) ->
             lager:pr_stacktrace(?GET_STACK(Stacktrace), {Class, Reason})
     end,
-    Want = "pr_stacktrace_test:pr_stacktrace_bad_arg_test/0 line 36\n    pr_stacktrace_test:bad_arg/0 line 22\nerror:badarg",
+    Want = "pr_stacktrace_test:pr_stacktrace_bad_arg_test/0 line 39\n    pr_stacktrace_test:bad_arg/0 line 25\nerror:badarg",
     ?assertNotEqual(nomatch, string:find(Got, Want)).
 
 pr_stacktrace_bad_arity_test() ->
@@ -48,7 +51,7 @@ pr_stacktrace_bad_arity_test() ->
         ?EXCEPTION(Class, Reason, Stacktrace) ->
             lager:pr_stacktrace(?GET_STACK(Stacktrace), {Class, Reason})
     end,
-    Want = "pr_stacktrace_test:pr_stacktrace_bad_arity_test/0 line 46\n    lists:concat([], [])\nerror:undef",
+    Want = "pr_stacktrace_test:pr_stacktrace_bad_arity_test/0 line 49\n    lists:concat([], [])\nerror:undef",
     ?assertNotEqual(nomatch, string:find(Got, Want)).
 
 pr_stacktrace_no_reverse_test() ->
@@ -59,5 +62,5 @@ pr_stacktrace_no_reverse_test() ->
         ?EXCEPTION(Class, Reason, Stacktrace) ->
             lager:pr_stacktrace(?GET_STACK(Stacktrace), {Class, Reason})
     end,
-    Want = "error:undef\n    lists:concat([], [])\n    pr_stacktrace_test:pr_stacktrace_bad_arity_test/0 line 57",
+    Want = "error:undef\n    lists:concat([], [])\n    pr_stacktrace_test:pr_stacktrace_bad_arity_test/0 line 60",
     ?assertEqual(nomatch, string:find(Got, Want)).