tests are starting

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)]),
+        io:format("Error loading ~p: ~p", [?DRIVER_NAME, erl_ddll:format_error(Error)]),
-        {error}
+        {stop, failed}
     end.
 		     
 %%--------------------------------------------------------------------

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).