anchor.diff:  	       ok = file:close(FD),
   	       X = case ets:file2tab(FName) of
   		       {ok,TL2} ->
  -			   true = lists:sort(ets:tab2list(TL)) =/= 
  +			   true = lists:sort(ets:tab2list(TL)) =/=
   			       lists:sort(ets:tab2list(TL2));
   		       _ ->
   			   totally_broken
  
positive.code:     true = ets:info(T,fixed),
      Deleted = get_kept_objects(T),
  
      {Child, Mref} = 
  	my_spawn_opt(
  	  fun()->
  		  true = ets:info(T,fixed),
  
negative.code: receive_any_spinning() ->
      receive_any_spinning(1000000).
  receive_any_spinning(Loops) ->
      receive_any_spinning(Loops,Loops,1).
  receive_any_spinning(Loops,0,Tries) ->
      receive M ->
  	    io:format("Spinning process ~p got msg ~p after ~p tries\n", [self(),M,Tries]),
  