projects
/
sbcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
0.9.15.48: more precice unions of array types
[sbcl.git]
/
src
/
compiler
/
fopcompile.lisp
diff --git
a/src/compiler/fopcompile.lisp
b/src/compiler/fopcompile.lisp
index
42cff0f
..
7427217
100644
(file)
--- a/
src/compiler/fopcompile.lisp
+++ b/
src/compiler/fopcompile.lisp
@@
-108,7
+108,7
@@
(every #'fopcompilable-p (cdr args))))
;; Likewise for LOCALLY
((locally)
(every #'fopcompilable-p (cdr args))))
;; Likewise for LOCALLY
((locally)
- (every #'fopcompilable-p (cdr args)))
+ (every #'fopcompilable-p args))
(otherwise
;; ordinary function calls
(and (symbolp operator)
(otherwise
;; ordinary function calls
(and (symbolp operator)