tests are starting
This commit is contained in:
18
test.erl
18
test.erl
@@ -1,5 +1,19 @@
|
||||
#!/usr/bin/env escript
|
||||
%%! -smp enable -pa ebin -name testsqlite3
|
||||
main(_) ->
|
||||
ct:run("src").
|
||||
|
||||
-record(user, {name, age, wage}).
|
||||
|
||||
main(_) ->
|
||||
sqlite3:open(ct),
|
||||
sqlite3:create_table(ct, user, [{name, text}, {age, integer}, {wage, integer}]),
|
||||
[user] = sqlite3:list_tables(ct),
|
||||
[{name, text}, {age, integer}, {wage, integer}] = sqlite3:table_info(ct, user),
|
||||
sqlite3:write(ct, user, [{name, "abby"}, {age, 20}, {wage, 2000}]),
|
||||
sqlite3:write(ct, user, [{name, "marge"}, {age, 30}, {wage, 3000}]),
|
||||
sqlite3:sql_exec(ct, "select * from user;"),
|
||||
sqlite3:read(ct, user, {name, "abby"}),
|
||||
sqlite3:delete(ct, user, {name, "abby"}),
|
||||
sqlite3:drop_table(ct, user),
|
||||
%sqlite3:delete_db(ct)
|
||||
sqlite3:close(ct).
|
||||
|
||||
|
||||
Reference in New Issue
Block a user