Rebol-SQLite/src/sqlite-command-initialize.c at main · Siskin-framework/Rebol-SQLite · GitHub

23 lines (21 loc) · 775 Bytes

// ____ __ __ ______ __

// / __ \/ /__/ /__ ___ /_ __/__ ____/ /

// / /_/ / / _ / -_|_-<_ / / / -_) __/ _ \

// \____/_/\_,_/\__/___(@)_/ \__/\__/_// /

// ~~~ oldes.huhuman at gmail.com ~~~ /_/

// SPDX-License-Identifier: MIT

// =============================================================================

// Rebol/SQLite extension

// =============================================================================

// Use on your own risc!

#include "sqlite-rebol-extension.h"

int cmd_sqlite_initialize(RXIFRM* frm, void* reb_ctx) {

int rc = sqlite3_initialize();

if (rc != SQLITE_OK) {

snprintf((char*)error_buffer, 254,"[SQLITE] %s", sqlite3_errstr(rc));

RXA_SERIES(frm, 1) = (void*)error_buffer;

return RXR_ERROR;

}

return RXR_TRUE;

}

Expand file tree