diff --git a/src/sqlite3.erl b/src/sqlite3.erl index a6f9d1c..c41baaf 100644 --- a/src/sqlite3.erl +++ b/src/sqlite3.erl @@ -328,14 +328,14 @@ drop_table(Db, Tbl) -> -spec(init/1::([any()]) -> init_return()). init(Options) -> Dbase = proplists:get_value(db, Options), - SearchDir = filename:join([filename:dirname(code:which(?MODULE)), "..", "priv"]), + SearchDir = filename:join([filename:dirname(code:which(?MODULE)), "..", "ebin"]), case erl_ddll:load(SearchDir, atom_to_list(?DRIVER_NAME)) of ok -> Port = open_port({spawn, ?DRIVER_NAME}, [{packet, 2}, binary]), {ok, #state{port = Port, ops = Options}}; {error, Error} -> - error_logger:error_msg("Error loading ~p: ~p", [?DRIVER_NAME, erl_ddll:format_error(Error)]), - {error} + io:format("Error loading ~p: ~p", [?DRIVER_NAME, erl_ddll:format_error(Error)]), + {stop, failed} end. %%-------------------------------------------------------------------- diff --git a/test.erl b/test.erl index 592cd16..8d4bd83 100755 --- a/test.erl +++ b/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).