type-expander/test/base-lang-test-1.rkt

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