M2compiler-V3/bindings/sqlite3/SQLite.def

DEFINITION MODULE FOR "C" SQLite;
(* Core SQLite binding: connection setup, prepared statements,
   scalar/BLOB binding and results, column metadata, row changes,
   incremental BLOB I/O, error reporting, exec and connection hooks,
   and user-defined scalar functions.
   The full binding stays in m2SQLITE for later porting. *)

FROM SYSTEM IMPORT ADDRESS;
FROM CStr IMPORT CString;

EXPORT UNQUALIFIED
  SQLiteOk, SQLiteError, SQLiteInternal, SQLitePerm, SQLiteAbort,
  SQLiteBusy, SQLiteLocked, SQLiteNoMem, SQLiteReadOnly,
  SQLiteInterrupt, SQLiteIoErr, SQLiteCorrupt, SQLiteNotFound,
  SQLiteFull, SQLiteCantOpen, SQLiteProtocol, SQLiteEmpty,
  SQLiteSchema, SQLiteTooBig, SQLiteConstraint, SQLiteMismatch,
  SQLiteMisuse, SQLiteNoLfs, SQLiteAuth, SQLiteFormat, SQLiteRange,
  SQLiteNotADb, SQLiteNotice, SQLiteWarning, SQLiteRow, SQLiteDone,
  SQLiteInteger, SQLiteFloat, SQLiteText, SQLiteBlob, SQLiteNull,
  SQLiteConstraintPrimaryKey, SQLiteConstraintUnique,
  SQLiteConstraintCheck, SQLiteConstraintCommitHook,
  SQLiteConstraintForeignKey, SQLiteConstraintFunction,
  SQLiteConstraintNotNull, SQLiteConstraintTrigger,
  SQLiteConstraintVtab, SQLiteConstraintRowid,
  SQLiteConstraintPinned, SQLiteConstraintDatatype,
  SQLiteBlobReadOnly, SQLiteBlobReadWrite,
  SQLiteOpenReadOnly, SQLiteOpenReadWrite, SQLiteOpenCreate,
  SQLiteOpenURI, SQLiteOpenMemory, SQLiteOpenNoMutex,
  SQLiteOpenFullMutex, SQLiteOpenSharedCache, SQLiteOpenPrivateCache,
  SQLiteOpenWal,
  SQLiteUtf8, SQLiteUtf16Le, SQLiteUtf16Be, SQLiteUtf16, SQLiteAny,
  SQLiteDeterministic,
  SQLiteOpInsert, SQLiteOpUpdate, SQLiteOpDelete,
  SQLiteAuthOk, SQLiteAuthDeny, SQLiteAuthIgnore,
  SQLiteAuthDelete, SQLiteAuthSelect,
  SQLiteTraceStmt, SQLiteTraceProfile, SQLiteTraceRow, SQLiteTraceClose,
  SQLiteLimitLength, SQLiteLimitSqlLength, SQLiteLimitColumn,
  SQLiteLimitExprDepth, SQLiteLimitCompoundSelect, SQLiteLimitVdbeOp,
  SQLiteLimitFunctionArg, SQLiteLimitAttached,
  SQLiteLimitLikePatternLength, SQLiteLimitVariableNumber,
  SQLiteLimitTriggerDepth, SQLiteLimitWorkerThreads,
  SQLiteLimitParserDepth, SQLiteLimitSchema, SQLiteLimitTriggerSteps,
  SQLiteStmtStatusFullscanStep, SQLiteStmtStatusSort,
  SQLiteStmtStatusAutoindex, SQLiteStmtStatusVmStep,
  SQLiteStmtStatusReprepare, SQLiteStmtStatusRun,
  SQLiteStmtStatusFilterMiss, SQLiteStmtStatusFilterHit,
  SQLiteStmtStatusMemused,
  SQLitePreparePersistent, SQLitePrepareNormalize, SQLitePrepareNoVtab,
  SQLitePrepareDontLog, SQLitePrepareFromDdl,
  sqlite3_open,
  sqlite3_open_v2,
  sqlite3_exec,
  sqlite3_close,
  sqlite3_close_v2,
  sqlite3_prepare_v2,
  sqlite3_prepare_v3,
  sqlite3_bind_int,
  sqlite3_bind_int64,
  sqlite3_bind_double,
  sqlite3_bind_null,
  sqlite3_bind_blob,
  sqlite3_bind_zeroblob,
  sqlite3_bind_text,
  sqlite3_bind_parameter_count,
  sqlite3_bind_parameter_name,
  sqlite3_bind_parameter_index,
  sqlite3_step,
  sqlite3_sql,
  sqlite3_expanded_sql,
  sqlite3_stmt_readonly,
  sqlite3_stmt_busy,
  sqlite3_next_stmt,
  sqlite3_stmt_status,
  sqlite3_reset,
  sqlite3_clear_bindings,
  sqlite3_column_count,
  sqlite3_data_count,
  sqlite3_column_type,
  sqlite3_column_bytes,
  sqlite3_column_int,
  sqlite3_column_int64,
  sqlite3_column_double,
  sqlite3_column_blob,
  sqlite3_column_text,
  sqlite3_column_name,
  sqlite3_column_decltype,
  sqlite3_finalize,
  sqlite3_changes,
  sqlite3_total_changes,
  sqlite3_last_insert_rowid,
  sqlite3_blob_open,
  sqlite3_blob_close,
  sqlite3_blob_read,
  sqlite3_blob_write,
  sqlite3_blob_bytes,
  sqlite3_blob_reopen,
  sqlite3_backup_init,
  sqlite3_backup_step,
  sqlite3_backup_finish,
  sqlite3_backup_remaining,
  sqlite3_backup_pagecount,
  sqlite3_create_function_v2,
  sqlite3_value_type,
  sqlite3_value_int,
  sqlite3_value_int64,
  sqlite3_value_double,
  sqlite3_value_text,
  sqlite3_value_blob,
  sqlite3_value_bytes,
  sqlite3_value_numeric_type,
  sqlite3_value_dup,
  sqlite3_value_free,
  sqlite3_value_pointer,
  sqlite3_aggregate_context,
  sqlite3_get_auxdata,
  sqlite3_set_auxdata,
  sqlite3_result_null,
  sqlite3_result_int,
  sqlite3_result_int64,
  sqlite3_result_double,
  sqlite3_result_text,
  sqlite3_result_blob,
  sqlite3_result_error,
  sqlite3_result_error_code,
  sqlite3_result_error_toobig,
  sqlite3_result_error_nomem,
  sqlite3_result_value,
  sqlite3_result_zeroblob,
  sqlite3_result_zeroblob64,
  sqlite3_result_text64,
  sqlite3_result_blob64,
  sqlite3_user_data,
  sqlite3_context_db_handle,
  sqlite3_busy_timeout,
  sqlite3_busy_handler,
  sqlite3_interrupt,
  sqlite3_progress_handler,
  sqlite3_trace_v2,
  sqlite3_update_hook,
  sqlite3_commit_hook,
  sqlite3_rollback_hook,
  sqlite3_set_authorizer,
  sqlite3_db_handle,
  sqlite3_libversion,
  sqlite3_libversion_number,
  sqlite3_sourceid,
  sqlite3_threadsafe,
  sqlite3_error_offset,
  sqlite3_get_autocommit,
  sqlite3_complete,
  sqlite3_limit,
  sqlite3_errmsg,
  sqlite3_errstr,
  sqlite3_errcode,
  sqlite3_extended_errcode,
  sqlite3_extended_result_codes,
  sqlite3_free,
  SQLiteArrayAt,
  SQLiteTransient;

