diff --git a/t/r7rs-tests.scm b/t/r7rs-tests.scm
index 362247eb..da0a1cbb 100644
--- a/t/r7rs-tests.scm
+++ b/t/r7rs-tests.scm
@@ -520,10 +520,10 @@
     (let ()
       (define-values (x) (values 1))
       x))
-;; (test 3
-;;     (let ()
-;;       (define-values x (values 1 2))
-;;       (apply + x)))
+(test 3
+    (let ()
+      (define-values x (values 1 2))
+      (apply + x)))
 (test 3
     (let ()
       (define-values (x y) (values 1 2))
@@ -532,10 +532,10 @@
     (let ()
       (define-values (x y z) (values 1 2 3))
       (+ x y z)))
-;; (test 10
-;;     (let ()
-;;       (define-values (x y . z) (values 1 2 3 4))
-;;       (+ x y (car z) (cadr z))))
+(test 10
+    (let ()
+      (define-values (x y . z) (values 1 2 3 4))
+      (+ x y (car z) (cadr z))))
 
 (test '(2 1) (let ((x 1) (y 2))
   (define-syntax swap!