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