diff --git a/collects/tests/plai/gc2/bad-mutators/mut-1.rkt b/collects/tests/plai/gc2/bad-mutators/mut-1.rkt index c72bb9628a..6eb1c12f7b 100644 --- a/collects/tests/plai/gc2/bad-mutators/mut-1.rkt +++ b/collects/tests/plai/gc2/bad-mutators/mut-1.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../bad-collectors/broken-collector.rkt" 12) 50 diff --git a/collects/tests/plai/gc2/bad-mutators/mutator0.rkt b/collects/tests/plai/gc2/bad-mutators/mutator0.rkt index 89aef5a954..fe6cd55a83 100644 --- a/collects/tests/plai/gc2/bad-mutators/mutator0.rkt +++ b/collects/tests/plai/gc2/bad-mutators/mutator0.rkt @@ -1 +1 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator diff --git a/collects/tests/plai/gc2/bad-mutators/mutator1.rkt b/collects/tests/plai/gc2/bad-mutators/mutator1.rkt index 292615841d..6a288bd51d 100644 --- a/collects/tests/plai/gc2/bad-mutators/mutator1.rkt +++ b/collects/tests/plai/gc2/bad-mutators/mutator1.rkt @@ -1,2 +1,2 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator 1 diff --git a/collects/tests/plai/gc2/bad-mutators/mutator2.rkt b/collects/tests/plai/gc2/bad-mutators/mutator2.rkt index 568fd4ee16..2e702b24fc 100644 --- a/collects/tests/plai/gc2/bad-mutators/mutator2.rkt +++ b/collects/tests/plai/gc2/bad-mutators/mutator2.rkt @@ -1,2 +1,2 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../collectors/trivial-collector.rkt" "y") diff --git a/collects/tests/plai/gc2/bad-mutators/mutator3.rkt b/collects/tests/plai/gc2/bad-mutators/mutator3.rkt index aca8728bc2..c1fed47545 100644 --- a/collects/tests/plai/gc2/bad-mutators/mutator3.rkt +++ b/collects/tests/plai/gc2/bad-mutators/mutator3.rkt @@ -1,2 +1,2 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup a 100) diff --git a/collects/tests/plai/gc2/bad-mutators/mutator5.rkt b/collects/tests/plai/gc2/bad-mutators/mutator5.rkt index 78fa225c8f..58681864d9 100644 --- a/collects/tests/plai/gc2/bad-mutators/mutator5.rkt +++ b/collects/tests/plai/gc2/bad-mutators/mutator5.rkt @@ -1,2 +1,2 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/trivial-collector.rkt") diff --git a/collects/tests/plai/gc2/bad-mutators/void-app.rkt b/collects/tests/plai/gc2/bad-mutators/void-app.rkt index 69881d61ee..d0affa4d6e 100644 --- a/collects/tests/plai/gc2/bad-mutators/void-app.rkt +++ b/collects/tests/plai/gc2/bad-mutators/void-app.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 100) (define x (cons 1 2)) ((set-first! x 2) 1) diff --git a/collects/tests/plai/gc2/good-mutators/andor.rkt b/collects/tests/plai/gc2/good-mutators/andor.rkt index fa80f15edb..0d17c2cef8 100644 --- a/collects/tests/plai/gc2/good-mutators/andor.rkt +++ b/collects/tests/plai/gc2/good-mutators/andor.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 400) (define (do-one i) (/ (- i 1))) (define (loop i) diff --git a/collects/tests/plai/gc2/good-mutators/app.rkt b/collects/tests/plai/gc2/good-mutators/app.rkt index c2eae58d79..3ceda4742f 100644 --- a/collects/tests/plai/gc2/good-mutators/app.rkt +++ b/collects/tests/plai/gc2/good-mutators/app.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 28) (define (app f) diff --git a/collects/tests/plai/gc2/good-mutators/bindings.rkt b/collects/tests/plai/gc2/good-mutators/bindings.rkt index 2705a2d8ba..164f830d98 100644 --- a/collects/tests/plai/gc2/good-mutators/bindings.rkt +++ b/collects/tests/plai/gc2/good-mutators/bindings.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 58) (define x 'intial) diff --git a/collects/tests/plai/gc2/good-mutators/by-val.rkt b/collects/tests/plai/gc2/good-mutators/by-val.rkt index ed8d7a5f1a..d6771dcc19 100644 --- a/collects/tests/plai/gc2/good-mutators/by-val.rkt +++ b/collects/tests/plai/gc2/good-mutators/by-val.rkt @@ -1,5 +1,5 @@ ; Ensure that call by value is correctly implemented. -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 40) (define global-val 'global) diff --git a/collects/tests/plai/gc2/good-mutators/case.rkt b/collects/tests/plai/gc2/good-mutators/case.rkt index b5150b15a2..48713eefcb 100644 --- a/collects/tests/plai/gc2/good-mutators/case.rkt +++ b/collects/tests/plai/gc2/good-mutators/case.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 40) (test/value=? (case 1 [(1) 2]) 2) diff --git a/collects/tests/plai/gc2/good-mutators/circular.rkt b/collects/tests/plai/gc2/good-mutators/circular.rkt index c20af80471..5fba10af5a 100644 --- a/collects/tests/plai/gc2/good-mutators/circular.rkt +++ b/collects/tests/plai/gc2/good-mutators/circular.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 68) (define (gen-circular) diff --git a/collects/tests/plai/gc2/good-mutators/classic-error.rkt b/collects/tests/plai/gc2/good-mutators/classic-error.rkt index a213332bb4..986140c45f 100644 --- a/collects/tests/plai/gc2/good-mutators/classic-error.rkt +++ b/collects/tests/plai/gc2/good-mutators/classic-error.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator ; This is `classic' in that it caught many bugs in copying collectors that students wrote for CS173, Fall 2007. (allocator-setup "../good-collectors/good-collector.rkt" 28) diff --git a/collects/tests/plai/gc2/good-mutators/closure-1.rkt b/collects/tests/plai/gc2/good-mutators/closure-1.rkt index 8acf1bdf9c..3a546d31bf 100644 --- a/collects/tests/plai/gc2/good-mutators/closure-1.rkt +++ b/collects/tests/plai/gc2/good-mutators/closure-1.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 60) (define lst '(2 -10)) ; (cons 2 (cons -10 empty))) diff --git a/collects/tests/plai/gc2/good-mutators/closure-2.rkt b/collects/tests/plai/gc2/good-mutators/closure-2.rkt index 0aacef48ef..31d32c87bf 100644 --- a/collects/tests/plai/gc2/good-mutators/closure-2.rkt +++ b/collects/tests/plai/gc2/good-mutators/closure-2.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 40) diff --git a/collects/tests/plai/gc2/good-mutators/cond.rkt b/collects/tests/plai/gc2/good-mutators/cond.rkt index 1e2b85eaf1..9994a19a46 100644 --- a/collects/tests/plai/gc2/good-mutators/cond.rkt +++ b/collects/tests/plai/gc2/good-mutators/cond.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 40) (cond diff --git a/collects/tests/plai/gc2/good-mutators/danny-bug.rkt b/collects/tests/plai/gc2/good-mutators/danny-bug.rkt index 14f1158ba1..a8d6b4ffd8 100644 --- a/collects/tests/plai/gc2/good-mutators/danny-bug.rkt +++ b/collects/tests/plai/gc2/good-mutators/danny-bug.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 6) (define diff --git a/collects/tests/plai/gc2/good-mutators/else.rkt b/collects/tests/plai/gc2/good-mutators/else.rkt index 6ffb3c56aa..ee1d988267 100644 --- a/collects/tests/plai/gc2/good-mutators/else.rkt +++ b/collects/tests/plai/gc2/good-mutators/else.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator ; Is else defined? (allocator-setup "../good-collectors/good-collector.rkt" 40) diff --git a/collects/tests/plai/gc2/good-mutators/empty-mutator.rkt b/collects/tests/plai/gc2/good-mutators/empty-mutator.rkt index 3261e0fdbf..d28d9759e3 100644 --- a/collects/tests/plai/gc2/good-mutators/empty-mutator.rkt +++ b/collects/tests/plai/gc2/good-mutators/empty-mutator.rkt @@ -1,3 +1,3 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 80) diff --git a/collects/tests/plai/gc2/good-mutators/gc-order.rkt b/collects/tests/plai/gc2/good-mutators/gc-order.rkt index c031400a22..1baf727887 100644 --- a/collects/tests/plai/gc2/good-mutators/gc-order.rkt +++ b/collects/tests/plai/gc2/good-mutators/gc-order.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 58) (define x 3) diff --git a/collects/tests/plai/gc2/good-mutators/global-roots.rkt b/collects/tests/plai/gc2/good-mutators/global-roots.rkt index cc331c4f68..b657b4d978 100644 --- a/collects/tests/plai/gc2/good-mutators/global-roots.rkt +++ b/collects/tests/plai/gc2/good-mutators/global-roots.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 20) diff --git a/collects/tests/plai/gc2/good-mutators/imports.rkt b/collects/tests/plai/gc2/good-mutators/imports.rkt index b5b5833f99..22d76e0c7a 100644 --- a/collects/tests/plai/gc2/good-mutators/imports.rkt +++ b/collects/tests/plai/gc2/good-mutators/imports.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 20) (import-primitives modulo) diff --git a/collects/tests/plai/gc2/good-mutators/kathi-bug-1.rkt b/collects/tests/plai/gc2/good-mutators/kathi-bug-1.rkt index fb950b5408..da14c0ead4 100644 --- a/collects/tests/plai/gc2/good-mutators/kathi-bug-1.rkt +++ b/collects/tests/plai/gc2/good-mutators/kathi-bug-1.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 84) (define L (cons 3 empty)) (test/value=? L '(3)) diff --git a/collects/tests/plai/gc2/good-mutators/modpath.rkt b/collects/tests/plai/gc2/good-mutators/modpath.rkt index 1adc4c9818..43356b9aaa 100644 --- a/collects/tests/plai/gc2/good-mutators/modpath.rkt +++ b/collects/tests/plai/gc2/good-mutators/modpath.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator -(allocator-setup tests/plai/gc2gc/good-collectors/good-collector 10) +#lang plai/gc2/mutator +(allocator-setup tests/plai/gc2/good-collectors/good-collector 10) 1 2 diff --git a/collects/tests/plai/gc2/good-mutators/mutator4.rkt b/collects/tests/plai/gc2/good-mutators/mutator4.rkt index 829cf125eb..ee1f0d9f5a 100644 --- a/collects/tests/plai/gc2/good-mutators/mutator4.rkt +++ b/collects/tests/plai/gc2/good-mutators/mutator4.rkt @@ -1,3 +1,3 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 100) (cons 4 #t) diff --git a/collects/tests/plai/gc2/good-mutators/mutator6.rkt b/collects/tests/plai/gc2/good-mutators/mutator6.rkt index a67b01a916..df218371a7 100644 --- a/collects/tests/plai/gc2/good-mutators/mutator6.rkt +++ b/collects/tests/plai/gc2/good-mutators/mutator6.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 58) (define x 'intial) diff --git a/collects/tests/plai/gc2/good-mutators/mutator7.rkt b/collects/tests/plai/gc2/good-mutators/mutator7.rkt index e99c23bece..d64e0e63a5 100644 --- a/collects/tests/plai/gc2/good-mutators/mutator7.rkt +++ b/collects/tests/plai/gc2/good-mutators/mutator7.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 58) (define x 'initial) diff --git a/collects/tests/plai/gc2/good-mutators/names.rkt b/collects/tests/plai/gc2/good-mutators/names.rkt index 5ccaa80bcf..3a976bf02b 100644 --- a/collects/tests/plai/gc2/good-mutators/names.rkt +++ b/collects/tests/plai/gc2/good-mutators/names.rkt @@ -1,3 +1,3 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 10) (let ([f (λ (x) x)]) f) diff --git a/collects/tests/plai/gc2/good-mutators/proc-list.rkt b/collects/tests/plai/gc2/good-mutators/proc-list.rkt index 0149fd190b..7e6ebf8f4c 100644 --- a/collects/tests/plai/gc2/good-mutators/proc-list.rkt +++ b/collects/tests/plai/gc2/good-mutators/proc-list.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator ; Demonstrates garbage collection while a closure is on the stack. A correct collector must ensure that the roots ; reachable from (make-adder 90) and (make-adder 200) -- that is, the values 90 and 200 that k is bound to -- do ; not get discarded. diff --git a/collects/tests/plai/gc2/good-mutators/repeat-test.rkt b/collects/tests/plai/gc2/good-mutators/repeat-test.rkt index 908529dd11..5258ddbb46 100644 --- a/collects/tests/plai/gc2/good-mutators/repeat-test.rkt +++ b/collects/tests/plai/gc2/good-mutators/repeat-test.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 30) diff --git a/collects/tests/plai/gc2/good-mutators/student-1.rkt b/collects/tests/plai/gc2/good-mutators/student-1.rkt index 72c24ecc2f..431c9a9505 100644 --- a/collects/tests/plai/gc2/good-mutators/student-1.rkt +++ b/collects/tests/plai/gc2/good-mutators/student-1.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator ; mark-and-sweep-test.rkt - Ben Childs ; Designed to test the mark and sweep collector diff --git a/collects/tests/plai/gc2/good-mutators/student20111116.rkt b/collects/tests/plai/gc2/good-mutators/student20111116.rkt index e6bd900d65..64a70d4404 100644 --- a/collects/tests/plai/gc2/good-mutators/student20111116.rkt +++ b/collects/tests/plai/gc2/good-mutators/student20111116.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 84) (halt-on-errors) diff --git a/collects/tests/plai/gc2/good-mutators/tail-calls.rkt b/collects/tests/plai/gc2/good-mutators/tail-calls.rkt index 590e52241f..83ce62aa84 100644 --- a/collects/tests/plai/gc2/good-mutators/tail-calls.rkt +++ b/collects/tests/plai/gc2/good-mutators/tail-calls.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 68) (define (length-accum lst len) diff --git a/collects/tests/plai/gc2/good-mutators/test-framework.rkt b/collects/tests/plai/gc2/good-mutators/test-framework.rkt index 3b9329346f..a7f945fa33 100644 --- a/collects/tests/plai/gc2/good-mutators/test-framework.rkt +++ b/collects/tests/plai/gc2/good-mutators/test-framework.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 28) (halt-on-errors #t) diff --git a/collects/tests/plai/gc2/good-mutators/thunks.rkt b/collects/tests/plai/gc2/good-mutators/thunks.rkt index 135672b709..cf4f28e2c5 100644 --- a/collects/tests/plai/gc2/good-mutators/thunks.rkt +++ b/collects/tests/plai/gc2/good-mutators/thunks.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 4) ; 2 diff --git a/collects/tests/plai/gc2/other-mutators/begin.rkt b/collects/tests/plai/gc2/other-mutators/begin.rkt index b57da58084..a9160eba3e 100644 --- a/collects/tests/plai/gc2/other-mutators/begin.rkt +++ b/collects/tests/plai/gc2/other-mutators/begin.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 6) (define (go) diff --git a/collects/tests/plai/gc2/other-mutators/error.rkt b/collects/tests/plai/gc2/other-mutators/error.rkt index 606991d8f6..57dffbec82 100644 --- a/collects/tests/plai/gc2/other-mutators/error.rkt +++ b/collects/tests/plai/gc2/other-mutators/error.rkt @@ -1,3 +1,3 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 400) -(error 'error "plai/gc2mutator has error") +(error 'error "plai/gc2/mutator has error") diff --git a/collects/tests/plai/gc2/other-mutators/morse.rkt b/collects/tests/plai/gc2/other-mutators/morse.rkt index c02e20ccc3..a80228b44e 100644 --- a/collects/tests/plai/gc2/other-mutators/morse.rkt +++ b/collects/tests/plai/gc2/other-mutators/morse.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 24) (define a '(1 2 3 4 5)) diff --git a/collects/tests/plai/gc2/other-mutators/printing.rkt b/collects/tests/plai/gc2/other-mutators/printing.rkt index 0b84f7d148..fe58aabf75 100644 --- a/collects/tests/plai/gc2/other-mutators/printing.rkt +++ b/collects/tests/plai/gc2/other-mutators/printing.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 400) (print-only-errors #f) diff --git a/collects/tests/plai/gc2/other-mutators/quote.rkt b/collects/tests/plai/gc2/other-mutators/quote.rkt index 8ad151a00e..72b6b2e991 100644 --- a/collects/tests/plai/gc2/other-mutators/quote.rkt +++ b/collects/tests/plai/gc2/other-mutators/quote.rkt @@ -1,4 +1,4 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 28) 1 2 diff --git a/collects/tests/plai/gc2/other-mutators/top.rkt b/collects/tests/plai/gc2/other-mutators/top.rkt index f4f287072c..afbec9e97d 100644 --- a/collects/tests/plai/gc2/other-mutators/top.rkt +++ b/collects/tests/plai/gc2/other-mutators/top.rkt @@ -1,3 +1,3 @@ -#lang plai/gc2mutator +#lang plai/gc2/mutator (allocator-setup "../good-collectors/good-collector.rkt" 400) frozzle