Chez Scheme: fix mat that failed in bullyx with cmg=1
This commit is contained in:
parent
b090edbe9d
commit
17bc9b2b33
|
@ -4820,7 +4820,7 @@
|
|||
;; ----------------------------------------
|
||||
;; Check interaction of mutation and incremental generation promotion
|
||||
|
||||
(with-interrupts-disabled
|
||||
(parameterize ([collect-request-handler void] [collect-maximum-generation (max (collect-maximum-generation) 2)])
|
||||
(let ([key "key"])
|
||||
(let ([e (ephemeron-cons key #f)])
|
||||
(collect 0 1 1)
|
||||
|
|
Loading…
Reference in New Issue
Block a user