else
p = cparams.join(", ")
end
- if human_name != null then v.add_decl("static const char * const LOCATE_{cname} = \"{human_name}\";")
+ if human_name != null then
+ v.add_instr("static const char LOCATE_{cname}[] = \"{human_name}\";")
+ end
v.add_decl("{r} {cname}({p});")
v.add_decl("typedef {r} (*{cname}_t)({p});")
v.add_instr("{r} {cname}({p})\{")
v.add_instr("fra.me.meth = LOCATE_{v.basecname};")
v.add_instr("fra.me.has_broke = 0;")
v.add_instr("fra.me.REG_size = {std_slots_nb};")
+ v.add_instr("fra.me.nitni_local_ref_head = NULL;")
# Declare/initialize local variables
for i in [0..std_slots_nb[ do
else if n == once "copy_to".to_symbol then
s = "(void)memcpy(UNBOX_NativeString({regs[1]})+UNTAG_Int({regs[4]}), UNBOX_NativeString({regs[0]})+UNTAG_Int({regs[3]}), UNTAG_Int({regs[2]}));"
end
+ else if c == once "Sys".to_symbol then
+ if n == once "force_garbage_collection".to_symbol then
+ s = "Nit_gc_force_garbage_collection()"
+ end
else if n == once "object_id".to_symbol then
s = "TAG_Int((bigint)((obj_t){regs[0]})[1].object_id)"
else if n == once "sys".to_symbol then