Project not found: openSUSE:Factory:Staging:adi:19

File lager-3.6.7-stacktrace.patch of Package lager

diff -Ndurp lager-3.6.7/test/pr_stacktrace_test.erl lager-3.6.7-stacktrace/test/pr_stacktrace_test.erl
--- lager-3.6.7/test/pr_stacktrace_test.erl	2018-10-14 22:16:53.000000000 +0300
+++ lager-3.6.7-stacktrace/test/pr_stacktrace_test.erl	2018-11-07 16:37:29.462283814 +0200
@@ -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.
@@ -29,8 +32,8 @@ pr_stacktrace_throw_test() ->
             lager:pr_stacktrace(?GET_STACK(Stacktrace), {Class, Reason})
     end,
 ExpectedPart = "
-    pr_stacktrace_test:pr_stacktrace_throw_test/0 line 26
-    pr_stacktrace_test:make_throw/0 line 16
+    pr_stacktrace_test:pr_stacktrace_throw_test/0 line 29
+    pr_stacktrace_test:make_throw/0 line 19
 throw:{test,exception}",
     ?assertNotEqual(0, string:str(Result, ExpectedPart)).
 
@@ -43,8 +46,8 @@ pr_stacktrace_bad_arg_test() ->
             lager:pr_stacktrace(?GET_STACK(Stacktrace), {Class, Reason})
     end,
 ExpectedPart = "
-    pr_stacktrace_test:pr_stacktrace_bad_arg_test/0 line 40
-    pr_stacktrace_test:bad_arg/0 line 22
+    pr_stacktrace_test:pr_stacktrace_bad_arg_test/0 line 43
+    pr_stacktrace_test:bad_arg/0 line 25
 error:badarg",
     ?assertNotEqual(0, string:str(Result, ExpectedPart)).
 
@@ -57,7 +60,7 @@ pr_stacktrace_bad_arity_test() ->
             lager:pr_stacktrace(?GET_STACK(Stacktrace), {Class, Reason})
     end,
 ExpectedPart = "
-    pr_stacktrace_test:pr_stacktrace_bad_arity_test/0 line 54
+    pr_stacktrace_test:pr_stacktrace_bad_arity_test/0 line 57
     lists:concat([], [])
 error:undef",
     ?assertNotEqual(0, string:str(Result, ExpectedPart)).
@@ -72,6 +75,6 @@ pr_stacktrace_no_reverse_test() ->
     end,
 ExpectedPart = "error:undef
     lists:concat([], [])
-    pr_stacktrace_test:pr_stacktrace_bad_arity_test/0 line 68",
+    pr_stacktrace_test:pr_stacktrace_bad_arity_test/0 line 71",
 
     ?assertEqual(0, string:str(Result, ExpectedPart)).
openSUSE Build Service is sponsored by