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

[Elliott Johnson]

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