racket/collects/tests/plai/gc/good-mutators/repeat-test.rkt
2010-12-31 15:59:39 -05:00

15 lines
431 B
Racket

#lang plai/mutator
(allocator-setup "../good-collectors/good-collector.ss" 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))