1#lang plai/mutator
2(allocator-setup "../good-collectors/good-collector.rkt" 20)
3
4
5(define car first)
6
7
8'junk
9'junk
10'junk
11(test/value=? (car (cons 'this-car 2)) 'this-car)
12