suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

zero out initial maps

Browse Source 
svn: r3642
This commit is contained in:
Matthew Flatt 2006-07-07 01:19:07 +00:00
parent ba59239378
commit 93e351b50d
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/mzscheme/sgc/sgc.c
View File

@ -827,6 +827,7 @@ inline static SectorPage **create_sector_pagetables(unsigned long p) {
if (!sector_pagetabless) {
int c = (sizeof(SectorPage **) << 16) >> LOG_SECTOR_SEGMENT_SIZE;
sector_pagetabless = (SectorPage ***)malloc_plain_sector(c);
memset(sector_pagetabless, 0, c << LOG_SECTOR_SEGMENT_SIZE);
sector_pagetablesss[pos] = sector_pagetabless;
sector_admin_mem_use += (c << LOG_SECTOR_SEGMENT_SIZE);
}
@ -838,6 +839,7 @@ inline static SectorPage **create_sector_pagetables(unsigned long p) {
c = 0;
c = 1 << c;
sector_pagetables = (SectorPage **)malloc_plain_sector(c);
memset(sector_pagetables, 0, c << LOG_SECTOR_SEGMENT_SIZE);
sector_admin_mem_use += (c << LOG_SECTOR_SEGMENT_SIZE);
sector_pagetabless[pos] = sector_pagetables;
}
@ -1039,8 +1041,7 @@ static void register_sector(void *naya, int need, long kind)
pagetableindex = SECTOR_LOOKUP_PAGETABLE(ns);
pagetable = sector_pagetables[pagetableindex];
if (!pagetable) {
int c = (LOG_SECTOR_LOOKUP_PAGESIZE + LOG_SECTOR_PAGEREC_SIZE) - LOG_SECTOR_SEGMENT_SIZE;
int j;
int j, c = (LOG_SECTOR_LOOKUP_PAGESIZE + LOG_SECTOR_PAGEREC_SIZE) - LOG_SECTOR_SEGMENT_SIZE;
if (c < 0)
c = 0;
c = 1 << c;