instance-of?

Die Funktion instance-of? überprüft, ob eine Instanz eine direkte Instanz einer Klasse ist. Die Funktion wertet ihre beiden Argumente aus.

Die Funktion ist über and, equal?, type-of und class-of definiert:

(setq instance-of?
  (lambda (instance class)
    (and
      (equal? (type-of instance) (quote instance))
      (equal? (class-of instance) class))))