From 30f1bd5209d01909055b0e0f4a100defe28fcea3 Mon Sep 17 00:00:00 2001 From: ram <ram> Date: Wed, 30 May 1990 13:40:47 +0000 Subject: [PATCH] Fixed backquote lossage in DEFINE-FULL-CALL. --- compiler/old-rt/call.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/compiler/old-rt/call.lisp b/compiler/old-rt/call.lisp index a442f3135..7545d794c 100644 --- a/compiler/old-rt/call.lisp +++ b/compiler/old-rt/call.lisp @@ -522,7 +522,7 @@ default-value-5 '(unknown-values-receiver))) (:args ,@(unless (eq return :tail) - '((new-fp :scs (descriptor-reg) :to :eval + `((new-fp :scs (descriptor-reg) :to :eval ,@(unless variable `(:load-if (> nargs register-arg-count)))))) -- GitLab