Update of /project/mcclim/cvsroot/mcclim/Drei In directory clnet:/tmp/cvs-serv12357 Modified Files: kill-ring.lisp Log Message: Added explicit `defgeneric's. --- /project/mcclim/cvsroot/mcclim/Drei/kill-ring.lisp 2006/11/28 23:34:10 1.3 +++ /project/mcclim/cvsroot/mcclim/Drei/kill-ring.lisp 2006/12/04 19:22:02 1.4 @@ -24,6 +24,14 @@ (in-package :drei-kill-ring) +(defgeneric kill-ring-chain (ring) + (:documentation "Return the cursorchain associated with the +kill ring `ring'.")) + +(defgeneric kill-ring-cursor (ring) + (:documentation "Return the flexicursor associated with the +kill ring.")) + (defclass kill-ring () ((max-size :type (integer 5 *) ;5 element minimum from flexichain protocol :initarg :max-size