将
(let* ((x) (y) (z)) (body))
改造成
(let ((x)) (let ((y)) (let ((z)) (body))))
就行了
let* 可以作为扩展表达式,不必使用非派生方式处理。