[climacs-cvs] CVS update: climacs/kill-ring.lisp

Update of /project/climacs/cvsroot/climacs In directory common-lisp.net:/tmp/cvs-serv18458

Modified Files: kill-ring.lisp Log Message: Changed fixnum limit of kill ring to unsigned-byte Date: Thu Dec 30 04:55:14 2004 Author: ejohnson

Index: climacs/kill-ring.lisp diff -u climacs/kill-ring.lisp:1.2 climacs/kill-ring.lisp:1.3 --- climacs/kill-ring.lisp:1.2 Wed Dec 29 08:06:46 2004 +++ climacs/kill-ring.lisp Thu Dec 30 04:55:14 2004 @@ -25,7 +25,7 @@ (in-package :climacs-kill-ring)

(defclass kill-ring () - ((max-size :type 'fixnum + ((max-size :type unsigned-byte :initarg :max-size :accessor kr-max-size) (flexichain :type standard-flexichain