Update of /project/elephant/cvsroot/elephant/src/db-clsql In directory clnet:/tmp/cvs-serv20360/src/db-clsql
Modified Files: sql-controller.lisp Log Message: Enable use of %bignum-ref under sbcl; update TODO list and roadmap
--- /project/elephant/cvsroot/elephant/src/db-clsql/sql-controller.lisp 2007/02/04 04:34:56 1.15 +++ /project/elephant/cvsroot/elephant/src/db-clsql/sql-controller.lisp 2007/02/05 00:32:27 1.16 @@ -340,7 +340,9 @@ (declare (ignore recover recover-fatal thread)) (the sql-store-controller (let* ((dbtype (car (second (controller-spec sc)))) - (new-p (not (probe-file (cadr (second (controller-spec sc)))))) + (path (cadr (second (controller-spec sc)))) + (new-p (or (eq :memory path) + (not (probe-file path)))) (con (clsql:connect (cdr (second (controller-spec sc))) :database-type dbtype :if-exists :old)))