racket/collects/tests/plai/gc/good-mutators/gc-order.rkt
2010-04-27 16:50:15 -06:00

9 lines
192 B
Racket

#lang plai/mutator
(allocator-setup "../good-collectors/good-collector.ss" 58)
(define x 3)
(cons (begin (set! x 2)
1)
(begin (set! x 3)
1))
(test/value=? x 3)