Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
Kamil Shakirov
alexandria
Commits
7f0750bf
Commit
7f0750bf
authored
Jan 31, 2018
by
Kamil Shakirov
Browse files
Do not inline LENGTH on LispWorks.
Fixes compile-time warnings: "Inline expansion for LENGTH not found"
parent
e5c54bc3
Changes
1
Show whitespace changes
Inline
Side-by-side
sequences.lisp
View file @
7f0750bf
...
...
@@ -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
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment