anchor.diff:  		erl_syntax:type(FunTree) =:= atom of
   		true ->
   		    Module = erl_syntax:atom_value(ModTree),
  -		    Function = erl_syntax:atom_value(FunTree),
   		    case Module of
   			erlang ->
  +                            Function = erl_syntax:atom_value(FunTree),
   			    case lists:member(Function, ?INSTR_ERLANG) of
   				true ->
   				    ArgTree =
  
positive.code: 
  %% Instrumented functions called as erlang:FUNCTION.
  -define(INSTR_ERLANG,
  	[demonitor, halt, link, monitor, process_flag, register, send,
  	 spawn, spawn_link, spawn_monitor, unlink, unregister, whereis,
  	 yield]).
  
  %% Delete and purge all modules in Files.
  -spec delete_and_purge([file()]) -> 'ok'.
  
negative.code:     case erl_syntax:type(Qualifier) of
  	atom ->
  	    Function = erl_syntax:atom_value(Qualifier),
  	    case lists:member(Function, ?INSTR_ERLANG_NO_MOD) of
  		true ->
                      ArgTree = erl_syntax:application_arguments(Tree),
                      {erlang, Function, ArgTree};
  		false -> no_instr
  	    end;
  	module_qualifier ->
  