diff options
author | Gergo ERDI <gergo@erdi.hu> | 2021-11-16 11:41:56 +0800 |
---|---|---|
committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-12-09 22:14:24 -0500 |
commit | b6f7d145872573baa632a3bbee1c52f0596ec482 (patch) | |
tree | a2fdc62630c48e68868db48d8c7c9f02b1f7ac7c /testsuite/tests/regalloc | |
parent | 6d0319220ebc63a29b941483a6c40ed4f972dc24 (diff) | |
download | haskell-b6f7d145872573baa632a3bbee1c52f0596ec482.tar.gz |
Remove `optLevel` from `DynFlags` (closes #20500)
Diffstat (limited to 'testsuite/tests/regalloc')
-rw-r--r-- | testsuite/tests/regalloc/regalloc_unit_tests.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/testsuite/tests/regalloc/regalloc_unit_tests.hs b/testsuite/tests/regalloc/regalloc_unit_tests.hs index 7726c79b1f..b005982d2d 100644 --- a/testsuite/tests/regalloc/regalloc_unit_tests.hs +++ b/testsuite/tests/regalloc/regalloc_unit_tests.hs @@ -212,7 +212,7 @@ testGraphNoSpills logger dflags' path us = do let acc n = maybe n (++ n) in foldr (\(as, bs) (xs, ys) -> (acc xs as, acc ys bs)) ([], []) - dflags = dflags' { optLevel = 2 } + dflags = updOptLevel 2 dflags' -- discard irrelevant stats extractSRMs x = case x of |