type-expander/test/base-lang-test-2.rkt
2017-04-27 22:54:34 +02:00

7 lines
162 B
Racket

#lang racket
(module m type-expander/base
(require typed/rackunit)
(check-equal? (ann (add1 1)
(Let ([T Number]) T))
2))