typed-racket/typed-racket-test/succeed/struct-struct-out.rkt
2014-12-16 10:07:25 -05:00

9 lines
107 B
Racket

#lang typed/racket
(struct: x ())
(define-struct: y ())
(x) (y)
(provide (struct-out x) (struct-out y))