anchor.diff:  -define(i2l(I), integer_to_list(I)).
   -define(p2l(P), pid_to_list(P)).
   -define(INDENT, 2).
  --record(state, {name, pid, sets = sets:new(), counts = sets:new(), level = 0}).
  +-record(state, {name,
  +                pid,
  +                stats = orddict:new(),
  +                level = 0}).
   
   script(ScriptSrc) ->
       script(ScriptSrc, node()).
  
positive.code: st(Item, State) ->
      {[{align, {st_body, Item}}], State}.
  
  st_body({group, Items}, State) ->
      {[{nop, indent, "{\n"},
        sep_t(st, Items, "\n"),
  
negative.code:     Script.
  
  probes(Probes, State) ->
      {[{nop, add_globals, [sep_t(probe, Probes, "\n")]}], State}.
  
  init_state(PidStr) when is_list(PidStr) ->
      Name = os:cmd(io_lib:format(
  