anchor.diff:  %%
   acct_query(Continuation, Start, End, Protocol, Types, MatchSpec) ->
   	MFA = {?MODULE, acct_query, [Protocol, Types, MatchSpec]},
  -erlang:display({?MODULE, ?LINE, start, Start, End}),
   	query_log(Continuation, Start, End, log_name(acct_log_name), MFA).
   
   -spec auth_open() -> Result
  
positive.code: start_binary_tree(_Log, Start, _NumFiles, _LastCont, LastStep, 1,
  		Step, NewCont, {_, [R]}) when element(1, R) < Start,
  		LastStep == (Step + 1) ->
  erlang:display({?MODULE, ?LINE, element(1, R), Start, LastStep, Step}),
  	NewCont;
  start_binary_tree(Log, Start, NumFiles, _LastCont, _LastStep, 1,
  		Step, NewCont, {_, [R]}) when element(1, R) < Start ->
  erlang:display({?MODULE, ?LINE, element(1, R), Start}),
  	start_binary_tree(Log, Start, NumFiles, NewCont, Step, 1, Step + 1);
  start_binary_tree(Log, Start, NumFiles, _LastCont, _LastStep, StepSize,
  		Step, NewCont, {_, [R]}) when element(1, R) < Start ->
  	NewStepSize = StepSize div 2,
  erlang:display({?MODULE, ?LINE, element(1, R), Start, StepSize, NewStepSize}),
  	start_binary_tree(Log, Start, NumFiles, NewCont, Step,
  			NewStepSize, Step + NewStepSize);
  start_binary_tree(_Log, Start, _NumFiles, LastCont, LastStep, 1,
  		Step, _NewCont, {_, [R]}) when element(1, R) >= Start,
  		LastStep == (Step - 1) ->
  erlang:display({?MODULE, ?LINE, element(1, R), Start, LastStep, Step}),
  	LastCont;
  start_binary_tree(Log, Start, NumFiles, _LastCont, _LastStep, 1,
  		Step, NewCont, {_, [R]}) when element(1, R) >= Start ->
  erlang:display({?MODULE, ?LINE, element(1, R), Start}),
  	start_binary_tree(Log, Start, NumFiles, NewCont, Step, 1, Step - 1);
  start_binary_tree(Log, Start, NumFiles, _LastCont, _LastStep, StepSize,
  		Step, NewCont, {_, [R]}) when element(1, R) >= Start ->
  	NewStepSize = StepSize div 2,
  erlang:display({?MODULE, ?LINE, element(1, R), Start, StepSize, NewStepSize, Step}),
  	start_binary_tree(Log, Start, NumFiles, NewCont, Step,
  			NewStepSize, Step - NewStepSize);
  start_binary_tree(_, _, _, _, _, _, _, _, {error, Reason}) ->
  
negative.code: 	Seconds = calendar:datetime_to_gregorian_seconds(End) - ?EPOCH,
  	query_log(Continuation, Start, Seconds * 1000 + 999, Log, MFA);
  query_log(start, Start, End, Log, MFA) when is_integer(Start), is_integer(End) ->
  	query_log1(Start, End, Log, MFA);
  query_log(Continuation, Start, End, Log, MFA) when is_integer(Start), is_integer(End) ->
  	query_log2(Start, End, MFA, disk_log:chunk(Log, Continuation), []).
  %% @hidden
  query_log1(Start, End, Log, MFA) ->
  	case start_binary_tree(Log, Start, End) of
  		eof ->
  			{eof, []};
  		{error, Reason} ->
  			{error, Reason};
  		Continuation ->
  			query_log2(Start, End, MFA, disk_log:chunk(Log, Continuation), [])
  	end.
  %% @hidden
  query_log2(_Start, _End, {M, F, A}, eof, Acc) ->
  	apply(M, F, [{eof, lists:reverse(Acc)} | A]);
  