如何使用define-syntax在Scheme中编写let实现

Question

我认为我在概念上有一般性的想法，但语法是错误的

(define-syntax mylet
  (syntax-rules ( )
    ((mylet definitions evaluation)
     ((lambda (map car definitions) evaluations) (map cdar definitions)))))

Answer 1

这比Common Lisp更直观。真。我们可以使用省略号。

(define-syntax mylet
  (syntax-rules ( )
    ((mylet ((name val) ...) body ...)
     ((lambda (name ...) body ...) val ...))))