diff options
author | Siri Hansen <[email protected]> | 2013-06-04 10:57:52 +0200 |
---|---|---|
committer | Siri Hansen <[email protected]> | 2013-06-04 10:57:52 +0200 |
commit | c2151dec9f14707ccaba72cb065824ee61c064a5 (patch) | |
tree | d39a451059aa3b618165b72d1c4fa0711fb050d0 /lib/observer/src/observer_lib.erl | |
parent | 9b04c2649ce98c32335c05e90d501c2e66bb2f0e (diff) | |
parent | 2cf4e22e4916d802d03de5f532bf86e9e8d8934b (diff) | |
download | otp-c2151dec9f14707ccaba72cb065824ee61c064a5.tar.gz otp-c2151dec9f14707ccaba72cb065824ee61c064a5.tar.bz2 otp-c2151dec9f14707ccaba72cb065824ee61c064a5.zip |
Merge branch 'siri/cdv/memory-info/OTP-10604' into maint
* siri/cdv/memory-info/OTP-10604:
[observer] Add mbcs_pool to allocator info in system window
[observer] Add mbcs_pool to allocator summary in crashdump_viewer
observer: Improve initial call info
observer: Add allocator info to gui
[observer] Present Memory for each process in crashdump_viewer
[observer] Add allocator summary in crashdump_viewer
Diffstat (limited to 'lib/observer/src/observer_lib.erl')
-rw-r--r-- | lib/observer/src/observer_lib.erl | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/lib/observer/src/observer_lib.erl b/lib/observer/src/observer_lib.erl index 4077f8371a..f7712cf3da 100644 --- a/lib/observer/src/observer_lib.erl +++ b/lib/observer/src/observer_lib.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 2011-2012. All Rights Reserved. +%% Copyright Ericsson AB 2011-2013. All Rights Reserved. %% %% The contents of this file are subject to the Erlang Public License, %% Version 1.1, (the "License"); you may not use this file except in @@ -122,7 +122,10 @@ fill_info([{Str, Key}|Rest], Data) when is_atom(Key); is_function(Key) -> [{Str, get_value(Key, Data)} | fill_info(Rest, Data)]; fill_info([{Str, {Format, Key}}|Rest], Data) when is_atom(Key); is_function(Key), is_atom(Format) -> - [{Str, {Format, get_value(Key,Data)}} | fill_info(Rest, Data)]; + case get_value(Key, Data) of + undefined -> [{Str, undefined} | fill_info(Rest, Data)]; + Value -> [{Str, {Format, Value}} | fill_info(Rest, Data)] + end; fill_info([{Str,SubStructure}|Rest], Data) when is_list(SubStructure) -> [{Str, fill_info(SubStructure, Data)}|fill_info(Rest,Data)]; fill_info([{Str,Attrib,SubStructure}|Rest], Data) -> |