diff options
Diffstat (limited to 'lib/debugger/src')
| -rw-r--r-- | lib/debugger/src/dbg_icmd.erl | 6 | ||||
| -rw-r--r-- | lib/debugger/src/dbg_ieval.erl | 12 | ||||
| -rw-r--r-- | lib/debugger/src/int.erl | 5 | 
3 files changed, 3 insertions, 20 deletions
| diff --git a/lib/debugger/src/dbg_icmd.erl b/lib/debugger/src/dbg_icmd.erl index b1bf4ebecc..ce12c1beb3 100644 --- a/lib/debugger/src/dbg_icmd.erl +++ b/lib/debugger/src/dbg_icmd.erl @@ -1,7 +1,7 @@  %%  %% %CopyrightBegin%  %%  -%% Copyright Ericsson AB 1998-2013. All Rights Reserved. +%% Copyright Ericsson AB 1998-2014. All Rights Reserved.  %%   %% The contents of this file are subject to the Erlang Public License,  %% Version 1.1, (the "License"); you may not use this file except in @@ -49,10 +49,6 @@  %% specifies if the process should break.  %%-------------------------------------------------------------------- -%% Common Test adaptation -cmd({call_remote,0,ct_line,line,_As}, Bs, _Ieval) ->  -    Bs; -  cmd(Expr, Bs, Ieval) ->      cmd(Expr, Bs, get(next_break), Ieval). diff --git a/lib/debugger/src/dbg_ieval.erl b/lib/debugger/src/dbg_ieval.erl index 77297de0f3..96f9f91808 100644 --- a/lib/debugger/src/dbg_ieval.erl +++ b/lib/debugger/src/dbg_ieval.erl @@ -1,7 +1,7 @@  %%  %% %CopyrightBegin%  %%  -%% Copyright Ericsson AB 1998-2013. All Rights Reserved. +%% Copyright Ericsson AB 1998-2014. All Rights Reserved.  %%   %% The contents of this file are subject to the Erlang Public License,  %% Version 1.1, (the "License"); you may not use this file except in @@ -457,11 +457,6 @@ do_eval_function(Mod, Fun, As0, Bs0, _, Ieval0) when is_function(Fun);  	    exception(error, Reason, Bs0, Ieval0)      end; -%% Common Test adaptation -do_eval_function(ct_line, line, As, Bs, extern, #ieval{level=Le}=Ieval) -> -    debugged_cmd({apply,ct_line,line,As}, Bs, Ieval#ieval{level=Le+1}), -    {value, ignore, Bs}; -  do_eval_function(Mod, Name, As0, Bs0, Called, Ieval0) ->      #ieval{level=Le,line=Li,top=Top} = Ieval0,      trace(call, {Called, {Le,Li,Mod,Name,As0}}), @@ -896,11 +891,6 @@ expr({make_ext_fun,Line,MFA0}, Bs0, Ieval0) ->  	    exception(error, badarg, Bs, Ieval, true)      end; -%% Common test adaptation -expr({call_remote,0,ct_line,line,As0,Lc}, Bs0, Ieval0) -> -    {As,_Bs} = eval_list(As0, Bs0, Ieval0), -    eval_function(ct_line, line, As, Bs0, extern, Ieval0, Lc); -  %% Local function call  expr({local_call,Line,F,As0,Lc}, Bs0, #ieval{module=M} = Ieval0) ->      Ieval = Ieval0#ieval{line=Line}, diff --git a/lib/debugger/src/int.erl b/lib/debugger/src/int.erl index 2755db64b8..908390ce50 100644 --- a/lib/debugger/src/int.erl +++ b/lib/debugger/src/int.erl @@ -1,7 +1,7 @@  %%  %% %CopyrightBegin%  %%  -%% Copyright Ericsson AB 1998-2013. All Rights Reserved. +%% Copyright Ericsson AB 1998-2014. All Rights Reserved.  %%   %% The contents of this file are subject to the Erlang Public License,  %% Version 1.1, (the "License"); you may not use this file except in @@ -265,9 +265,6 @@ first_lines(Clauses) ->  first_line({clause,_L,_Vars,_,Exprs}) ->      first_line(Exprs); -%% Common Test adaptation -first_line([{call_remote,0,ct_line,line,_As}|Exprs]) -> -    first_line(Exprs);  first_line([Expr|_Exprs]) -> % Expr = {Op, Line, ..varying no of args..}      element(2, Expr). | 
