view release on metacpan or  search on metacpan

perlvtab.c  view on Meta::CPAN

    perlBegin,
    perlSync,
    perlCommit,
    perlRollback,
    NULL, /* perlFindFunction - not implemented yet! */
    perlRename,
};

static char *argv[] = { "perlvtab",
			"-e",
			"$SQLite::VirtualTable::EMBEDED=1;"
			"require SQLite::VirtualTable",
			NULL };

int sqlite3_extension_init(sqlite3 *db, char **pzErrMsg, 
                           const sqlite3_api_routines *pApi) {

    PerlInterpreter *my_perl = perl_alloc();
    int ac = 3;
    char **av = argv;
    char **env = environ;