use FeatureSummary

2017-07-30 22:24:00 +01:00
parent 8ad14f6765
commit 5b5e954dbc
28 changed files with 30 additions and 94 deletions
--- a/packages/myddas/sqlite3/myddas_sqlite3.c
+++ b/packages/myddas/sqlite3/myddas_sqlite3.c
@@ -606,9 +606,9 @@ static Int c_sqlite3_row(USES_REGS1) {
        break;
      case SQLITE_BLOB: {
        size_t bytes = sqlite3_column_bytes(res_set->stmt, i);
-        tf = Yap_AllocExternalDataInStack(EXTERNAL_BLOB, bytes);
-        memcpy(ExternalBlobFromTerm(tf), sqlite3_column_blob(res_set->stmt, i),
-               bytes);
+	  void *pt;
+        tf = Yap_AllocExternalDataInStack(EXTERNAL_BLOB, bytes, &pt);
+        memcpy(pt, sqlite3_column_blob(res_set->stmt, i), bytes);
      } break;
      case SQLITE_NULL:
        null_atom[0] = MkIntegerTerm(null_id++);