Merge ssh://ssh.dcc.fc.up.pt:31064/home/vsc/yap
This commit is contained in:
@@ -595,7 +595,7 @@ static Int c_sqlite3_row(USES_REGS1) {
|
||||
size_t bytes = sqlite3_column_bytes(res_set->stmt, i);
|
||||
void *pt;
|
||||
tf = Yap_AllocExternalDataInStack(EXTERNAL_BLOB, bytes, &pt);
|
||||
memcpy(pt, sqlite3_column_blob(res_set->stmt, i), bytes);
|
||||
memmove(pt, sqlite3_column_blob(res_set->stmt, i), bytes);
|
||||
} break;
|
||||
case SQLITE_NULL:
|
||||
null_atom[0] = MkIntegerTerm(null_id++);
|
||||
|
||||
@@ -16,7 +16,6 @@ main_ .
|
||||
|
||||
init :-
|
||||
db_open(sqlite3, '/data/user/0/pt.up.yap.yapdroid/files/Yap/chinook.db', _, _),
|
||||
|
||||
% db_open(sqlite3, 'chinook.db', _, _),
|
||||
writeln('chinook has landed').
|
||||
|
||||
@@ -75,7 +74,7 @@ go :-
|
||||
go_cut1.
|
||||
|
||||
go :-
|
||||
X=1,
|
||||
% X=1,
|
||||
artists(X,Y),
|
||||
writeln(X:Y).
|
||||
|
||||
@@ -86,7 +85,7 @@ go_cut0 :-
|
||||
|
||||
|
||||
go_cut1 :-
|
||||
X=1,
|
||||
% X=1,
|
||||
artists(X,Y),
|
||||
writeln(X:Y),
|
||||
!.
|
||||
@@ -94,5 +93,6 @@ go_cut1 :-
|
||||
close :-
|
||||
db_close.
|
||||
|
||||
:- main.
|
||||
:- stop_low_level_trace.
|
||||
|
||||
|
||||
:- initialization(main).
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
Reference in New Issue
Block a user