Commit 241921a0 authored by Ben Gamari's avatar Ben Gamari 🐢 Committed by Marge Bot
Browse files

rts: Fix CNF dirtying logic

Previously due to a silly implementation bug CNFs would never have their
dirty flag set, resulting in their being added again and again to the
`mut_list`. Fix this.

Fixes #17297.
parent ee8118ca
Pipeline #11008 failed with stages
in 999 minutes and 4 seconds
......@@ -541,9 +541,9 @@ insertCompactHash (Capability *cap,
StgClosure *p, StgClosure *to)
insertHashTable(str->hash, (StgWord)p, (const void*)to);
const StgInfoTable *strinfo = str->;
if (strinfo == &stg_COMPACT_NFDATA_CLEAN_info) {
strinfo = &stg_COMPACT_NFDATA_DIRTY_info;
const StgInfoTable **strinfo = &str->;
if (*strinfo == &stg_COMPACT_NFDATA_CLEAN_info) {
*strinfo = &stg_COMPACT_NFDATA_DIRTY_info;
recordClosureMutated(cap, (StgClosure*)str);
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment