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

16 lines
198 B
Racket

#lang plai/mutator
(allocator-setup "../good-collectors/good-collector.rkt" 4)
; 2
(define thunker
(lambda ()
; 2
'alligator
; 2
'bananna
; 2
'frog))
; 4 total
(thunker)