RosettaCodeData/Task/Singleton/Racket/singleton-2.rkt
2023-07-01 13:44:08 -04:00

6 lines
130 B
Racket

#lang racket
(provide instance)
(define instance
(new (class object%
(define/public (foo) 123)
(super-new))))