anchor.diff:      stop -> 
         ok;
       reload ->
  -      ?MODULE:load(LD);
  +      ?MODULE:loop(LD);
       print_state ->
         print_term(group_leader(),LD),
         loop(LD);
  
positive.code:     F when is_function(F)  -> {ID,F}
    end.
  
  report(LD,Trigger) ->
    Report = make_report(Trigger,LD),
    [Sub(Report) || Sub <- LD#ld.subscribers].
  
  make_report([sysMon|_],LD) ->
    [{?MODULE,sysMon}|expand_ps(LD#ld.monData)];
  make_report(Trigger,LD) ->
    [{?MODULE,Trigger}|maybe_procs(LD)++generic_report(LD#ld.prfData)].
  
negative.code:   LD#ld{jailed=[What|LD#ld.jailed]}.
  
  do_mon(LD) ->
    send_report(LD,sysMon),
    LD.
  
  do_user(LD) ->
    send_report(LD,user),
    LD.
  
  do_triggers(LD) ->
    {Triggered, NewTriggers} = check_triggers(LD#ld.triggers,LD#ld.prfData),
    [send_report(LD,Trig) || Trig <- Triggered],
    LD#ld{triggers=NewTriggers}.
  
  check_triggers(Triggers,Data) -> 
  