From 2a25f7e4925b3a60032aab58c9017858289d6b9e Mon Sep 17 00:00:00 2001 From: Vlad Dumitrescu Date: Wed, 5 Feb 2014 18:26:03 +0100 Subject: remove unused parameter --- lib/debugger/src/int.erl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lib/debugger/src') diff --git a/lib/debugger/src/int.erl b/lib/debugger/src/int.erl index bdd671cff1..3d16e64ca1 100644 --- a/lib/debugger/src/int.erl +++ b/lib/debugger/src/int.erl @@ -630,10 +630,10 @@ find_beam(Mod, Src) -> File = filename:join(SrcDir, BeamFile), case is_file(File) of true -> File; - false -> find_beam_1(Mod, BeamFile, SrcDir) + false -> find_beam_1(BeamFile, SrcDir) end. -find_beam_1(Mod, BeamFile, SrcDir) -> +find_beam_1(BeamFile, SrcDir) -> RootDir = filename:dirname(SrcDir), EbinDir = filename:join(RootDir, "ebin"), CodePath = [EbinDir | code:get_path()], -- cgit v1.2.3 From 6ad3988cc6c12fab863705d2c41bceb73ea100aa Mon Sep 17 00:00:00 2001 From: Vlad Dumitrescu Date: Wed, 5 Feb 2014 15:32:20 +0100 Subject: remove useless match --- lib/debugger/src/int.erl | 1 - 1 file changed, 1 deletion(-) (limited to 'lib/debugger/src') diff --git a/lib/debugger/src/int.erl b/lib/debugger/src/int.erl index 3d16e64ca1..2755db64b8 100644 --- a/lib/debugger/src/int.erl +++ b/lib/debugger/src/int.erl @@ -637,7 +637,6 @@ find_beam_1(BeamFile, SrcDir) -> RootDir = filename:dirname(SrcDir), EbinDir = filename:join(RootDir, "ebin"), CodePath = [EbinDir | code:get_path()], - BeamFile = atom_to_list(Mod) ++ code:objfile_extension(), lists:foldl(fun(_, Beam) when is_list(Beam) -> Beam; (Dir, error) -> File = filename:join(Dir, BeamFile), -- cgit v1.2.3 From fe6403dcdba3e8655a258bf0be2ee6a24777faa9 Mon Sep 17 00:00:00 2001 From: Vlad Dumitrescu Date: Wed, 5 Feb 2014 18:30:12 +0100 Subject: remove warning for variable exported from case --- lib/debugger/src/dbg_ieval.erl | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'lib/debugger/src') diff --git a/lib/debugger/src/dbg_ieval.erl b/lib/debugger/src/dbg_ieval.erl index 14a17fe304..4156f94cb5 100644 --- a/lib/debugger/src/dbg_ieval.erl +++ b/lib/debugger/src/dbg_ieval.erl @@ -505,12 +505,12 @@ lambda(Fun, As) when is_function(Fun) -> %% ... and the fun was defined in interpreted code {module, ?MODULE} -> - {Mod,Name,Bs} = + {Mod,Name,Bs, Cs} = case erlang:fun_info(Fun, env) of - {env,[{{M,F},Bs0,Cs}]} -> - {M,F,Bs0}; - {env,[{{M,F},Bs0,Cs,FName}]} -> - {M,F,add_binding(FName, Fun, Bs0)} + {env,[{{M,F},Bs0,Cs0}]} -> + {M,F,Bs0, Cs0}; + {env,[{{M,F},Bs0,Cs0,FName}]} -> + {M,F,add_binding(FName, Fun, Bs0), Cs0} end, {arity, Arity} = erlang:fun_info(Fun, arity), if -- cgit v1.2.3