diff options
author | Björn Gustavsson <[email protected]> | 2014-02-07 12:08:10 +0100 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2014-02-07 12:08:10 +0100 |
commit | 75c490066bd84f531eea8fed118540a358042812 (patch) | |
tree | 2fa64c286280a5d5777aac2584b47883268d2afd /lib/debugger/src/dbg_ieval.erl | |
parent | 243ebeb5366a79180146eef8680a3909d340a1ca (diff) | |
parent | fe6403dcdba3e8655a258bf0be2ee6a24777faa9 (diff) | |
download | otp-75c490066bd84f531eea8fed118540a358042812.tar.gz otp-75c490066bd84f531eea8fed118540a358042812.tar.bz2 otp-75c490066bd84f531eea8fed118540a358042812.zip |
Merge branch 'vladdu/debugger/fixes'
* vladdu/debugger/fixes:
remove warning for variable exported from case
remove useless match
remove unused parameter
Diffstat (limited to 'lib/debugger/src/dbg_ieval.erl')
-rw-r--r-- | lib/debugger/src/dbg_ieval.erl | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lib/debugger/src/dbg_ieval.erl b/lib/debugger/src/dbg_ieval.erl index 2080643bb9..d1d52a39ca 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 |