anchor.diff:      case Parsed of
           {ok, Form} ->
               case Form of
  -                {attribute,Ln,record,{Record,Fields}} ->
  -                    S2 = S#state{has_records = true},
  -                    case epp:normalize_typed_record_fields(Fields) of
  -                        {typed, NewFields} ->
  -                            epp_parse_file(Epp, S2,
  -                                           [{attribute, Ln, record, {Record, NewFields}},
  -                                            {attribute, Ln, type, 
  -                                             {{record, Record}, Fields, []}} | Forms]);
  -                        not_typed ->
  -                            epp_parse_file(Epp, S2, [Form | Forms])
  -                    end;
  +                {attribute,_,record, _} ->
  +		    S2 = S#state{has_records = true},
  +		    epp_parse_file(Epp, S2, [Form | Forms]);
                   {attribute,Ln,mode,NewMode} ->
                       S2 = S#state{mode = NewMode},
                       if
  
positive.code: 
  parse_and_run(File, Args, Options) ->
      CheckOnly = lists:member("s", Options),
      {Source, Module, FormsOrBin, Mode} = parse_file(File, CheckOnly),
      Mode2 =
          case lists:member("d", Options) of
              true  -> 
  
negative.code:     case S of
  	#state{n_errors = Nerrs} when Nerrs =/= 0 ->
  	    fatal("There were compilation errors.");
  	#state{exports_main = ExpMain,
  	       forms_or_bin = [FileForm2, ModForm2 | Forms]} ->
  	    %% Optionally add export of main/1
  	    Forms2 =
  