anchor.diff:      case unwrap(Node) of
         {function, Pos, Name, _, _} -> set_pos(atom(Name), Pos);
         Node1 -> 
  -            case syntax_tools_vsn() >= "1.6.9" of 
  +            case syntax_tools_vsn() >= [1,6,9] of 
                   true ->
                       (data(Node1))#func.name;
                   _ ->
  
positive.code: syntax_tools_vsn() -> 
      Dir=code:lib_dir(syntax_tools),
      Prefix=lists:takewhile(fun(C)-> C/=$- end, lists:reverse(Dir)),
      lists:reverse(Prefix).
      
                                
  
  %%TODO:
  
negative.code: 	 warning_marker/1, warning_marker_info/1,
  	 default_literals_vars/2, empty_node/0]).
  	
  %% =====================================================================
  %% IMPLEMENTATION NOTES:
  %%
  