anchor.diff:  terminate(Reason,LD) -> 
     safer(LD,terminate,[Reason,LD#ld.cld]).
   
  -code_change(_,LD,Info) -> 
  -  safer(LD,code_change,["",LD#ld.cld,Info]).
  +code_change(OldVsn,LD,Info) -> 
  +  safer(LD,code_change,[OldVsn,LD#ld.cld,Info]).
   
   handle_cast(Msg,LD) -> 
     safer(LD,handle_cast,[Msg,LD#ld.cld]).
  
positive.code:   catch exit:{noproc,_} -> ok
    end.
  
  print_state(Mod) ->
    gen_server:call(Mod,print_state).
  
  unlink() ->
    {links,Links} = process_info(self(),links),
  
negative.code: 
  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  %% utilities
  
  print_term(Term) -> 
    print_term(group_leader(),Term).
  