typed-racket/typed-racket-test/xfail/exn-any.rkt

16 lines
176 B
Racket

#lang racket/load
(module m typed/racket
(struct: s ())
(struct: s2 s ())
(define: v : Any (s2))
(provide v))
(module n racket
(require 'm)
v)
(require 'n)