TYPE
  DbHandle = ADDRESS;
  StmtHandle = ADDRESS;
  BlobHandle = ADDRESS;
  BackupHandle = ADDRESS;
  ContextHandle = ADDRESS;
  ValueHandle = ADDRESS;

CONST
  SQLiteOk = 0;
  SQLiteError = 1;
  SQLiteInternal = 2;
  SQLitePerm = 3;
  SQLiteAbort = 4;
  SQLiteBusy = 5;
  SQLiteLocked = 6;
  SQLiteNoMem = 7;
  SQLiteReadOnly = 8;
  SQLiteInterrupt = 9;
  SQLiteIoErr = 10;
  SQLiteCorrupt = 11;
  SQLiteNotFound = 12;
  SQLiteFull = 13;
  SQLiteCantOpen = 14;
  SQLiteProtocol = 15;
  SQLiteEmpty = 16;
  SQLiteSchema = 17;
  SQLiteTooBig = 18;
  SQLiteConstraint = 19;
  SQLiteMismatch = 20;
  SQLiteMisuse = 21;
  SQLiteNoLfs = 22;
  SQLiteAuth = 23;
  SQLiteFormat = 24;
  SQLiteRange = 25;
  SQLiteNotADb = 26;
  SQLiteNotice = 27;
  SQLiteWarning = 28;
  SQLiteRow = 100;
  SQLiteDone = 101;

  SQLiteInteger = 1;
  SQLiteFloat = 2;
  SQLiteText = 3;
  SQLiteBlob = 4;
  SQLiteNull = 5;

  SQLiteConstraintCheck = 275;
  SQLiteConstraintCommitHook = 531;
  SQLiteConstraintForeignKey = 787;
  SQLiteConstraintFunction = 1043;
  SQLiteConstraintNotNull = 1299;
  SQLiteConstraintPrimaryKey = 1555;
  SQLiteConstraintTrigger = 1811;
  SQLiteConstraintUnique = 2067;
  SQLiteConstraintVtab = 2323;
  SQLiteConstraintRowid = 2579;
  SQLiteConstraintPinned = 2835;
  SQLiteConstraintDatatype = 3091;

  SQLiteBlobReadOnly = 0;
  SQLiteBlobReadWrite = 1;

  SQLiteOpenReadOnly = 1;
  SQLiteOpenReadWrite = 2;
  SQLiteOpenCreate = 4;
  SQLiteOpenURI = 64;
  SQLiteOpenMemory = 128;
  SQLiteOpenNoMutex = 32768;
  SQLiteOpenFullMutex = 65536;
  SQLiteOpenSharedCache = 131072;
  SQLiteOpenPrivateCache = 262144;
  SQLiteOpenWal = 524288;

  SQLiteUtf8 = 1;
  SQLiteUtf16Le = 2;
  SQLiteUtf16Be = 3;
  SQLiteUtf16 = 4;
  SQLiteAny = 5;
  SQLiteDeterministic = 2048;

  SQLiteOpDelete = 9;
  SQLiteOpInsert = 18;
  SQLiteOpUpdate = 23;

  SQLiteAuthOk = 0;
  SQLiteAuthDeny = 1;
  SQLiteAuthIgnore = 2;
  SQLiteAuthDelete = 9;
  SQLiteAuthSelect = 21;

  SQLiteTraceStmt = 1;
  SQLiteTraceProfile = 2;
  SQLiteTraceRow = 4;
  SQLiteTraceClose = 8;

  SQLiteLimitLength = 0;
  SQLiteLimitSqlLength = 1;
  SQLiteLimitColumn = 2;
  SQLiteLimitExprDepth = 3;
  SQLiteLimitCompoundSelect = 4;
  SQLiteLimitVdbeOp = 5;
  SQLiteLimitFunctionArg = 6;
  SQLiteLimitAttached = 7;
  SQLiteLimitLikePatternLength = 8;
  SQLiteLimitVariableNumber = 9;
  SQLiteLimitTriggerDepth = 10;
  SQLiteLimitWorkerThreads = 11;
  SQLiteLimitParserDepth = 12;
  SQLiteLimitSchema = 13;
  SQLiteLimitTriggerSteps = 14;

  SQLiteStmtStatusFullscanStep = 1;
  SQLiteStmtStatusSort = 2;
  SQLiteStmtStatusAutoindex = 3;
  SQLiteStmtStatusVmStep = 4;
  SQLiteStmtStatusReprepare = 5;
  SQLiteStmtStatusRun = 6;
  SQLiteStmtStatusFilterMiss = 7;
  SQLiteStmtStatusFilterHit = 8;
  SQLiteStmtStatusMemused = 99;

  SQLitePreparePersistent = 1;
  SQLitePrepareNormalize = 2;
  SQLitePrepareNoVtab = 4;
  SQLitePrepareDontLog = 16;
  SQLitePrepareFromDdl = 32;

