11 lines
141 B
Racket
11 lines
141 B
Racket
#lang typed/racket/base
|
|
|
|
(provide (struct-out x)
|
|
make-x)
|
|
|
|
(struct: x () #:transparent)
|
|
|
|
(: make-x : -> x)
|
|
(define (make-x)
|
|
(x))
|