typed-racket/typed-racket-test/fail/bad-ann.rkt
2014-12-16 10:07:25 -05:00

15 lines
166 B
Racket

#;
(exn-pred 2)
#lang typed/scheme
(: f : Number -> Number)
(define (f a b)
(+ a b))
(define: (g [a : Number] [b : Number]) : Number
(+ a b))
(f 1 2)
(g 1 2)