9 lines
178 B
Racket
9 lines
178 B
Racket
#lang typed/racket/base
|
|
|
|
;; Test for GH issue 304
|
|
;;
|
|
;; Make sure polymorphic #:type-name structs can be exported
|
|
|
|
(struct (A) foo () #:type-name Foo)
|
|
(provide (struct-out foo))
|