--- crashdump_viewer.erl 2008-01-03 14:40:46.000000000 +0100 +++ /usr/local/lib/erlang_R11B5/lib/observer-0.9.7.4/src/crashdump_viewer.erl 2007-07-11 14:48:21.000000000 +0200 @@ -473,15 +473,6 @@ GenInfo=general_info(File), Reply = crashdump_viewer_html:general_info(GenInfo), {reply,Reply,State}; -%% SB clauses -handle_call(procs_memory,_From,State=#state{file=File,shared_heap=SH})-> - ProcsSummary = - case State#state.procs_summary of - undefined -> procs_summary(File); - PS -> PS - end, - {reply, procs_memory(ProcsSummary), State}; -%%% ENd SB clauses handle_call(procs_summary,_From,State=#state{file=File,shared_heap=SH}) -> ProcsSummary = case State#state.procs_summary of @@ -1382,15 +1373,6 @@ close(Fd), R. -procs_memory(Procs)-> - lists:foldl(fun(Proc,{SH,OH,HU,OHU})-> - {SH+Proc#proc.stack_heap, - OH+list_to_integer(Proc#proc.old_heap), - HU+list_to_integer(Proc#proc.heap_unused), - OHU+list_to_integer(Proc#proc.old_heap_unused)} - end, {0,0,0,0}, Procs). - - get_proc_details(File,Pid) -> DumpVsn = ets:lookup_element(cdv_dump_index_table,"=erl_crash_dump",2), case ets:match(cdv_dump_index_table,{"=proc",Pid,'$1'}) of