racket/collects/tests/plai/gc2/bad-mutators/mut-1.rkt
2012-01-04 19:55:24 -07:00

11 lines
138 B
Racket

#lang plai/gc2/mutator
(allocator-setup "../bad-collectors/broken-collector.rkt" 12)
50
60
70
80
(define x (cons 1 2))
(set-first! x x)