Update of /project/elephant/cvsroot/elephant/src/db-clsql In directory clnet:/tmp/cvs-serv20360/src/db-clsql

Modified Files: sql-collections.lisp sql-controller.lisp sql-transaction.lisp Added Files: package.lisp Log Message:

Remove all references to sleepycat; change to bdb db-bdb or berkeley-db; passes all test for BDB and SQLite on Allegro/Mac OS/32-bit

--- /project/elephant/cvsroot/elephant/src/db-clsql/sql-collections.lisp 2006/11/11 15:30:26 1.5 +++ /project/elephant/cvsroot/elephant/src/db-clsql/sql-collections.lisp 2006/11/11 18:41:11 1.6 @@ -17,7 +17,7 @@ ;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL. ;;;

-(in-package "ELEPHANT-CLSQL") +(in-package :db-clsql)

(defmethod get-value (key (bt sql-btree-index)) "Get the value in the primary DB from a secondary key." --- /project/elephant/cvsroot/elephant/src/db-clsql/sql-controller.lisp 2006/04/27 01:34:49 1.11 +++ /project/elephant/cvsroot/elephant/src/db-clsql/sql-controller.lisp 2006/11/11 18:41:11 1.12 @@ -16,13 +16,7 @@ ;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL. ;;;

-(in-package "ELEPHANT") - -(defpackage elephant-clsql - (:use :common-lisp :uffi :cl-base64 - :elephant :elephant-memutil :elephant-backend )) - -(in-package "ELEPHANT-CLSQL") +(in-package :db-clsql)

;; ;; The main SQL Controller Class --- /project/elephant/cvsroot/elephant/src/db-clsql/sql-transaction.lisp 2006/02/19 16:22:40 1.2 +++ /project/elephant/cvsroot/elephant/src/db-clsql/sql-transaction.lisp 2006/11/11 18:41:11 1.3 @@ -17,7 +17,7 @@ ;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL. ;;;

-(in-package "ELEPHANT-CLSQL") +(in-package :db-clsql)

(defmethod execute-transaction ((sc sql-store-controller) txn-fn &key &allow-other-keys) "Execute a body with a transaction in place. On success,

--- /project/elephant/cvsroot/elephant/src/db-clsql/package.lisp 2006/11/11 18:41:11 NONE +++ /project/elephant/cvsroot/elephant/src/db-clsql/package.lisp 2006/11/11 18:41:11 1.1 ;;; -*- Mode: Lisp; Syntax: ANSI-Common-Lisp; Base: 10 -*- ;;; ;;; sql-controller.lisp -- Interface to a CLSQL based object store. ;;; ;;; Initial version 10/12/2005 by Robert L. Read ;;; read@robertlread.net ;;; ;;; part of ;;; ;;; Elephant: an object-oriented database for Common Lisp ;;; ;;; Copyright (c) 2005 by Robert L. Read ;;; ;;; Elephant users are granted the rights to distribute and use this software ;;; as governed by the terms of the Lisp Lesser GNU Public License ;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL. ;;;

(in-package :elephant)

(defpackage db-clsql (:use :common-lisp :uffi :cl-base64 :elephant :elephant-memutil :elephant-backend))