"Create a new cycle with the elements ELEMENTS."
+ ;; XXX: SBCL will say that dead code elimination is going on
+ ;; here. This is because COERCE expands into (IF (VECTORP X) X ...),
+ ;; and SBCL can infer that X is a list.
+ ;; -- Robert Smith 5/24/2014
(let ((cycle (%make-cycle :spec (coerce elements 'vector))))