0.7.9.65:

[sbcl.git] / src / code / seq.lisp

diff --git a/src/code/seq.lisp b/src/code/seq.lisp
index 4e60915..dc39f2f 100644 (file)
--- a/src/code/seq.lisp
+++ b/src/code/seq.lisp
@@ -32,7 +32,7 @@
              (integer (if (minusp count)
                           0
                           (1- most-positive-fixnum))))
-           (mod #.most-positive-fixnum))))
+           (mod #.sb!xc:most-positive-fixnum))))
 
 (sb!xc:defmacro define-sequence-traverser (name args &body body)
   (multiple-value-bind (body declarations docstring)