anchor.diff:      {A0+TabDiff, B0+TabDiff, C0+TabDiff, D0+TabDiff}.
   
   %% Misc. whitebox tests
  -t_whitebox(Config) when is_list(Config) ->    
  +t_whitebox(Config) when is_list(Config) ->
       EtsMem = etsmem(),
       repeat_for_opts(whitebox_1),
       repeat_for_opts(whitebox_1),
  
positive.code:     filename:join(proplists:get_value(priv_dir,Config),
  		  "testdets_" ++ integer_to_list(N) ++ ".dets").
  
  otp_6842_select_1000(Config) when is_list(Config) -> 
      Tab = ets_new(xxx,[ordered_set]),
      [ets:insert(Tab,{X,X}) || X <- lists:seq(1,10000)],
      AllTrue = lists:duplicate(10,true),
      AllTrue =
  	[ length(
  	    element(1,
  		    ets:select(Tab,[{'_',[],['$_']}],X*1000))) =:= 
  	      X*1000 || X <- lists:seq(1,10) ],
      Sequences = [[1000,1000,1000,1000,1000,1000,1000,1000,1000,1000],
  		 [2000,2000,2000,2000,2000],
  
negative.code:     true = ets:delete(OrdSet),
      ok.
  
  update_element(T,Tuple,KeyPos,UpdPos) ->
      KeyList = [17,"seventeen",<<"seventeen">>,{17},list_to_binary(lists:seq(1,100)),make_ref(), self()],
      lists:foreach(fun(Key) ->
  			  TupleWithKey = setelement(KeyPos,Tuple,Key),
  			  update_element_do(T,TupleWithKey,Key,UpdPos)
  		  end,
  