anchor.diff:  %% Returns a list of all test cases in this test suite.
   %%
   all() ->
  -	[log_auth_event, log_acct_event].
  +	[log_auth_event, log_acct_event, get_range].
   
   %%---------------------------------------------------------------------
   %%  Test cases
  
positive.code: 			{?UserName, "DE:AD:BE:EF:CA:FE"}, {?AcctSessionId, "8240019b"},
  			{?CallingStationId, "FE-ED-BE-EF-F0-0D"},
  			{?CalledStationId, "CA-FE-CA-FE-CA-FE:AP 1"}, {?AcctAuthentic, 1},
  			{?AcctStatusType, 1}, {?NasIdentifier, "AP 1"}, {?AcctDelayTime, 0},
  			{?NasIpAddress, ClientAddress}],
  	ok = ocs_log:radius_acct_log(Server, Client, Type, ReqAttrs),
  	End = erlang:system_time(millisecond),
  	Fany = fun({TS, N, S, C, T, A}) when TS >= Start, TS =< End,
  
negative.code: 			{?CallingStationId, "FE-ED-BE-EF-F0-0D"},
  			{?CalledStationId, "CA-FE-CA-FE-CA-FE:AP 1"},
  			{?UserPassword, RandomList},
  			{?NasIdentifier, "ap-1.sigscale.net"},
  			{?NasIpAddress, ClientAddress}],
  	ResAttrs = [{?SessionTimeout, 3600}, {?MessageAuthenticator, RandomBin}],
  	ok = ocs_log:radius_auth_log(Server, Client, Type, ReqAttrs, ResAttrs),
  	End = erlang:system_time(millisecond),
  