anchor.diff:  			{log, Log}, {error, Reason}]),
   	disk_log:close(Log),
   	file:close(IoDevice),
  -	{error, Reason}.
  +	{error, Reason};
  +ipdr_file3(Log, IoDevice, Format, {Cont, []}) ->
  +	ipdr_file3(Log, IoDevice, Format, disk_log:chunk(Log, Cont));
  +ipdr_file3(Log, IoDevice, xml, {Cont, Events}) ->
  +	ipdr_xml(Log, IoDevice, {Cont, Events});
  +ipdr_file3(Log, IoDevice, xdr, {Cont, Events}) ->
  +	ipdr_xdr(Log, IoDevice, {Cont, Events});
  +ipdr_file3(Log, IoDevice, csv, {Cont, Events}) ->
  +	ipdr_csv(Log, IoDevice, {Cont, Events}).
   
   -spec get_range(Log, Start, End) -> Result
   	when
  
positive.code: 			disk_log:close(Log),
  			{error, Reason}
  	end;
  ipdr_xml(Log, IoDevice, Cont, [#ipdr{} = I | T]) ->
  	IPDR = <<>>,
  	case file:write_file(IoDevice, IPDR) of
  		ok ->
  			ipdr_xml(Log, IoDevice, Cont, T);
  		{error, Reason} ->
  			error_logger:error_report([file:format_error(Reason),
  					{error, Reason}]),
  
negative.code: 			disk_log:close(Log),
  			{error, Reason}
  	end;
  ipdr_xdr(Log, IoDevice, {Cont, [#ipdr{} = I | T]}) ->
  	IPDR = <<>>,
  	case file:write_file(IoDevice, IPDR) of
  		ok ->
  			ipdr_xdr(Log, IoDevice, {Cont, T});
  		{error, Reason} ->
  			error_logger:error_report([file:format_error(Reason),
  					{error, Reason}]),
  