match-let

[syntax] match-let ((pat exp) ...) body

[syntax] match-let* ((pat exp) ...) body

[syntax] match-letrec ((pat exp) ...) body

Chicken, Gauche: Andrew Wright's pattern matching package. See match.