#lang racket ;; ============================================================================= ;; OMac (Fall 2020): objects.rkt ;; ============================================================================= (provide object call) (define (raise-method-not-found-exception method-name) (raise-user-error (~a "Could not find method \"" method-name "\" in given object."))) ;; DO NOT EDIT ABOVE THIS LINE ================================================= (define-syntax object ; TODO: Implement me! ....) (define-syntax call ; TODO: Implement me! ....)