Fix unique_integer tests

Signed-off-by: Jakub Gonet <jakub.gonet@swmansion.com>

Author: jgonet

tests/erlang_tests/test_funs12.erl

@@ -41,7 +41,7 @@ check_guard(A, B, A) when is_function(B, A) ->
     A;
 check_guard(A, _B, A) when A < 0 ->
     error;
-check_guard(_A, _B, _A) ->
+check_guard(_, _, _) ->
     false.
 
 discard(_X) ->

tests/erlang_tests/unique.erl

@@ -20,14 +20,15 @@
 
 -module(unique).
 
--export([start/0, id/1, check_error/3]).
+-export([start/0, id/1]).
 
 start() ->
     ok = unique_0(),
     ok = unique_positive(),
     ok = unique_monotonic(),
     ok = unique_positive_monotonic(),
     ok = unique_monotonic_processes(),
+    ok = invalid_args(),
 
     Self = self(),
     N = length([
@@ -39,15 +40,19 @@ start() ->
     receive_messages(N),
     0.
 
-test_invalid() ->
-    ok = ?MODULE:check_error(fun() -> erlang:unique_integer(?MODULE:id(5)) end),
-    ok = ?MODULE:check_error(fun() -> erlang:unique_integer(?MODULE:id([positive | monotonic])) end).
+invalid_args() ->
+    ok = raises(badarg, fun() -> erlang:unique_integer(?MODULE:id(5)) end),
+    ok = raises(badarg, fun() ->
+        erlang:unique_integer(?MODULE:id([positive | monotonic]))
+    end),
+    ok.
 
-check_error(F, A, B) ->
+raises(Reason, F) ->
     try F() of
         Result -> {unexpected, Result}
     catch
-        A:B -> ok
+        error:Reason -> ok;
+        E:R -> {unexpected, E, R}
     end.
 
 id(X) ->