-
Notifications
You must be signed in to change notification settings - Fork 200
Commit
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
- Loading branch information
1 parent
2ae65b7
commit a6161bb
Showing
2 changed files
with
28 additions
and
1 deletion.
There are no files selected for viewing
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,27 @@ | ||
commit 1ed6e300d57a48129786ba2dfbda6da1e233a454 (HEAD -> wip/T23415-9.8) | ||
Author: Ian-Woo Kim <[email protected]> | ||
Date: Mon May 22 12:22:33 2023 -0700 | ||
|
||
Add missing BCO handling in scavenge_one. | ||
|
||
(cherry picked from commit 902ebcc2b95707319d37a19d6b23c342cc14b162) | ||
|
||
diff --git a/rts/sm/Scav.c b/rts/sm/Scav.c | ||
index 8debec6a666..9bbe069d875 100644 | ||
--- a/rts/sm/Scav.c | ||
+++ b/rts/sm/Scav.c | ||
@@ -1593,6 +1593,14 @@ scavenge_one(StgPtr p) | ||
#endif | ||
break; | ||
|
||
+ case BCO: { | ||
+ StgBCO *bco = (StgBCO *)p; | ||
+ evacuate((StgClosure **)&bco->instrs); | ||
+ evacuate((StgClosure **)&bco->literals); | ||
+ evacuate((StgClosure **)&bco->ptrs); | ||
+ break; | ||
+ } | ||
+ | ||
case COMPACT_NFDATA: | ||
scavenge_compact((StgCompactNFData*)p); | ||
break; |