typed-racket/typed-racket-test/succeed/pr14997.rkt
Asumu Takikawa 4f050888e2 Export let*-values from TR correctly
Closes PR 14997
2015-08-12 12:16:05 -04:00

10 lines
237 B
Racket

#lang typed/racket
;; Test for PR 14997
(let*-values ([((a : Integer)) 1]) a)
(let*-values ([((a : Integer)) 1] [((b : Integer)) a]) a)
(let*-values: ([((a : Integer)) 1]) a)
(let*-values ([(a) 1]) a)
(let*-values ([(a) 1] [(b) a]) a)