[Bese-devel] call/cc multiple-value-call test

[Kilian Sprotte]

Hi,

I have added a test case to call-cc.lisp that passes on openmcl, but  
fails equally on sbcl and clisp:

Failure Details:
--------------------------------
MULTIPLE-VALUE-CALL.2 []:
       2 was not EQUAL to (1 2 3).
--------------------------------

It looks like this:

(test multiple-value-call.2
   (let ((cont (with-call/cc
		(multiple-value-bind (&rest args)
		    (let/cc k k)
		  args))))
     (is (equal '(1 2 3) (kall cont 1 2 3)))))

Since I am actually a musician, who composes with continuations :), I  
dont think I can fix this, sorry, but I wanted to let you know.

In case, you think this test is worth it, I attach a darcs patch to  
the latest arnesi_dev.
(Well, this is the first time I am doing this, so please bear with  
me...)

Cheers,

	Kilian Sprotte

-------------- next part --------------
A non-text attachment was scrubbed...
Name: CHANGESET
Type: application/octet-stream
Size: 27510 bytes
Desc: not available
URL: <https://mailman.common-lisp.net/pipermail/bese-devel/attachments/20060304/9aba260a/attachment.obj>
-------------- next part --------------