PROCEDURE sqlite3_open (filename : ARRAY OF CHAR;
                        VAR db : DbHandle) : INTEGER;
PROCEDURE sqlite3_open_v2 (filename : ARRAY OF CHAR;
                           VAR db : DbHandle;
                           flags : INTEGER;
                           vfs : CString) : INTEGER;
PROCEDURE sqlite3_exec (db : DbHandle;
                        sql : ARRAY OF CHAR;
                        callback, arg : ADDRESS;
                        VAR errmsg : ADDRESS) : INTEGER;
PROCEDURE sqlite3_close (db : DbHandle) : INTEGER;
PROCEDURE sqlite3_close_v2 (db : DbHandle) : INTEGER;

PROCEDURE sqlite3_prepare_v2 (db : DbHandle;
                              sql : ARRAY OF CHAR;
                              nBytes : INTEGER;
                              VAR stmt : StmtHandle;
                              tail : ADDRESS) : INTEGER;
PROCEDURE sqlite3_prepare_v3 (db : DbHandle;
                              sql : ARRAY OF CHAR;
                              nBytes : INTEGER;
                              prepFlags : CARDINAL;
                              VAR stmt : StmtHandle;
                              VAR tail : ADDRESS) : INTEGER;
PROCEDURE sqlite3_bind_int (stmt : StmtHandle;
                            idx : INTEGER;
                            value : INTEGER) : INTEGER;
PROCEDURE sqlite3_bind_int64 (stmt : StmtHandle;
                              idx : INTEGER;
                              value : LONGINT) : INTEGER;
PROCEDURE sqlite3_bind_double (stmt : StmtHandle;
                               idx : INTEGER;
                               value : REAL) : INTEGER;
PROCEDURE sqlite3_bind_null (stmt : StmtHandle;
                             idx : INTEGER) : INTEGER;
PROCEDURE sqlite3_bind_blob (stmt : StmtHandle;
                             idx : INTEGER;
                             data : ADDRESS;
                             nBytes : INTEGER;
                             destructor : ADDRESS) : INTEGER;
PROCEDURE sqlite3_bind_zeroblob (stmt : StmtHandle;
                                 idx : INTEGER;
                                 nBytes : INTEGER) : INTEGER;
PROCEDURE sqlite3_bind_text (stmt : StmtHandle;
                             idx : INTEGER;
                             value : ARRAY OF CHAR;
                             nBytes : INTEGER;
                             destructor : ADDRESS) : INTEGER;
PROCEDURE sqlite3_bind_parameter_count (stmt : StmtHandle) : INTEGER;
PROCEDURE sqlite3_bind_parameter_name (stmt : StmtHandle;
                                       idx : INTEGER) : CString;
PROCEDURE sqlite3_bind_parameter_index (stmt : StmtHandle;
                                        name : ARRAY OF CHAR) : INTEGER;
PROCEDURE sqlite3_step (stmt : StmtHandle) : INTEGER;
PROCEDURE sqlite3_sql (stmt : StmtHandle) : CString;
PROCEDURE sqlite3_expanded_sql (stmt : StmtHandle) : CString;
PROCEDURE sqlite3_stmt_readonly (stmt : StmtHandle) : INTEGER;
PROCEDURE sqlite3_stmt_busy (stmt : StmtHandle) : INTEGER;
PROCEDURE sqlite3_next_stmt (db : DbHandle; stmt : StmtHandle) : StmtHandle;
PROCEDURE sqlite3_stmt_status (stmt : StmtHandle;
                               op : INTEGER;
                               resetFlag : INTEGER) : INTEGER;
PROCEDURE sqlite3_reset (stmt : StmtHandle) : INTEGER;
PROCEDURE sqlite3_clear_bindings (stmt : StmtHandle) : INTEGER;

PROCEDURE sqlite3_column_count (stmt : StmtHandle) : INTEGER;
PROCEDURE sqlite3_data_count (stmt : StmtHandle) : INTEGER;
PROCEDURE sqlite3_column_type (stmt : StmtHandle;
                               col : INTEGER) : INTEGER;
PROCEDURE sqlite3_column_bytes (stmt : StmtHandle;
                                col : INTEGER) : INTEGER;
PROCEDURE sqlite3_column_int (stmt : StmtHandle;
                              col : INTEGER) : INTEGER;
PROCEDURE sqlite3_column_int64 (stmt : StmtHandle;
                                col : INTEGER) : LONGINT;
PROCEDURE sqlite3_column_double (stmt : StmtHandle;
                                 col : INTEGER) : REAL;
PROCEDURE sqlite3_column_blob (stmt : StmtHandle;
                               col : INTEGER) : ADDRESS;
PROCEDURE sqlite3_column_text (stmt : StmtHandle;
                               col : INTEGER) : CString;
PROCEDURE sqlite3_column_name (stmt : StmtHandle;
                               col : INTEGER) : CString;
PROCEDURE sqlite3_column_decltype (stmt : StmtHandle;
                                   col : INTEGER) : CString;
PROCEDURE sqlite3_finalize (stmt : StmtHandle) : INTEGER;

