Merge ssh://ssh.dcc.fc.up.pt:31064/home/vsc/yap

This commit is contained in:
Vitor Santos Costa
2018-06-30 16:31:40 +01:00
89 changed files with 633 additions and 624 deletions

View File

@@ -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++);

View File

@@ -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