diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2021-12-11 07:47:34 +0100 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2021-12-11 08:18:09 +0100 |
| commit | 17569c94954dc1d9d47155a8ca987d8ff4855180 (patch) | |
| tree | ace6d9130160df747936eebbf723c7a63c9a9ad6 /src/sqlite.c | |
| parent | 19233f650168b8298075d7ae330dbeda9748b57d (diff) | |
| download | emacs-17569c94954dc1d9d47155a8ca987d8ff4855180.tar.gz emacs-17569c94954dc1d9d47155a8ca987d8ff4855180.tar.bz2 emacs-17569c94954dc1d9d47155a8ca987d8ff4855180.zip | |
Fix Fsqlite_finalize book-keeping
* src/sqlite.c (Fsqlite_finalize): Mark the object as dead.
Diffstat (limited to 'src/sqlite.c')
| -rw-r--r-- | src/sqlite.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/sqlite.c b/src/sqlite.c index 42a7a3a0268..c1f3e7b599f 100644 --- a/src/sqlite.c +++ b/src/sqlite.c @@ -290,7 +290,7 @@ DEFUN ("sqlite-close", Fsqlite_close, Ssqlite_close, 1, 1, 0, check_sqlite (db, false); sqlite3_close (XSQLITE (db)->db); XSQLITE (db)->db = NULL; - return Qnil; + return Qt; } /* Bind values in a statement like @@ -647,6 +647,7 @@ This will free the resources held by SET. */) { check_sqlite (set, true); sqlite3_finalize (XSQLITE (set)->stmt); + XSQLITE (set)->db = NULL; return Qt; } |