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

minor code clarification

Browse Source
This commit is contained in:
Matthew Flatt 2011-07-16 14:17:56 -06:00
parent 5edc0c70af
commit 9ca07e7d65
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/racket/src/jitcall.c
View File

@ -1638,10 +1638,9 @@ int scheme_generate_app(Scheme_App_Rec *app, Scheme_Object **alt_rands, int num_
if ((!direct_prim || (num_rands > 1) || (no_call == 2))
&& (!direct_self || !is_tail || no_call || (i + 1 < num_rands))
&& !inline_direct_args) {
int r0;
r0 = mz_CURRENT_REG_STATUS_VALID();
int reg = mz_CURRENT_REG_STATUS_VALID();
mz_rs_stxi(i + offset, JIT_R0);
mz_SET_REG_STATUS_VALID(r0);
mz_SET_REG_STATUS_VALID(reg);
}
}
/* not sync'd... */