diff options
author | Dan Gudmundsson <[email protected]> | 2015-02-17 15:02:37 +0100 |
---|---|---|
committer | Dan Gudmundsson <[email protected]> | 2015-02-17 15:02:37 +0100 |
commit | ea90432381a70dc01e0688bef6b76d91e6c16e5e (patch) | |
tree | 59f21c5c9c0fd77110bd9c03f2bcbfde99e06cf8 /lib | |
parent | 48a19297ab6b0e16c5e490033477b937301947b2 (diff) | |
download | otp-ea90432381a70dc01e0688bef6b76d91e6c16e5e.tar.gz otp-ea90432381a70dc01e0688bef6b76d91e6c16e5e.tar.bz2 otp-ea90432381a70dc01e0688bef6b76d91e6c16e5e.zip |
observer: Add scheduler run queue to cdv
Missing information
Diffstat (limited to 'lib')
-rw-r--r-- | lib/observer/src/cdv_proc_cb.erl | 1 | ||||
-rw-r--r-- | lib/observer/src/crashdump_viewer.erl | 2 | ||||
-rw-r--r-- | lib/observer/src/crashdump_viewer.hrl | 4 |
3 files changed, 6 insertions, 1 deletions
diff --git a/lib/observer/src/cdv_proc_cb.erl b/lib/observer/src/cdv_proc_cb.erl index dfc2df9c4c..d1549f79eb 100644 --- a/lib/observer/src/cdv_proc_cb.erl +++ b/lib/observer/src/cdv_proc_cb.erl @@ -129,6 +129,7 @@ info_fields() -> {"Started", start_time}, {"Parent", {click,parent}}, {"Message Queue Len",msg_q_len}, + {"Run queue", run_queue}, {"Reductions", reds}, {"Program counter", prog_count}, {"Continuation pointer",cp}, diff --git a/lib/observer/src/crashdump_viewer.erl b/lib/observer/src/crashdump_viewer.erl index 99329b94e2..2ba65c9a4d 100644 --- a/lib/observer/src/crashdump_viewer.erl +++ b/lib/observer/src/crashdump_viewer.erl @@ -1131,6 +1131,8 @@ all_procinfo(Fd,Fun,Proc,WS,LineHead) -> "arity = " ++ Arity -> %%! Temporary workaround get_procinfo(Fd,Fun,Proc#proc{arity=Arity--"\r\n"},WS); + "Run queue" -> + get_procinfo(Fd,Fun,Proc#proc{run_queue=val(Fd)},WS); "=" ++ _next_tag -> Proc; Other -> diff --git a/lib/observer/src/crashdump_viewer.hrl b/lib/observer/src/crashdump_viewer.hrl index 0e2eba6dee..47705d0da7 100644 --- a/lib/observer/src/crashdump_viewer.hrl +++ b/lib/observer/src/crashdump_viewer.hrl @@ -85,7 +85,9 @@ old_heap_top, old_heap_end, memory, - stack_dump}). + stack_dump, + run_queue=?unknown + }). -record(port, {id, |