[fset-cvs] r19 - trunk/Code

[Scott L. Burson]

Author: sburson
Date: Mon Oct 27 04:44:52 2008
New Revision: 19

Log:
Whoops, forgot to export `set-size'.



Modified:
   trunk/Code/defs.lisp

Modified: trunk/Code/defs.lisp
==============================================================================
--- trunk/Code/defs.lisp	(original)
+++ trunk/Code/defs.lisp	Mon Oct 27 04:44:52 2008
@@ -37,7 +37,7 @@
 	   ;; are unlikely to be useful in user code.
 	   #:equal? #:compare #:compare-slots #:identity-ordering-mixin
 	   #:define-cross-type-compare-methods
-	   #:empty? nonempty? #:size #:arb #:contains? #:multiplicity
+	   #:empty? nonempty? #:size #:set-size #:arb #:contains? #:multiplicity
 	   #:empty-set #:empty-bag #:empty-map #:empty-seq #:empty-tuple
 	   #:empty-wb-set #:empty-wb-bag #:empty-wb-map #:empty-wb-seq
 	   #:empty-dyn-tuple