typed-racket/typed-racket-test/succeed/standard-features-no-check-base.rkt
2014-12-16 10:07:25 -05:00

8 lines
131 B
Racket

#lang typed/racket/base/no-check
(: f (Integer -> Any))
(define (f x) (add1 ""))
(lambda (#{x : String}) (string-append " " x))