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

fix max-depth JIT patch

Browse Source 
svn: r11348
This commit is contained in:
Matthew Flatt 2008-08-19 23:05:42 +00:00
parent 49f2f894d6
commit d1d68c1aed
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -7172,7 +7172,7 @@ static void on_demand_generate_lambda(Scheme_Native_Closure *nc)
void **pd; void **pd;
pd = (void **)gdata.patch_depth; pd = (void **)gdata.patch_depth;
gdata.patch_depth = pd[1]; gdata.patch_depth = pd[1];
jit_patch_movi((*pd), (void *)(long)max_depth); jit_patch_movi(((jit_insn *)(*pd)), (void *)(long)max_depth);
} }
ndata->code = code; ndata->code = code;