File tree

include/mruby
mrbgems/mruby-compiler/core
src

Original file line number	Diff line number	Diff line change
`@@ -60,8 +60,10 @@ OPCODE(RESCUE, BB) /* R[b] = R[a].isa?(R[b]) */`
`60`	`60`	`OPCODE(RAISEIF, B) /* raise(R[a]) if R[a] */`
`61`	`61`	`OPCODE(MATCHERR, B) /* raise NoMatchingPatternError unless R[a] */`
`62`	`62`	`OPCODE(SSEND, BBB) /* R[a] = self.send(Syms[b],R[a+1]..,R[a+n+1]:R[a+n+2]..) (c=n\|k<<4) */`
	`63`	`+OPCODE(SSEND0, BB) /* R[a] = self.send(Syms[b]) (no args) */`
`63`	`64`	`OPCODE(SSENDB, BBB) /* R[a] = self.send(Syms[b],R[a+1]..,R[a+n+1]:R[a+n+2]..,&R[a+n+2k+1]) */`
`64`	`65`	`OPCODE(SEND, BBB) /* R[a] = R[a].send(Syms[b],R[a+1]..,R[a+n+1]:R[a+n+2]..) (c=n\|k<<4) */`
	`66`	`+OPCODE(SEND0, BB) /* R[a] = R[a].send(Syms[b]) (no args) */`
`65`	`67`	`OPCODE(SENDB, BBB) /* R[a] = R[a].send(Syms[b],R[a+1]..,R[a+n+1]:R[a+n+2]..,&R[a+n+2k+1]) */`
`66`	`68`	`OPCODE(CALL, Z) /* self.call(, , &) (But overlay the current call frame; tailcall) /`
`67`	`69`	`OPCODE(BLKCALL, BB) /* R[a] = R[a].call(R[a+1],... ,R[a+b]); direct block call */`

Original file line number	Diff line number	Diff line change
`@@ -3643,7 +3643,15 @@ codegen_call(codegen_scope s, node varnode, int val)`
`3643`	`3643`	`/* constant folding succeeded */`
`3644`	`3644`	`}`
`3645`	`3645`	`else if (noself) {`
`3646`		`-genop_3(s, blk ? OP_SSENDB : OP_SSEND, cursp(), sym_idx(s, sym), n\|(nk<<4));`
	`3646`	`+if (!blk && n == 0 && nk == 0) {`
	`3647`	`+genop_2(s, OP_SSEND0, cursp(), sym_idx(s, sym));`
	`3648`	`+ }`
	`3649`	`+else {`
	`3650`	`+genop_3(s, blk ? OP_SSENDB : OP_SSEND, cursp(), sym_idx(s, sym), n\|(nk<<4));`
	`3651`	`+ }`
	`3652`	`+ }`
	`3653`	`+else if (!blk && n == 0 && nk == 0) {`
	`3654`	`+genop_2(s, OP_SEND0, cursp(), sym_idx(s, sym));`
`3647`	`3655`	`}`
`3648`	`3656`	`else {`
`3649`	`3657`	`genop_3(s, blk ? OP_SENDB : OP_SEND, cursp(), sym_idx(s, sym), n\|(nk<<4));`

Original file line number	Diff line number	Diff line change
`@@ -336,6 +336,9 @@ codedump(mrb_state mrb, const mrb_irep irep, FILE *out)`
`336`	`336`	`fprintf(out, "SSEND\t\tR%d\t:%s\t", a, mrb_sym_dump(mrb, irep->syms[b]));`
`337`	`337`	`print_args(c, out);`
`338`	`338`	`break;`
	`339`	`+CASE(OP_SSEND0, BB):`
	`340`	`+fprintf(out, "SSEND0\tR%d\t:%s\n", a, mrb_sym_dump(mrb, irep->syms[b]));`
	`341`	`+break;`
