7 lines
162 B
Racket
7 lines
162 B
Racket
#lang racket
|
|
|
|
(module m type-expander/lang
|
|
(require typed/rackunit)
|
|
(check-equal? (ann (add1 1)
|
|
(Let ([T Number]) T))
|
|
2)) |