anchor.diff:          {ok,Toks2,_} =
               wrangler_scan:string(NewStr,{1,1},?TabWidth,unix),
           NewForm = wrangler_epp_dodger:normal_parser(Toks2,[]),
  -        best(OriginalForm) == best(NewForm)
  +        B1=best(OriginalForm), 
  +        B2=best(NewForm), 
  +        B1==B2
       of 
           Res -> Res
       catch 
  -        _E1:_E2 -> 
  +        _E1:_E2 ->
               false
       end.
   
  
positive.code: 	    AtrName = wrangler_syntax:attribute_name(Form),
              case wrangler_syntax:atom_value(AtrName) of
  		type -> true;
  	%%	spec -> true;
                  opaque -> true;
  		record -> 
                      [_R, FieldTuple] = wrangler_syntax:attribute_arguments(Form),
                      Fields = wrangler_syntax:tuple_elements(FieldTuple),
                      lists:any(fun(F) ->  
  
negative.code: 
  lay_union_elem(T, Ctxt) ->
      beside(text(" | "),lay_type(T, Ctxt)).
  
  spec_need_paren([])->true;
  spec_need_paren(Toks) ->
      [_T, T1| _Ts] = lists:dropwhile(fun({atom, _, 'spec'}) ->
                                             false;
                                         (_) ->
                                              true
                                     end, Toks),
      element(1, T1) == '('.
      
  