anchor.diff:  			 end,
   		    {error,St#compile{errors=St#compile.errors ++ Es}}
   	    end;
  -	{error,_Error} ->
  -	    Es = [{Tfile,[{none,compile,write_error}]}],
  +	{error,Error} ->
  +	    Es = [{Tfile,[{none,compile,{write_error,Error}}]}],
   	    {error,St#compile{errors=St#compile.errors ++ Es}}
       end.
   
  
positive.code:     epp:format_error(E);
  format_error(write_error) ->
      "error writing file";
  format_error({rename,From,To,Error}) ->
      io_lib:format("failed to rename ~ts to ~ts: ~ts",
  		  [From,To,file:format_error(Error)]);
  
negative.code: 	    LFun(Lf, Code),
  	    ok = file:close(Lf),
  	    {ok,St};
  	{error,Error} ->
  	    Es = [{Lfile,[{none,compile,{write_error,Error}}]}],
  	    {error,St#compile{errors=St#compile.errors ++ Es}}
      end.
  
  