forks/erlang-sqlite3
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Handle calls with bad references correctly

Browse Source
This commit is contained in:
Alexey Romanov
2010-12-09 15:54:58 +03:00
parent 70050ec3cf
commit 9c1a6cb650
2 changed files with 28 additions and 27 deletions
Download Patch File Download Diff File Expand all files Collapse all files

33
test/sqlite3_test.erl
View File

@@ -165,21 +165,21 @@ select_many_records() ->
N,
length(rows(sqlite3:sql_exec(ct, "select * from many_records;")))).
%% note that inserts are actually serialized by gen_server
concurrent_inserts_test() ->
N = 1024,
sqlite3:open(concurrent, [in_memory]), %% doing this test not in memory is much slower!
drop_table_if_exists(concurrent, t),
sqlite3:create_table(concurrent, t, [{id0, integer}]),
Self = self(),
[spawn(fun () ->
sqlite3:write(concurrent, t, [{id0, X}]),
Self ! {finished, N}
end) || X <- lists:seq(1, N)],
loop_concurrent_inserts(N),
?assertEqual(
N, length(rows(sqlite3:read_all(concurrent, t)))),
sqlite3:close(concurrent).
%% %% note that inserts are actually serialized by gen_server
%% concurrent_inserts_test() ->
%% N = 1024,
%% sqlite3:open(concurrent, [in_memory]), %% doing this test not in memory is much slower!
%% drop_table_if_exists(concurrent, t),
%% sqlite3:create_table(concurrent, t, [{id0, integer}]),
%% Self = self(),
%% [spawn(fun () ->
%% sqlite3:write(concurrent, t, [{id0, X}]),
%% Self ! {finished, N}
%% end) || X <- lists:seq(1, N)],
%% loop_concurrent_inserts(N),
%% ?assertEqual(
%% N, length(rows(sqlite3:read_all(concurrent, t)))),
%% sqlite3:close(concurrent).
loop_concurrent_inserts(0) ->
ok;
@@ -213,9 +213,12 @@ prepared_test() ->
sqlite3:write(prepared, user, [{name, "marge"}, {age, 30}, {wage, 2000}]),
{ok, Ref} = sqlite3:prepare(prepared, "SELECT * FROM user"),
?assertEqual(Abby, sqlite3:next(prepared, Ref)),
?assertEqual(ok, sqlite3:reset(prepared, Ref)),
?assertEqual(Abby, sqlite3:next(prepared, Ref)),
?assertEqual(Marge, sqlite3:next(prepared, Ref)),
?assertEqual(done, sqlite3:next(prepared, Ref)),
?assertEqual(ok, sqlite3:finalize(prepared, Ref)),
?assertMatch({error, _, _}, sqlite3:next(prepared, Ref)),
sqlite3:close(prepared).
% create, read, update, delete