`339`	`342`	`CASE(OP_SSENDB, BBB):`
`340`	`343`	`fprintf(out, "SSENDB\tR%d\t:%s\t", a, mrb_sym_dump(mrb, irep->syms[b]));`
`341`	`344`	`print_args(c, out);`
`@@ -344,6 +347,9 @@ codedump(mrb_state mrb, const mrb_irep irep, FILE *out)`
`344`	`347`	`fprintf(out, "SEND\t\tR%d\t:%s\t", a, mrb_sym_dump(mrb, irep->syms[b]));`
`345`	`348`	`print_args(c, out);`
`346`	`349`	`break;`
	`350`	`+CASE(OP_SEND0, BB):`
	`351`	`+fprintf(out, "SEND0\t\tR%d\t:%s\n", a, mrb_sym_dump(mrb, irep->syms[b]));`
	`352`	`+break;`
`347`	`353`	`CASE(OP_SENDB, BBB):`
`348`	`354`	`fprintf(out, "SENDB\t\tR%d\t:%s\t", a, mrb_sym_dump(mrb, irep->syms[b]));`
`349`	`355`	`print_args(c, out);`

Original file line number	Diff line number	Diff line change
`@@ -2211,6 +2211,12 @@ mrb_vm_exec(mrb_state mrb, const struct RProc begin_proc, const mrb_code *iseq`
`2211`	`2211`	`}`
`2212`	`2212`	`goto L_SENDB;`
`2213`	`2213`
	`2214`	`+CASE(OP_SSEND0, BB) {`
	`2215`	`+regs[a] = regs[0];`
	`2216`	`+c = 0;`
	`2217`	`+ }`
	`2218`	`+ goto L_SENDB;`
	`2219`	`+`
`2214`	`2220`	`CASE(OP_SSENDB, BBB) {`
`2215`	`2221`	`regs[a] = regs[0];`
`2216`	`2222`	`}`
`@@ -2219,6 +2225,11 @@ mrb_vm_exec(mrb_state mrb, const struct RProc begin_proc, const mrb_code *iseq`
`2219`	`2225`	`CASE(OP_SEND, BBB)`
`2220`	`2226`	`goto L_SENDB;`
`2221`	`2227`
	`2228`	`+CASE(OP_SEND0, BB) {`
	`2229`	`+c = 0;`
	`2230`	`+ }`
	`2231`	`+ goto L_SENDB;`
	`2232`	`+`
`2222`	`2233`	`L_SEND_SYM:`
`2223`	`2234`	`c = 1;`
`2224`	`2235`	`/* push nil after arguments */`
`@@ -2259,7 +2270,7 @@ mrb_vm_exec(mrb_state mrb, const struct RProc begin_proc, const mrb_code *iseq`
`2259`	`2270`	`}`
`2260`	`2271`
`2261`	`2272`	`mrb_assert(bidx < irep->nregs);`
`2262`		`-if (insn == OP_SEND \|\| insn == OP_SSEND) {`
	`2273`	`+if (insn == OP_SEND \|\| insn == OP_SEND0 \|\| insn == OP_SSEND \|\| insn == OP_SSEND0) {`
`2263`	`2274`	`/* clear block argument */`
`2264`	`2275`	`SET_NIL_VALUE(regs[new_bidx]);`
`2265`	`2276`	`SET_NIL_VALUE(blk);`
`@@ -2280,7 +2291,7 @@ mrb_vm_exec(mrb_state mrb, const struct RProc begin_proc, const mrb_code *iseq`
`2280`	`2291`	`else {`
`2281`	`2292`	`ci->mid = mid;`
`2282`	`2293`	`}`
`2283`		`-if (insn == OP_SEND \|\| insn == OP_SENDB) {`
	`2294`	`+if (insn == OP_SEND \|\| insn == OP_SEND0 \|\| insn == OP_SENDB) {`
`2284`	`2295`	`mrb_bool priv = TRUE;`
`2285`	`2296`	`if (m.flags & MRB_METHOD_PRIVATE_FL) {`
`2286`	`2297`	`vis_err:;`