Question

Im有几类子级的班级,所有使用方法和田地都来自母级。是否有“正确”的处理方式?

到目前为止,我一直在使用<代码>(依旧方法1方法2......)。

我徒劳地寻求一种方式,即母阶级可以迫使子阶级继承约束性。我理解,这种方式可能是坏的。

Racket或OOP没有经验。

Answer 1

The methods are inherited even if you don t use inherit. To call a method from a super class, one can use (send this method arg1 ...). The form (inherit method) inside a class form will make the method available in form (method arg1 ...) inside the body. This is not just a convenient shorthand, but is also more efficient than (send this method).

我不知道一揽子继承形式,但你可以用很少的宏观方式自行推出。例如:

(define-syntax (inherit-from-car stx) 
  (datum->syntax stx  (inherit wash buy sell)))

(define car% (class object%
               (define/public (wash) (display "Washing
"))
               (define/public (buy)  (display "Buying
"))
               (define/public (sell) (display "Selling
"))
               (super-new)))

(define audi% (class car% (super-new)
                (inherit-from-car)
                (define/public (wash-and-sell)
                  (wash)
                  (sell))))

(define a-car (new audi%))
(send a-car wash-and-sell)

友情链接