typed-racket/typed-racket-test/fail/define-values-bottom.rkt
2014-12-16 10:07:25 -05:00

10 lines
169 B
Racket

#;
(exn-pred "runtime")
#lang typed/racket
;; Make sure -Bottom and multiple values play nice together at the module level.
(define-values (a b)
(error 'runtime))
b