anchor.diff:  
   pdbe_new(Pid, Vals) ->
       Entry = {Pid,
  -             element(2, lists:keyfind(message_queue_len, 1, Vals)),
  +             process_info_get(Vals, message_queue_len, 0),
                {_E = 0,_G = 0, _W = 0, _I = 0, _S = 0, _R= 0, _D = 0} %% status
               },
  -    vals_add_status(Entry, element(2, lists:keyfind(status, 1, Vals))).
  +    vals_add_status(Entry, process_info_get(Vals, status, dead_pid)).
   
   
   pdbe_add_vals(Entry, Vals) ->
  -    MQLen = element(2, lists:keyfind(message_queue_len, 1, Vals)),
  +    MQLen = process_info_get(Vals, message_queue_len, 0),
       V1 = case MQLen > 1 of
                false -> Entry;
                true -> vals_add_mqlen(Entry, MQLen)
            end,
  -    Status = element(2, lists:keyfind(status, 1, Vals)),
  +    Status = process_info_get(Vals, status, dead_pid),
       _V2 = vals_add_status(V1, Status).
   
  +readable_status(Status) ->
  +    case Status of
  +        exiting -> "E";
  +        garbage_collecting -> "G";
  +        waiting -> "W";
  +        runnable -> "R";
  +        suspended -> "S";
  +        running -> "R";
  +        dead_pid -> "D"
  +    end.
  +
  +readable_mem(0) -> "0B";
   readable_mem(Mem) ->
       case math:log(Mem)/math:log(2) of
           L when L < 10.0 ->
  -            "B";
  +            lists:flatten(io_lib:format("~p", [Mem]))
  +            ++ "B";
           L when L < 20.0 ->
               lists:flatten(io_lib:format("~p", [Mem div 1024]))
               ++ "KB";
  
positive.code:                 "~p", [Mem div 1024 div 1024 div 1024]))
              ++ "GB"
      end.
  
negative.code:                      Pid = element(1, X),
                       pdb:delete(Pid, TableName),
                       %% plot data is:
                       Infos = try_process_info(Pid, [status, memory, stack_size]),
                       Status = process_info_get(Infos, status, dead_pid),
                       {vals_pid(X),
                        Status,
                        vals_mqlen(X)/Count,
                        vals_cpu_usage(X, Count),
                        process_info_get(Infos, memory, 0),
                        process_info_get(Infos, stack_size, 0)}
                   end || X <- R1, is_tuple(X), is_pid(element(1, X)) ],
      SortedPlotData = lists:keysort(sort_by(State), PlotData),
      L = length(SortedPlotData),
  