anchor.diff:  	macro -> vann_macro(Tree, Env, Ms, VI, Pid);
   	%% Added by HL, begin.
   	attribute ->
  -	    Toks0 = wrangler_misc:get_toks(Tree),
  +	    Toks0 = get_toks(Tree),
   	    Tree1 = adjust_locations(Tree, Toks0),
   	    case wrangler_syntax:atom_value(wrangler_syntax:attribute_name(Tree1)) of
   		define -> vann_define(Tree1, Env, Ms, VI, Pid);
  
positive.code:     lists:mapfoldl(vann_list_join(Env, Ms, VI, Pid), {[], []}, Ts).
  
  vann_function(Tree, Env, Ms, _VI, Pid) ->
      Toks0 = wrangler_misc:get_toks(Tree),
      F = fun () ->
  		Toks1 = remove_whites(Toks0),
  		Toks2 = wrangler_epp:expand_macros(Toks1, Ms),
  
negative.code: 		    {value, {env, Env1}} = lists:keysearch(env, 1, As),
                      case lists:keysearch(value, 1, As) of 
                          {value, {value, Val}} ->
                              Tree1 = update_ann(Tree, {value, Val}),
                              {ann_bindings(Tree1, Env1, Bound1, Free1, Def1), Bound1, Free1};
                          _ ->
                              {ann_bindings(Tree, Env1, Bound1, Free1, Def1), Bound1, Free1}
  