1#lang plai/mutator
2(allocator-setup "../good-collectors/good-collector.rkt" 7)
3(let ([x (cons 1 2)])
4 (let ([y (cons 3 4)])
5   y))
6