macrotypes/stlc-test.rkt
2014-08-26 16:53:48 -04:00

5 lines
156 B
Racket

#lang s-exp "stlc-via-racket-extended.rkt"
((λ ([f : (Int Int)] [x : Int]) (f x))
(λ ([x : Int]) (+ x x 2))
10)
((λ ([x : Int]) (+ x 1 3)) 100)