summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--module/language/tree-il/inline.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/module/language/tree-il/inline.scm b/module/language/tree-il/inline.scm
index 4e3863ef6..8dd7dd334 100644
--- a/module/language/tree-il/inline.scm
+++ b/module/language/tree-il/inline.scm
@@ -121,7 +121,7 @@
(lp (cdr args) (cdr vars)))
(else #f))))
- (and (not opt) (not kw) (not alternate)
+ (and (not opt) (not kw) rest (not alternate)
(record-case body
((<application> proc args)
;; (lambda args (apply (lambda ...) args)) => (lambda ...)