s/#.most-positive-fixnum/#.sb!xc:most-positive-fixnum/ in seq.lisp.
Thanks, Christophe!
(integer (if (minusp count)
0
(1- most-positive-fixnum))))
(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)
(sb!xc:defmacro define-sequence-traverser (name args &body body)
(multiple-value-bind (body declarations docstring)
;;; versions, especially for internal versions off the main CVS
;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
;;; versions, especially for internal versions off the main CVS
;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)