Program

object-class.scm - The root of a class hierarchy.

Lecture 3 - slide 6 : 43
Program 1

(define (object)
  (let ((super '())
        (self 'nil))

   (define (dispatch message)
       '())
 
   (set! self dispatch)
   self))