racket/collects/tests/plai/gc/good-mutators/app.rkt
2011-07-02 10:37:53 -04:00

12 lines
169 B
Racket

#lang plai/mutator
(allocator-setup "../good-collectors/good-collector.rkt" 28)
(define (app f)
(lambda (x)
(f x)))
(define plus (app add1))
(plus 23)
(plus 5)