#lang racket ;Stencil responsible TA: swaxman1 (provide class new call) (define (raise-method-not-found-exception method-name) (raise-user-error (~a "Could not find method \"" method-name "\" in given object."))) (struct an-object #|FILL|#) (struct a-class #|FILL|#) (define-syntax class ;FILL ) (define-syntax call ;FILL ) (define (new class) ;FILL )