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

fix code page unchaining

Browse Source
This commit is contained in:
Matthew Flatt 2011-04-26 19:35:12 -06:00
parent 50509c10dc
commit a2e3116494
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/racket/src/salloc.c
View File

@ -963,10 +963,10 @@ static void unchain_page(void *pg)
if (!((void **)pg)[2]) if (!((void **)pg)[2])
code_allocation_page_list = ((void **)pg)[3]; code_allocation_page_list = ((void **)pg)[3];
else else
((void **)(((void **)pg)[2]))[3] = ((void **)pg)[2]; ((void **)(((void **)pg)[2]))[3] = ((void **)pg)[3];
if (((void **)pg)[3]) if (((void **)pg)[3])
((void **)(((void **)pg)[3]))[2] = ((void **)pg)[3]; ((void **)(((void **)pg)[3]))[2] = ((void **)pg)[2];
} }
static void init_free_list() static void init_free_list()