12 lines
171 B
Racket
12 lines
171 B
Racket
#lang plai/mutator
|
|
(allocator-setup "../good-collectors/good-collector.rkt" 20)
|
|
|
|
|
|
(define car first)
|
|
|
|
|
|
'junk
|
|
'junk
|
|
'junk
|
|
(test/value=? (car (cons 'this-car 2)) 'this-car)
|