diff options
| author | Dan Gudmundsson <[email protected]> | 2011-04-27 12:51:36 +0200 |
|---|---|---|
| committer | Dan Gudmundsson <[email protected]> | 2011-05-12 10:09:46 +0200 |
| commit | 990d05d600ca428887b42be50dad7412be0c6fdf (patch) | |
| tree | e9b9243f33bacc97aba48b581c60bdd9d49d3b0e /lib/mnesia/test | |
| parent | 2e294c82e6f30c71ced50c3d79e4746b5ad2e76d (diff) | |
| download | otp-990d05d600ca428887b42be50dad7412be0c6fdf.tar.gz otp-990d05d600ca428887b42be50dad7412be0c6fdf.tar.bz2 otp-990d05d600ca428887b42be50dad7412be0c6fdf.zip | |
Verify that remote data is commited before dirty ops begin
Diffstat (limited to 'lib/mnesia/test')
| -rw-r--r-- | lib/mnesia/test/mnesia_durability_test.erl | 4 | ||||
| -rw-r--r-- | lib/mnesia/test/mnesia_qlc_test.erl | 3 |
2 files changed, 4 insertions, 3 deletions
diff --git a/lib/mnesia/test/mnesia_durability_test.erl b/lib/mnesia/test/mnesia_durability_test.erl index 55205d1222..2fee72f066 100644 --- a/lib/mnesia/test/mnesia_durability_test.erl +++ b/lib/mnesia/test/mnesia_durability_test.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 1997-2010. All Rights Reserved. +%% Copyright Ericsson AB 1997-2011. All Rights Reserved. %% %% The contents of this file are subject to the Erlang Public License, %% Version 1.1, (the "License"); you may not use this file except in @@ -119,8 +119,8 @@ load_latest_data(Config) when is_list(Config) -> ?match([], mnesia_test_lib:kill_mnesia([N2])), ?match(ok, mnesia:dirty_write(Rec1)), - ?match([], mnesia_test_lib:kill_mnesia([N1])), ?match([], mnesia_test_lib:kill_mnesia([N3])), + ?match([], mnesia_test_lib:kill_mnesia([N1])), ?match([], mnesia_test_lib:start_mnesia([N2], [])), %% Should wait for N1 diff --git a/lib/mnesia/test/mnesia_qlc_test.erl b/lib/mnesia/test/mnesia_qlc_test.erl index 141de71d01..5f46840ae9 100644 --- a/lib/mnesia/test/mnesia_qlc_test.erl +++ b/lib/mnesia/test/mnesia_qlc_test.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 2004-2010. All Rights Reserved. +%% Copyright Ericsson AB 2004-2011. All Rights Reserved. %% %% The contents of this file are subject to the Erlang Public License, %% Version 1.1, (the "License"); you may not use this file except in @@ -70,6 +70,7 @@ init_testcases(Type,Config) -> end, All = fun() -> [Write(Id) || Id <- lists:seq(1,10)], ok end, ?match({atomic, ok}, mnesia:sync_transaction(All)), + ?match({atomic, [{b, {b,100-1}, 1}]}, mnesia:transaction(fun() -> mnesia:read({b, {b, 99}}) end)), Nodes. %% Test cases |