anchor.diff:  -module(imem_mnesia_tests).
   
  --include("imem_if.hrl").
  +%% Application callbacks
  +-compile(export_all).
  +
   -include_lib("eunit/include/eunit.hrl").
   
  --define(ROWCOUNT, 1000).
  --define(THREAD_A_DELAY, 200).
  --define(THREAD_B_DELAY, 200).
  --define(THREAD_A_CHUNK, 10).
  --define(THREAD_B_CHUNK, 20).
  -
  +-define(ROWCOUNT, 100).
  +-define(THREAD_A_DELAY, 2000).
  +-define(THREAD_B_DELAY, 2000).
  +-define(THREAD_A_CHUNK, 5).
  +-define(THREAD_B_CHUNK, 10).
   -define(TEST_TIMEOUT, 1000000).
  -
  --define(TABLE, imem_table_123).
   
   % EUnit tests --
   setup() ->
  -    ?imem_test_setup(),
  -    {atomic, ok} = mnesia:create_table(?TABLE, [{attributes, [col1, col2, col3]}]).
  +    mnesia:start(),
  +    {atomic, ok} = mnesia:create_table(table, [{attributes, [col1, col2, col3]}]),
  +    ok.
   
   teardown(_) ->
  -    catch imem_if:drop_table(?TABLE),
  -    application:stop(imem).
  +    mnesia:delete_table(table),
  +    mnesia:stop().
   
   imem_mnesia_test_() ->
       {timeout, ?TEST_TIMEOUT, {
  
positive.code:             Pid ! next,
              receive
                  eot ->
                      io:format(user, "[~p] finished~n", [Title]);
                  {row, Row} ->
                      io:format(user, "[~p] got rows ~p~n", [Title, length(Row)]),
                      timer:sleep(Delay),
                      F(F)
              end
  
negative.code:                 end
          end
      end,
      spawn(mnesia, async_dirty, [F, [F,undefined]]).
  