fix max-depth JIT patch

svn: r11348
This commit is contained in:
Matthew Flatt 2008-08-19 23:05:42 +00:00
parent 49f2f894d6
commit d1d68c1aed

View File

@ -7172,7 +7172,7 @@ static void on_demand_generate_lambda(Scheme_Native_Closure *nc)
void **pd;
pd = (void **)gdata.patch_depth;
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;