diff --git a/sequences.lisp b/sequences.lisp
index 118322ab5c54ce6f633b36fa243c9c3fffd1a8c3..16d13234727bdb96b0dda54b3e25f20a29134478 100644
--- a/sequences.lisp
+++ b/sequences.lisp
@@ -9,7 +9,7 @@
   "Return true if SEQUENCE is a sequence of length LENGTH. Signals an error if
 SEQUENCE is not a sequence. Returns FALSE for circular lists."
   (declare (type array-index length)
-           (inline length)
+           #-lispworks (inline length)
            (optimize speed))
   (etypecase sequence
     (null