aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDan Gudmundsson <[email protected]>2015-03-11 16:03:10 +0100
committerDan Gudmundsson <[email protected]>2015-03-11 16:03:10 +0100
commitc5da5547dbf63e324ae3584035c48ce936eddc7c (patch)
treefdd9f3efab8548e7e2148f04fedfc4e42f4b1f37
parenta8cd2a465d6bc55b49f45be099213a5a06ee7f98 (diff)
parentea90432381a70dc01e0688bef6b76d91e6c16e5e (diff)
downloadotp-c5da5547dbf63e324ae3584035c48ce936eddc7c.tar.gz
otp-c5da5547dbf63e324ae3584035c48ce936eddc7c.tar.bz2
otp-c5da5547dbf63e324ae3584035c48ce936eddc7c.zip
Merge branch 'dgud/observer/crashdump-run-queue/OTP/12401'
* dgud/observer/crashdump-run-queue/OTP/12401: observer: Add scheduler run queue to cdv
-rw-r--r--lib/observer/src/cdv_proc_cb.erl1
-rw-r--r--lib/observer/src/crashdump_viewer.erl2
-rw-r--r--lib/observer/src/crashdump_viewer.hrl4
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,