gambas-source-code/main/lib/jit/gb.jit/jit_after.h
Benoît Minisini 1fd1d16ec8 Convert two global interpreter flags from boolean to bitfield.
[INTERPRETER]
* NEW: Convert two global interpreter flags from boolean to bitfield.
* NEW: Remove a unused JIT API and take the previous into account.

[GB.JIT]
* NEW: Take the boolean to bitfield interpreter flag changes into account.
2023-01-04 18:49:13 +01:00

21 lines
No EOL
568 B
C

static VALUE *_jit_print_catch(VALUE **psp, VALUE *sp, VALUE *ssp, void *cp, void *fp, bool has_catch_finally)
{
CP = cp;
FP = fp;
if (has_catch_finally)
JIT.error_set_last(FALSE);
if (SP > sp) sp = SP; else SP = sp;
LEAVE_SUPER();
if (sp > ssp) { JIT.release_many(sp, sp - ssp); SP = sp = ssp; }
return sp;
}
static VALUE *_jit_end_try(VALUE **psp, VALUE *sp)
{
if (SP > sp) sp = SP; else SP = sp;
LEAVE_SUPER();
if (sp > EP) { JIT.release_many(sp, sp - EP); SP = sp = EP; }
JIT.set_got_error(1);
JIT.error_set_last(FALSE);
return sp;
}