mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-22 13:40:44 -08:00
Code Issues Projects Releases Wiki Activity

Lifting stack and register area scanner into mps interface to allow generalisation of stack format.

Browse source 
Copied from Perforce
 Change: 189195
 ServerID: perforce.ravenbrook.com
This commit is contained in:
Richard Brooksby 2016-02-15 17:46:45 +00:00
parent 9d0ae49fc9
commit 2ad27f73b1
14 changed files with 40 additions and 19 deletions
Download patch file Download diff file Expand all files Collapse all files

6
mps/code/root.c
View file

@ -352,7 +352,9 @@ Res RootCreateReg(Root *rootReturn, Arena arena,
Res RootCreateRegMasked(Root *rootReturn, Arena arena,
Rank rank, Thread thread,
Word mask, Word pattern, Word *stackBot)
mps_area_scan_t scan_area,
Word mask, Word pattern,
Word *stackBot)
{
union RootUnion theUnion;
@ -364,7 +366,7 @@ Res RootCreateRegMasked(Root *rootReturn, Arena arena,
AVER((~mask & pattern) == 0);
theUnion.regMasked.thread = thread;
theUnion.regMasked.scan_area = mps_scan_area_tagged;
theUnion.regMasked.scan_area = scan_area;
theUnion.regMasked.tag.mask = mask;
theUnion.regMasked.tag.pattern = pattern;
theUnion.regMasked.stackBot = stackBot;