(module-name ) (module-compile-options main: #t) (define-simple-class () ((create (value :: )) (format (current-output-port) "Calling create int version with value [~a]~%" value)) ((create (value :: )) (format (current-output-port) "Calling create bool version with value [~a]~%" value))) (define (main) (let ((simple :: (make ))) (invoke simple 'create #t))) (main)