X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fxset.lisp;h=4c65e71f895460c72d062f808429b78101ccec5d;hb=a6a12ed609d5467ec43b411283e5b3568fee81df;hp=dfdf182bd64ae8f9baa8d3e5a570088477e945fd;hpb=281e26e9e1142c343211fdc0ac65d7d3c62f2612;p=sbcl.git diff --git a/src/code/xset.lisp b/src/code/xset.lisp index dfdf182..4c65e71 100644 --- a/src/code/xset.lisp +++ b/src/code/xset.lisp @@ -51,7 +51,7 @@ data))) nil) -(defconstant +xset-list-size-limit+ 12) +(defconstant +xset-list-size-limit+ 24) ;;; Checks that the element is not in the set yet. (defun add-to-xset (elt xset)