We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent b93345e commit aa16611Copy full SHA for aa16611
1 file changed
src/org/armedbear/lisp/precompiler.lisp
@@ -382,7 +382,7 @@
382
(let ((op (car form)))
383
(when (and (consp op) (eq (%car op) 'LAMBDA))
384
(return-from precompile-function-call
385
- (or (precompile-function-position-lambda op (cdr form))
+ (or (precompile1 (precompile-function-position-lambda op (cdr form)))
386
(cons (precompile-lambda op)
387
(mapcar #'precompile1 (cdr form))))))
388
(when (or (not *in-jvm-compile*) (notinline-p op))
0 commit comments