Update of /project/elephant/cvsroot/elephant/src In directory common-lisp.net:/tmp/cvs-serv30576/src

Modified Files: collections.lisp Log Message: missing generic warnings

Date: Sun Aug 29 09:48:04 2004 Author: blee

Index: elephant/src/collections.lisp diff -u elephant/src/collections.lisp:1.4 elephant/src/collections.lisp:1.5 --- elephant/src/collections.lisp:1.4 Sat Aug 28 08:39:30 2004 +++ elephant/src/collections.lisp Sun Aug 29 09:48:04 2004 @@ -39,15 +39,16 @@ (in-package "ELEPHANT")

;;; collection types -;;; abstract hash-like collections -;;; equal hashing (except probably for array, hashe, instance keys!) -(defclass persistent-collection (persistent) ()) - -;(defgeneric get-value (key ht &rest args)) -;(defgeneric remove-kv (key ht &rest args)) +;;; we're slot-less +(defclass persistent-collection (persistent) + ())

;;; btree access (defclass btree (persistent-collection) ()) + +(defgeneric get-value (key ht)) +(defgeneric (setf get-value) (value key ht)) +(defgeneric remove-kv (key ht &key transaction auto-commit))

(defmethod get-value (key (ht btree)) (declare (optimize (speed 3) (safety 0) (space 3)))