diff options
| author | Björn Gustavsson <[email protected]> | 2011-03-15 15:24:08 +0100 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2011-08-16 08:58:46 +0200 |
| commit | 15fc610fe64c052faf1ba997b771123fe4c383d7 (patch) | |
| tree | 39fb8286fe8cb23b36a2e85e0231eb60217830f1 /lib/debugger/src/dbg_icmd.erl | |
| parent | ae7858a2631df405f4460f6aefb1e08077d61a3a (diff) | |
| download | otp-15fc610fe64c052faf1ba997b771123fe4c383d7.tar.gz otp-15fc610fe64c052faf1ba997b771123fe4c383d7.tar.bz2 otp-15fc610fe64c052faf1ba997b771123fe4c383d7.zip | |
Break out stack handling into the dbg_istk module
Diffstat (limited to 'lib/debugger/src/dbg_icmd.erl')
| -rw-r--r-- | lib/debugger/src/dbg_icmd.erl | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lib/debugger/src/dbg_icmd.erl b/lib/debugger/src/dbg_icmd.erl index e9502eaa2b..de60f4ad47 100644 --- a/lib/debugger/src/dbg_icmd.erl +++ b/lib/debugger/src/dbg_icmd.erl @@ -273,7 +273,7 @@ handle_int_msg({old_code,Mod}, Status, Bs, erase([Mod|db]), put(cache, []); true -> - case dbg_ieval:in_use_p(Mod, M) of + case dbg_istk:in_use_p(Mod, M) of true -> %% A call to Mod is on the stack (or might be), %% so we must terminate. @@ -342,11 +342,11 @@ handle_user_msg({set,stack_trace,Flag}, _Status, _Bs, _Ieval) -> handle_user_msg({get,bindings,From,SP}, _Status, Bs, _Ieval) -> reply(From, bindings, bindings(Bs, SP)); handle_user_msg({get,stack_frame,From,{Dir,SP}}, _Status, _Bs,_Ieval) -> - reply(From, stack_frame, dbg_ieval:stack_frame(Dir, SP)); + reply(From, stack_frame, dbg_istk:stack_frame(Dir, SP)); handle_user_msg({get,messages,From,_}, _Status, _Bs, _Ieval) -> reply(From, messages, messages()); handle_user_msg({get,backtrace,From,N}, _Status, _Bs, _Ieval) -> - reply(From, backtrace, dbg_ieval:backtrace(N)). + reply(From, backtrace, dbg_istk:backtrace(N)). set_stack_trace(true) -> set_stack_trace(all); @@ -366,11 +366,11 @@ reply(From, Tag, Reply) -> bindings(Bs, nostack) -> Bs; bindings(Bs, SP) -> - case dbg_ieval:stack_level() of + case dbg_istk:stack_level() of Le when SP > Le -> Bs; _ -> - dbg_ieval:bindings(SP) + dbg_istk:bindings(SP) end. messages() -> |