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

fix sgc collect() plausible range for 64 bits

Browse Source 
svn: r3644
This commit is contained in:
Matthew Flatt 2006-07-07 03:25:15 +00:00
parent 93e351b50d
commit 421ef32797
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/mzscheme/sgc/collect.inc
View File

@ -49,8 +49,8 @@ static void COLLECT(OFFSET_ARG)
#ifndef SIXTY_FOUR_BIT_INTEGERS
SectorPage **local_sector_pagetables;
#endif
unsigned local_low_plausible;
unsigned local_high_plausible;
unsigned long local_low_plausible;
unsigned long local_high_plausible;
int local_collect_stack_size;
int local_collect_stack_count;
unsigned long *local_collect_stack;

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

@ -817,7 +817,7 @@ static void free_error(const char *msg)
static SectorPage ***sector_pagetablesss[1 << 16];
# define DECL_SECTOR_PAGETABLES SectorPage **sector_pagetables;
# define GET_SECTOR_PAGETABLES(p) sector_pagetables = create_sector_pagetables(p)
# define FIND_SECTOR_PAGETABLES(p) sector_pagetables = get_sector_pagetables(p);
# define FIND_SECTOR_PAGETABLES(p) sector_pagetables = get_sector_pagetables(p)
static void *malloc_plain_sector(int count);
inline static SectorPage **create_sector_pagetables(unsigned long p) {
unsigned long pos;