Commit 7f0750bf authored by Kamil Shakirov's avatar Kamil Shakirov
Browse files

Do not inline LENGTH on LispWorks.

Fixes compile-time warnings: "Inline expansion for LENGTH not found"
parent e5c54bc3
......@@ -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
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment