From d9e0f376b36baa5453717606f373daa5b7a1b0aa Mon Sep 17 00:00:00 2001
From: Lukas Larsson <lukas.larsson@erlang-solutions.com>
Date: Wed, 25 May 2016 15:03:35 +0200
Subject: runtime_tools: Fix erl_tracer testcases

---
 lib/runtime_tools/test/dbg_SUITE.erl              | 10 +++++-----
 lib/runtime_tools/test/dbg_SUITE_data/dbg_SUITE.c |  4 ++--
 2 files changed, 7 insertions(+), 7 deletions(-)

(limited to 'lib')

diff --git a/lib/runtime_tools/test/dbg_SUITE.erl b/lib/runtime_tools/test/dbg_SUITE.erl
index 5a3c885571..4b0864858c 100644
--- a/lib/runtime_tools/test/dbg_SUITE.erl
+++ b/lib/runtime_tools/test/dbg_SUITE.erl
@@ -30,7 +30,7 @@
          erl_tracer/1, distributed_erl_tracer/1]).
 -export([tracee1/1, tracee2/1]).
 -export([dummy/0, exported/1]).
--export([enabled/3, trace/6, load_nif/1]).
+-export([enabled/3, trace/5, load_nif/1]).
 
 -include_lib("common_test/include/ct.hrl").
 
@@ -961,7 +961,7 @@ erl_tracer(Config) ->
     {ok, _} = dbg:p(self(), [c, timestamp]),
     {ok, _} = dbg:tp(?MODULE, dummy, []),
     ok = ?MODULE:dummy(),
-    [{Self, call, Self, Self, {?MODULE, dummy, []}, undefined, #{}}] = flush(),
+    [{Self, call, Self, Self, {?MODULE, dummy, []}, #{}}] = flush(),
     ok.
 
 %% Test that distributed erl_tracer modules work
@@ -997,10 +997,10 @@ distributed_erl_tracer(Config) ->
     {ok, {?MODULE, RNifProxy}} = dbg:get_tracer(RNode),
 
     LCall = spawn_link(LNode, fun() -> ?MODULE:dummy() end),
-    [{LCall, call, LNifProxy, LCall, {?MODULE, dummy, []}, undefined, #{}}] = flush(),
+    [{LCall, call, LNifProxy, LCall, {?MODULE, dummy, []}, #{}}] = flush(),
 
     RCall = spawn_link(RNode, fun() -> ?MODULE:dummy() end),
-    [{RCall, call, RNifProxy, RCall, {?MODULE, dummy, []}, undefined, #{}}] = flush(),
+    [{RCall, call, RNifProxy, RCall, {?MODULE, dummy, []}, #{}}] = flush(),
 
 
     ok.
@@ -1018,7 +1018,7 @@ load_nif(Config) ->
 enabled(_, _, _) ->
     erlang:nif_error(nif_not_loaded).
 
-trace(_, _, _, _, _, _) ->
+trace(_, _, _, _, _) ->
     erlang:nif_error(nif_not_loaded).
 
 %%
diff --git a/lib/runtime_tools/test/dbg_SUITE_data/dbg_SUITE.c b/lib/runtime_tools/test/dbg_SUITE_data/dbg_SUITE.c
index 45f14938c6..ecdee7e3a2 100644
--- a/lib/runtime_tools/test/dbg_SUITE_data/dbg_SUITE.c
+++ b/lib/runtime_tools/test/dbg_SUITE_data/dbg_SUITE.c
@@ -36,7 +36,7 @@ static ERL_NIF_TERM trace(ErlNifEnv* env, int argc, const ERL_NIF_TERM argv[]);
 
 static ErlNifFunc nif_funcs[] = {
     {"enabled", 3, enabled},
-    {"trace", 6, trace}
+    {"trace", 5, trace}
 };
 
 ERL_NIF_INIT(dbg_SUITE, nif_funcs, load, NULL, upgrade, unload)
@@ -93,7 +93,7 @@ static ERL_NIF_TERM trace(ErlNifEnv* env, int argc, const ERL_NIF_TERM argv[])
     int state_arity;
     ErlNifPid self, to;
     ERL_NIF_TERM *tuple, msg;
-    ASSERT(argc == 6);
+    ASSERT(argc == 5);
 
     tuple = enif_alloc(sizeof(ERL_NIF_TERM)*(argc+1));
     memcpy(tuple+1,argv,sizeof(ERL_NIF_TERM)*argc);
-- 
cgit v1.2.3