PROCEDURE sqlite3_changes (db : DbHandle) : INTEGER;
PROCEDURE sqlite3_total_changes (db : DbHandle) : INTEGER;
PROCEDURE sqlite3_last_insert_rowid (db : DbHandle) : LONGINT;

PROCEDURE sqlite3_blob_open (db : DbHandle;
                             dbName, tableName, columnName : ARRAY OF CHAR;
                             rowid : LONGINT;
                             flags : INTEGER;
                             VAR blob : BlobHandle) : INTEGER;
PROCEDURE sqlite3_blob_close (blob : BlobHandle) : INTEGER;
PROCEDURE sqlite3_blob_read (blob : BlobHandle;
                             data : ADDRESS;
                             nBytes : INTEGER;
                             offset : INTEGER) : INTEGER;
PROCEDURE sqlite3_blob_write (blob : BlobHandle;
                              data : ADDRESS;
                              nBytes : INTEGER;
                              offset : INTEGER) : INTEGER;
PROCEDURE sqlite3_blob_bytes (blob : BlobHandle) : INTEGER;
PROCEDURE sqlite3_blob_reopen (blob : BlobHandle;
                               rowid : LONGINT) : INTEGER;

PROCEDURE sqlite3_backup_init (dst : DbHandle;
                               dstName : ARRAY OF CHAR;
                               src : DbHandle;
                               srcName : ARRAY OF CHAR) : BackupHandle;
PROCEDURE sqlite3_backup_step (backup : BackupHandle; pages : INTEGER) : INTEGER;
PROCEDURE sqlite3_backup_finish (backup : BackupHandle) : INTEGER;
PROCEDURE sqlite3_backup_remaining (backup : BackupHandle) : INTEGER;
PROCEDURE sqlite3_backup_pagecount (backup : BackupHandle) : INTEGER;

(* User-defined scalar functions.  xFunc receives
   (sqlite3_context*, int argc, sqlite3_value** argv); use
   SQLiteArrayAt(argv, i) to reach each value. *)
PROCEDURE sqlite3_create_function_v2 (db : DbHandle;
                                      name : ARRAY OF CHAR;
                                      nArgs : INTEGER;
                                      textRep : INTEGER;
                                      userData : ADDRESS;
                                      xFunc, xStep, xFinal : ADDRESS;
                                      xDestroy : ADDRESS) : INTEGER;

PROCEDURE sqlite3_value_type (value : ValueHandle) : INTEGER;
PROCEDURE sqlite3_value_int (value : ValueHandle) : INTEGER;
PROCEDURE sqlite3_value_int64 (value : ValueHandle) : LONGINT;
PROCEDURE sqlite3_value_double (value : ValueHandle) : REAL;
PROCEDURE sqlite3_value_text (value : ValueHandle) : CString;
PROCEDURE sqlite3_value_blob (value : ValueHandle) : ADDRESS;
PROCEDURE sqlite3_value_bytes (value : ValueHandle) : INTEGER;
PROCEDURE sqlite3_value_numeric_type (value : ValueHandle) : INTEGER;
PROCEDURE sqlite3_value_dup (value : ValueHandle) : ValueHandle;
PROCEDURE sqlite3_value_free (value : ValueHandle);
PROCEDURE sqlite3_value_pointer (value : ValueHandle;
                                 typeName : CString) : ADDRESS;

PROCEDURE sqlite3_aggregate_context (ctx : ContextHandle;
                                     nBytes : INTEGER) : ADDRESS;
PROCEDURE sqlite3_get_auxdata (ctx : ContextHandle;
                               idx : INTEGER) : ADDRESS;
PROCEDURE sqlite3_set_auxdata (ctx : ContextHandle;
                               idx : INTEGER;
                               data : ADDRESS;
                               destructor : ADDRESS);

PROCEDURE sqlite3_result_null (ctx : ContextHandle);
PROCEDURE sqlite3_result_int (ctx : ContextHandle; value : INTEGER);
PROCEDURE sqlite3_result_int64 (ctx : ContextHandle; value : LONGINT);
PROCEDURE sqlite3_result_double (ctx : ContextHandle; value : REAL);
PROCEDURE sqlite3_result_text (ctx : ContextHandle;
                               value : ARRAY OF CHAR;
                               nBytes : INTEGER;
                               destructor : ADDRESS);
PROCEDURE sqlite3_result_blob (ctx : ContextHandle;
                               data : ADDRESS;
                               nBytes : INTEGER;
                               destructor : ADDRESS);
