Question

回头讨论工厂函数（参见 构造对象 ）：

(define (make-point init-x)
  (OBJECT
   ([field x init-x])
   ([method x? () x]
    [method x! (new-x) (begin (set! x new-x) self)])))

(define p1 (make-point 0))
(define p2 (make-point 1))

所有点对象都拥有自己的方法，尽管它们是相同的。至少它们的签名和主体是一样的，对吧？它们 完全 一样吗？事实并非如此。在这个版本的对象系统中，唯一的区别是，方法中包含对象自身：就是说，在 p1 的方法中， self 指向 p1 ，而在 p2 的方法中它指向 p2 。换句话说，方法，也就是函数，因所捕捉的词法环境而不同。