mirror of
https://github.com/DBD-SQLite/DBD-SQLite
synced 2025-06-08 14:48:32 -04:00
Reverting
This commit is contained in:
parent
a17515dbdc
commit
018e33ddd4
1 changed files with 7 additions and 4 deletions
11
dbdimp.c
11
dbdimp.c
|
@ -30,7 +30,8 @@ DBISTATE_DECLARE;
|
||||||
void
|
void
|
||||||
sqlite_init(dbistate_t *dbistate)
|
sqlite_init(dbistate_t *dbistate)
|
||||||
{
|
{
|
||||||
/* DBISTATE_INIT; Initialize the DBI macros */
|
dTHX;
|
||||||
|
DBISTATE_INIT; /* Initialize the DBI macros */
|
||||||
}
|
}
|
||||||
|
|
||||||
static void
|
static void
|
||||||
|
@ -40,10 +41,12 @@ _sqlite_error(pTHX_ char *file, int line, SV *h, imp_xxh_t *imp_xxh, int rc, cha
|
||||||
|
|
||||||
/* #7753: DBD::SQLite error shouldn't include extraneous info */
|
/* #7753: DBD::SQLite error shouldn't include extraneous info */
|
||||||
/* sv_catpvf(errstr, "(%d) at %s line %d", rc, file, line); */
|
/* sv_catpvf(errstr, "(%d) at %s line %d", rc, file, line); */
|
||||||
|
|
||||||
if ( DBIc_TRACE_LEVEL(imp_xxh) >= 3 ) {
|
if ( DBIc_TRACE_LEVEL(imp_xxh) >= 3 ) {
|
||||||
PerlIO_printf(DBIc_LOGPIO(imp_xxh), "sqlite error %d recorded: %s at %s line %d\n",
|
PerlIO_printf(
|
||||||
rc, what, file, line);
|
DBIc_LOGPIO(imp_xxh),
|
||||||
|
"sqlite error %d recorded: %s at %s line %d\n",
|
||||||
|
rc, what, file, line
|
||||||
|
);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
Loading…
Add table
Reference in a new issue