[movitz-cvs] CVS update: movitz/losp/muerte/integers.lisp

[Frode Vatvedt Fjeld]

Update of /project/movitz/cvsroot/movitz/losp/muerte
In directory common-lisp.net:/tmp/cvs-serv1445

Modified Files:
	integers.lisp 
Log Message:
Minor typo.

Date: Fri Apr 16 15:22:21 2004
Author: ffjeld

Index: movitz/losp/muerte/integers.lisp
diff -u movitz/losp/muerte/integers.lisp:1.6 movitz/losp/muerte/integers.lisp:1.7
--- movitz/losp/muerte/integers.lisp:1.6	Thu Apr 15 09:10:37 2004
+++ movitz/losp/muerte/integers.lisp	Fri Apr 16 15:22:21 2004
@@ -9,7 +9,7 @@
 ;;;; Created at:    Wed Nov  8 18:44:57 2000
 ;;;; Distribution:  See the accompanying file COPYING.
 ;;;;                
-;;;; $Id: integers.lisp,v 1.6 2004/04/15 13:10:37 ffjeld Exp $
+;;;; $Id: integers.lisp,v 1.7 2004/04/16 19:22:21 ffjeld Exp $
 ;;;;                
 ;;;;------------------------------------------------------------------
 
@@ -1088,7 +1088,7 @@
     '(integer 0))
    ((typep size '(integer 1 *))
     (list 'integer 0 (1- (ash 1 size))))
-   (t (error "Illegal size for signed-byte."))))
+   (t (error "Illegal size for unsigned-byte."))))
 
 (define-simple-typep (bit bitp) (x)
   (or (eq x 0) (eq x 1)))