anchor.diff:  %%	`erl_parse' clauses.
   
   function(Name, Clauses) ->
  -    case syntax_tools_vsn() >= "1.6.9" of 
  +    case syntax_tools_vsn() >= [1,6,9] of 
           true ->
               tree(function,
                    #func{name = update_ann({syntax_path, function_name}, Name), 
  
positive.code: 	 warning_marker/1, warning_marker_info/1,
  	 default_literals_vars/2, empty_node/0]).
  	
  
  %% =====================================================================
  %% IMPLEMENTATION NOTES:
  %%
  
negative.code: syntax_tools_vsn() -> 
      Dir=code:lib_dir(syntax_tools),
      Prefix=lists:takewhile(fun(C)-> C/=$- end, lists:reverse(Dir)),
      syntax_tools_vsn_nums(lists:reverse(Prefix),[]).
     
      
  syntax_tools_vsn_nums([], Nums) -> lists:reverse(Nums);
  syntax_tools_vsn_nums(Str, Nums) ->
      {Prefix, Str1}=lists:splitwith(fun(C)-> C/=$. end, Str),
      case Str1 of 
          [] -> lists:reverse([list_to_integer(Prefix)|Nums]);
          _ ->
              syntax_tools_vsn_nums(tl(Str1), [list_to_integer(Prefix)|Nums])
      end.
                                
  
  %%TODO:
  