[mcclim-cvs] CVS mcclim/Drei

[thenriksen]

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