From: Kevin M. Rosenberg Date: Tue, 13 Apr 2004 17:19:35 +0000 (+0000) Subject: r8996: support memory database in probe-database X-Git-Tag: v3.8.6~636 X-Git-Url: http://git.kpe.io/?a=commitdiff_plain;h=c4ee2160339afd4cd4b8cb3cd1da5ad900129252;hp=0cd76c40b5906d3c5142796d6aa6b28da76c3a0a;p=clsql.git r8996: support memory database in probe-database --- diff --git a/ChangeLog b/ChangeLog index 684b589..1bbbb26 100644 --- a/ChangeLog +++ b/ChangeLog @@ -2,6 +2,8 @@ * Version 2.6.12 * base/transactions.lisp: Add quote for macro expansion of WITH-TRANSACTIONS [Time Howe] + * db-sqlite/sqlite-sql.lisp: Support memory database + in database-probe [Ng Pheng Siong] 12 Apr 2004 Kevin Rosenberg (kevin@rosenberg.net) * Version 2.6.11 diff --git a/db-sqlite/sqlite-sql.lisp b/db-sqlite/sqlite-sql.lisp index bc93bb8..1f3c158 100644 --- a/db-sqlite/sqlite-sql.lisp +++ b/db-sqlite/sqlite-sql.lisp @@ -298,7 +298,9 @@ (defmethod database-probe (connection-spec (type (eql :sqlite))) (destructuring-bind (name) connection-spec - ;; TODO: Add a test that this file is a real sqlite database - (and (probe-file name) t))) + ;; TODO: Add a test that this file is a real sqlite database + (or (string-equal ":memory:" name) + (and (probe-file name) t)))) +