Update of /project/elephant/cvsroot/elephant/src/elephant In directory clnet:/tmp/cvs-serv32598/src/elephant
Modified Files: collections.lisp Log Message: test conditions fix, new run-regression test interface; remove doc strings to cleanup manual
--- /project/elephant/cvsroot/elephant/src/elephant/collections.lisp 2007/04/28 02:31:15 1.28 +++ /project/elephant/cvsroot/elephant/src/elephant/collections.lisp 2007/04/28 17:18:33 1.29 @@ -340,8 +340,8 @@ "Move to the previous duplicate element (with the same key.) Returns has-pair key value."))
+;; Default implementation. Plan is to update both backends when BDB 4.6 comes out (defmethod cursor-prev-dup ((cur cursor)) - "Default implementation. Plan is to update both backends when BDB 4.6 comes out" (when (cursor-initialized-p cur) (multiple-value-bind (exists? skey-cur) (cursor-current cur) @@ -362,8 +362,8 @@ "Move to the previous duplicate element (with the same key.) Returns has-tuple / secondary key / value / primary key."))
+;; Default implementation. Plan is to update both backends when BDB 4.6 comes out (defmethod cursor-pprev-dup ((cur cursor)) - "Default implementation. Plan is to update both backends when BDB 4.6 comes out" (when (cursor-initialized-p cur) (multiple-value-bind (exists? skey-cur) (cursor-current cur)