typed-racket/typed-racket-test/succeed/module-plus.rkt
2014-12-16 10:07:25 -05:00

15 lines
193 B
Racket

#lang typed/racket
(: f : Integer -> Integer)
(define (f x) x)
(module+ main
(: g : Integer -> Integer)
(f (+ 3 5)))
(module+ main
(define (g x) (add1 x)))
(module+ main
(g (f 7)))