PROCEDURE sqlite3_result_error (ctx : ContextHandle;
                                msg : ARRAY OF CHAR;
                                nBytes : INTEGER);
PROCEDURE sqlite3_result_error_code (ctx : ContextHandle; code : INTEGER);
PROCEDURE sqlite3_result_error_toobig (ctx : ContextHandle);
PROCEDURE sqlite3_result_error_nomem (ctx : ContextHandle);
PROCEDURE sqlite3_result_value (ctx : ContextHandle; value : ValueHandle);
PROCEDURE sqlite3_result_zeroblob (ctx : ContextHandle; nBytes : INTEGER);
PROCEDURE sqlite3_result_zeroblob64 (ctx : ContextHandle;
                                     nBytes : LONGCARD) : INTEGER;
PROCEDURE sqlite3_result_text64 (ctx : ContextHandle;
                                 value : ARRAY OF CHAR;
                                 nBytes : LONGCARD;
                                 destructor : ADDRESS;
                                 encoding : INTEGER);
PROCEDURE sqlite3_result_blob64 (ctx : ContextHandle;
                                 data : ADDRESS;
                                 nBytes : LONGCARD;
                                 destructor : ADDRESS);

PROCEDURE sqlite3_user_data (ctx : ContextHandle) : ADDRESS;
PROCEDURE sqlite3_context_db_handle (ctx : ContextHandle) : DbHandle;

(* Connection hooks.  Hooks must be top-level V3 procedures. *)
PROCEDURE sqlite3_busy_timeout (db : DbHandle; milliseconds : INTEGER) : INTEGER;
PROCEDURE sqlite3_busy_handler (db : DbHandle;
                                callback, arg : ADDRESS) : INTEGER;
PROCEDURE sqlite3_interrupt (db : DbHandle);
PROCEDURE sqlite3_progress_handler (db : DbHandle;
                                    nOps : INTEGER;
                                    callback, arg : ADDRESS);
PROCEDURE sqlite3_trace_v2 (db : DbHandle;
                            mask : CARDINAL;
                            callback, arg : ADDRESS) : INTEGER;
PROCEDURE sqlite3_update_hook (db : DbHandle;
                               callback, arg : ADDRESS) : ADDRESS;
PROCEDURE sqlite3_commit_hook (db : DbHandle;
                               callback, arg : ADDRESS) : ADDRESS;
PROCEDURE sqlite3_rollback_hook (db : DbHandle;
                                 callback, arg : ADDRESS);
PROCEDURE sqlite3_set_authorizer (db : DbHandle;
                                  callback, arg : ADDRESS) : INTEGER;
PROCEDURE sqlite3_db_handle (stmt : StmtHandle) : DbHandle;
PROCEDURE sqlite3_libversion () : CString;
PROCEDURE sqlite3_libversion_number () : INTEGER;
PROCEDURE sqlite3_sourceid () : CString;
PROCEDURE sqlite3_threadsafe () : INTEGER;
PROCEDURE sqlite3_error_offset (db : DbHandle) : INTEGER;
PROCEDURE sqlite3_get_autocommit (db : DbHandle) : INTEGER;
PROCEDURE sqlite3_complete (sql : ARRAY OF CHAR) : INTEGER;
PROCEDURE sqlite3_limit (db : DbHandle;
                         id : INTEGER;
                         newVal : INTEGER) : INTEGER;

PROCEDURE sqlite3_errmsg (db : DbHandle) : CString;
PROCEDURE sqlite3_errstr (code : INTEGER) : CString;
PROCEDURE sqlite3_errcode (db : DbHandle) : INTEGER;
PROCEDURE sqlite3_extended_errcode (db : DbHandle) : INTEGER;
PROCEDURE sqlite3_extended_result_codes (db : DbHandle;
                                         onoff : INTEGER) : INTEGER;
PROCEDURE sqlite3_free (p : ADDRESS);

PROCEDURE SQLiteArrayAt (array : ADDRESS; idx : INTEGER) : ADDRESS;
  EXTERNAL "m2_sqlite_array_at";
(* Index a C array of pointers, such as char **argv or sqlite3_value **. *)

PROCEDURE SQLiteTransient () : ADDRESS;
  EXTERNAL "m2_sqlite_transient";
(* The SQLITE_TRANSIENT destructor sentinel: SQLite copies bound data. *)

END SQLite.