- potential fix to #690

armedbear · Dec 21, 2024 · 277e9c4 · 277e9c4
1 parent 1245154
commit 277e9c4
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/src/org/armedbear/lisp/compiler-pass2.lisp b/src/org/armedbear/lisp/compiler-pass2.lisp
@@ -5627,8 +5627,7 @@ We need more thought here.
                  (apply #'maybe-emit-clear-values args)
                  (emit-move-from-stack target representation))
                (progn
-                 (unless (every 'single-valued-p args)
-                   (emit-clear-values))
+                 (emit-clear-values)
                  (emit-move-from-stack target))))
           (t
            (compile-function-call form target representation)))))