anchor.diff:              end
       end.
   
  -fprof_dump_proc_stream({trace_ts, _Ps, call, MFA, {cp, CallerMFA}, Ts}, #dump{stack=[]} = State) ->
  +trace_proc_stream({trace_ts, _Ps, call, MFA, {cp, CallerMFA}, Ts}, #dump{stack=[]} = State) ->
       new_state(State, [MFA, CallerMFA], Ts);
   
  -fprof_dump_proc_stream({trace_ts, _Ps, call, MFA, {cp, MFA}, Ts}, #dump{stack=[MFA|Stack]} = State) ->
  +trace_proc_stream({trace_ts, _Ps, call, MFA, {cp, MFA}, Ts}, #dump{stack=[MFA|Stack]} = State) ->
       new_state(State, [MFA|Stack], Ts); % collapse tail recursion
   
  -fprof_dump_proc_stream({trace_ts, _Ps, call, MFA, {cp, CpMFA}, Ts}, #dump{stack=[CpMFA|Stack]} = State) ->
  +trace_proc_stream({trace_ts, _Ps, call, MFA, {cp, CpMFA}, Ts}, #dump{stack=[CpMFA|Stack]} = State) ->
       new_state(State, [MFA, CpMFA|Stack], Ts);
   
  -fprof_dump_proc_stream({trace_ts, _Ps, call, _MFA, {cp, _}, _Ts} = TraceTs, #dump{stack=[_|StackRest]} = State) ->
  -    fprof_dump_proc_stream(TraceTs, State#dump{stack=StackRest});
  +trace_proc_stream({trace_ts, _Ps, call, _MFA, {cp, _}, _Ts} = TraceTs, #dump{stack=[_|StackRest]} = State) ->
  +    trace_proc_stream(TraceTs, State#dump{stack=StackRest});
   
  -fprof_dump_proc_stream({trace_ts, _Ps, T, _Args, _Ts} = TraceTs, State) ->
  +trace_proc_stream({trace_ts, _Ps, T, _Args, _Ts} = TraceTs, State) ->
       case T of
           out -> ignore;
           in -> ignore;
  
positive.code:                 error -> #dump{}
              end,
  
              NewPidState = fprof_dump_proc_stream(Term, PidState),
  
              D1 = dict:erase(PidS, State),
              D2 = dict:append(PidS, NewPidState, D1),
              fprof_dump_listener(D2)
      end.
  
  us({Mega, Secs, Micro}) ->
  
negative.code:     ok = file:write_file(OutputFile, Bytes),
      PS.
  
  trace_flags(normal) ->
      [call, arity, return_to, timestamp];
  trace_flags(normal_with_children) ->
      [call, arity, return_to, timestamp, set_on_spawn];
  trace_flags(like_fprof) -> % fprof does this as 'normal'
      [call, return_to, running, procs, garbage_collection, arity, timestamp, set_on_spawn].
  
  trace_listener(State) ->
      receive
          {dump, Pid} ->
              Pid ! {stacks, dict:to_list(State)};
  