[Metabang-bind-devel] incorrect expansion of declarations for multiple-value bindings

[Attila Lendvai]

>  It appears that bind does not correctly expand declarations for
>  multiple-value bindings:
>
>   (bind (((:values a b) (c)))
>    (declare (type integer a b))
>    (d a b))
>
>  ==>

(MULTIPLE-VALUE-BIND (A B) (C)
       (DECLARE (TYPE INTEGER A) (TYPE INTEGER B))
       (D A B))

darcs pull.

-- 
 attila