racket/collects/tests/plai/gc/good-mutators/repeat-test.rkt
2011-07-02 10:37:53 -04:00

15 lines
432 B
Racket

#lang plai/mutator
(allocator-setup "../good-collectors/good-collector.rkt" 30)
(test/value=? (cons 1 empty) '(1))
(test/value=? (cons 1 empty) '(1))
(test/value=? (cons 1 empty) '(1))
(test/value=? (cons 1 empty) '(1))
(test/value=? (cons 1 empty) '(1))
(test/value=? (cons 1 empty) '(1))
(test/value=? (cons 1 empty) '(1))
(test/value=? (cons 1 empty) '(1))
(test/value=? (cons 1 empty) '(1))
(test/value=? (cons 1 empty) '(1))