Fix handling of default values

2010-10-15 12:52:49 +04:00
parent 78944481d7
commit 9c28f38027
2 changed files with 11 additions and 5 deletions
--- a/test/sqlite3_test.erl
+++ b/test/sqlite3_test.erl
@@ -78,7 +78,7 @@ select_many_records_test() ->
 	sqlite3:open(ct),
 	drop_table_if_exists(ct, many_records),
    sqlite3:create_table(ct, many_records, [{id, integer}, {name, text}]),
-	[sqlite3:write(ct, many_records, [{id, X}, {name, "bar"}]) || X <- Seq],
+	[sqlite3:write(ct, many_records, [{id, X}, {name, "bar"}]) || X <- lists:seq(1, 1024)], %% takes very long :(
 	Columns = ["id", "name"],
    ?assertEqual(
        [{columns, Columns}, {rows, [{1, <<"bar">>}]}],