~ chicken-core (chicken-5) 3ddd8adbd10f3f7531a119711f0c6ba1880ffc7b

commit 3ddd8adbd10f3f7531a119711f0c6ba1880ffc7b
Author:     Peter Bex <peter@more-magic.net>
AuthorDate: Mon Apr 8 12:44:02 2019 +0200
Commit:     Peter Bex <peter@more-magic.net>
CommitDate: Mon Apr 8 12:44:02 2019 +0200

    Change MV test to reflect the current reality

diff --git a/tests/multiple-values.scm b/tests/multiple-values.scm
index 83274013..219bdcac 100644
--- a/tests/multiple-values.scm
+++ b/tests/multiple-values.scm
@@ -7,7 +7,7 @@
 
 ;; Relaxed cases
 (assert (f (values 1 2 3)))
-(assert (f (call/cc (lambda (k) (k 1 2 3)))))
+(assert-fail (call/cc (lambda (k) (k 1 2 3)))) ; For now it should fail, see #1601
 
 ;; Strict cases
 (assert-fail (call-with-values (lambda () (values 1 2 3)) f))