Skip to content
Snippets Groups Projects
Commit 30f1bd52 authored by ram's avatar ram
Browse files

Fixed backquote lossage in DEFINE-FULL-CALL.

parent f3d1abca
No related branches found
No related tags found
No related merge requests found
...@@ -522,7 +522,7 @@ default-value-5 ...@@ -522,7 +522,7 @@ default-value-5
'(unknown-values-receiver))) '(unknown-values-receiver)))
(:args (:args
,@(unless (eq return :tail) ,@(unless (eq return :tail)
'((new-fp :scs (descriptor-reg) :to :eval `((new-fp :scs (descriptor-reg) :to :eval
,@(unless variable ,@(unless variable
`(:load-if (> nargs register-arg-count)))))) `(:load-if (> nargs register-arg-count))))))
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment