diff options
author | Zandra Hird <[email protected]> | 2016-06-08 14:19:02 +0200 |
---|---|---|
committer | Zandra Hird <[email protected]> | 2016-06-08 14:19:02 +0200 |
commit | b6883e187a88b539fdee3fd6acb7a2554edcd196 (patch) | |
tree | 067d01a3f7051f098ed369b934bbb9d47ac60024 /lib/debugger/src/int.erl | |
parent | 41d1444bb13317f78fdf600a7102ff9f7cb12d13 (diff) | |
parent | 59c8678ca4765cabf1db0aa747eb2735b8af3a42 (diff) | |
download | otp-b6883e187a88b539fdee3fd6acb7a2554edcd196.tar.gz otp-b6883e187a88b539fdee3fd6acb7a2554edcd196.tar.bz2 otp-b6883e187a88b539fdee3fd6acb7a2554edcd196.zip |
Merge branch 'zandra/debugger/unmatched_returns/OTP-13345'
* zandra/debugger/unmatched_returns/OTP-13345:
dbg_wx* - fix remaining unmached_return warnings
dbg_wx_* - fix unmatched return warnings
int - fix unmatched_return warnings
i - fix unmatched_return warnings
dbg_debugged - fix unmatched_return warnings
dbg_iserver - fix unmatched_return warnings
Diffstat (limited to 'lib/debugger/src/int.erl')
-rw-r--r-- | lib/debugger/src/int.erl | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/lib/debugger/src/int.erl b/lib/debugger/src/int.erl index 3906c22afd..e5bade9abe 100644 --- a/lib/debugger/src/int.erl +++ b/lib/debugger/src/int.erl @@ -352,10 +352,10 @@ start() -> dbg_iserver:start(). stop() -> lists:foreach( fun(Mod) -> - everywhere(distributed, - fun() -> + _ = everywhere(distributed, + fun() -> erts_debug:breakpoint({Mod,'_','_'}, false) - end) + end) end, interpreted()), dbg_iserver:stop(). @@ -524,21 +524,21 @@ check(Mod) when is_atom(Mod) -> catch check_module(Mod); check(File) when is_list(File) -> catch check_file(File). load({Mod, Src, Beam, BeamBin, Exp, Abst}, Dist) -> - everywhere(Dist, - fun() -> + _ = everywhere(Dist, + fun() -> code:purge(Mod), erts_debug:breakpoint({Mod,'_','_'}, false), {module,Mod} = code:load_binary(Mod, Beam, BeamBin) - end), + end), case erl_prim_loader:get_file(filename:absname(Src)) of {ok, SrcBin, _} -> MD5 = code:module_md5(BeamBin), Bin = term_to_binary({interpreter_module,Exp,Abst,SrcBin,MD5}), {module, Mod} = dbg_iserver:safe_call({load, Mod, Src, Bin}), - everywhere(Dist, - fun() -> + _ = everywhere(Dist, + fun() -> true = erts_debug:breakpoint({Mod,'_','_'}, true) > 0 - end), + end), {module, Mod}; error -> error @@ -738,9 +738,9 @@ del_mod(AbsMod, Dist) -> list_to_atom(filename:basename(AbsMod,".erl")) end, dbg_iserver:safe_cast({delete, Mod}), - everywhere(Dist, - fun() -> + _ = everywhere(Dist, + fun() -> erts_debug:breakpoint({Mod,'_','_'}, false), erlang:yield() - end), + end), ok. |