RosettaCodeData/Task/Send-an-unknown-method-call/Racket/send-an-unknown-method-call.rkt
2023-07-01 13:44:08 -04:00

12 lines
293 B
Racket

#lang racket
(define greeter
(new (class object% (super-new)
(define/public (hello name)
(displayln (~a "Hello " name "."))))))
; normal method call
(send greeter hello "World")
; sending an unknown method
(define unknown 'hello)
(dynamic-send greeter unknown "World")