[alexandria-devel] [patch] implement multiple-value-or

[Andreas Fuchs]

Hi there,

I just stumbled over the lack of a multiple-value-or in CL, so here's  
a patch hat implement it in alexandria (with the first value  
specifying which value's non-NIL-ness to consider):
-------------- next part --------------
A non-text attachment was scrubbed...
Name: multiple-value-or.patch
Type: application/octet-stream
Size: 1247 bytes
Desc: not available
URL: <https://mailman.common-lisp.net/pipermail/alexandria-devel/attachments/20071203/400afebb/attachment.obj>
-------------- next part --------------



It may look horrifying, but it allows pleasant things like:

(multiple-value-or 1 (gethash key table) (gethash key alternative- 
table))

and other niceties.

Hope you like it,
-- 
Andreas Fuchs, (http://|im:asf@|mailto:asf@)boinkor.net, antifuchs