diff --git a/ansi-tests/multiple-value-setq.lsp b/ansi-tests/multiple-value-setq.lsp index 905417c528aac9935fb7d4609aafaecd530b521e..62fe5edbe16266d697cbaa417c19043270327e66 100644 --- a/ansi-tests/multiple-value-setq.lsp +++ b/ansi-tests/multiple-value-setq.lsp @@ -111,6 +111,14 @@ (multiple-value-setq nil :good) :good) +(deftest multiple-value-setq.14 + (multiple-value-setq nil (values)) + nil) + +(deftest multiple-value-setq.15 + (multiple-value-setq nil (values 'a 'b)) + a) + ;;; Error tests (deftest multiple-value-setq.error.1