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

driver working and passes its test

Browse Source
This commit is contained in:
Max Lapshin
2009-10-14 15:27:03 +04:00
parent 17424efb41
commit 8ec1f1fdad
3 changed files with 11 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/sqlite3.erl
View File

@@ -461,7 +461,7 @@ create_cmd(Dbase) ->
wait_result(Port) ->
receive
{Port, Reply} ->
io:format("Reply: ~p~n", [Reply]),
% io:format("Reply: ~p~n", [Reply]),
Reply;
{error, Reason} ->
io:format("Error: ~p~n", [Reason]),
@@ -488,5 +488,5 @@ build_table_info([], Acc) ->
build_table_info([[ColName, ColType] | Tl], Acc) ->
build_table_info(Tl, [{list_to_atom(ColName), sqlite3_lib:col_type(ColType)}| Acc]);
build_table_info([[ColName, ColType, "PRIMARY", "KEY"] | Tl], Acc) ->
build_table_info(Tl, [{list_to_atom(ColName), sqlite3_lib:col_type(ColType)}| Acc]).
build_table_info(Tl, [{list_to_atom(ColName), primary_key}| Acc]).