(define-syntax FFF (syntax-rules () ((FFF (?var0 ...) (?val0 ...) ?body ...) (let ((?var0 ?val0) ...) ?body ...) ) ) ) #;2> (FFF (a b) (1 2) (list a b)) (1 2) #;3> ,x* (FFF (a b) (1 2) (list a b)) (##core#let ((a 1) (b 2)) (list a b))