(use matchable)

(define-syntax lambda*
  (syntax-rules ()
    ((_ (args ...) body ...)
     (match-lambda ((args ...)
                    body ...)))))
     

(map (lambda* (foo bar baz)
       (+ foo bar baz))
     '((1 2 3)
       (4 5 6)))