anchor.diff:  format_error({rename,From,To,Error}) ->
       io_lib:format("failed to rename ~ts to ~ts: ~ts",
   		  [From,To,file:format_error(Error)]);
  -format_error({delete,File,Error}) ->
  -    io_lib:format("failed to delete file ~ts: ~ts",
  -		  [File,file:format_error(Error)]);
   format_error({parse_transform,M,R}) ->
       io_lib:format("error in parse transform '~ts': ~tp", [M, R]);
   format_error({undef_parse_transform,M}) ->
  
positive.code: 	    end,
  
  	    %% Add the file to the dependencies. Lines longer than 76 columns
  	    %% are splitted.
  	    if
  		LineLen + 1 + length(File1) > 76 ->
                      LineLen1 = 2 + length(File1),
  
negative.code:     %% Write this Makefile (Code) to the selected output.
      %% If no output is specified, the default is to write to a file named after
      %% the output file.
      Output = case proplists:get_value(makedep_output, Opts) of
                   undefined ->
                       %% Prepare the default filename.
                       outfile(filename:basename(Ofile, ".beam"), "Pbeam", Opts);
                   Other ->
                       Other
               end,
  
      if
          is_list(Output) ->
              %% Write the depedencies to a file.
              case file:write_file(Output, Code) of
                  ok ->
                      {ok,Code,St};
                  {error,Reason} ->
                      Err = {St#compile.ifile,[{none,?MODULE,{write_error,Reason}}]},
                      {error,St#compile{errors=St#compile.errors++[Err]}}
              end;
          true ->
              %% Write the depedencies to a device.
              try io:fwrite(Output, "~ts", [Code]) of
                  ok ->
                      {ok,Code,St}
              catch
                  error:_ ->
                      Err = {St#compile.ifile,[{none,?MODULE,write_error}]},
                      {error,St#compile{errors=St#compile.errors++[Err]}}
              end
      end.
  
  expand_records(Code0, #compile{options=Opts}=St) ->
  