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

9 lines
118 B
Racket

#lang typed-scheme
(let: ([x : (Boxof Number) (box 1)]) x)
(let ()
(: x (Boxof Number))
(define x (box 1))
x)