admin/mruby-mruby
1
0
Fork 0
mirror of https://github.com/mruby/mruby synced 2026-06-08 16:11:16 +00:00
Code Issues Packages Projects Releases Wiki Activity

Backtick operation

Browse Source
This commit is contained in:
mattn
2013-03-21 19:45:47 +09:00
parent 605035bc42
commit 1ab4dbcbf3
4 changed files with 76 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/codegen.c
+20
View File
@@ -2031,6 +2031,26 @@ codegen(codegen_scope *s, node *tree, int val)
gen_literal_array(s, tree, TRUE, val);
break;
case NODE_XSTR:
if (val) {
char *p = (char*)tree->car;
size_t len = (intptr_t)tree->cdr;
int ai = mrb_gc_arena_save(s->mrb);
int sym = new_sym(s, mrb_intern(s->mrb, "Kernel"));
int off = new_lit(s, mrb_str_new(s->mrb, p, len));
genop(s, MKOP_A(OP_OCLASS, cursp()));
genop(s, MKOP_ABx(OP_GETMCNST, cursp(), sym));
push();
genop(s, MKOP_ABx(OP_STRING, cursp(), off));
pop();
sym = new_sym(s, mrb_intern(s->mrb, "__backtick__"));
genop(s, MKOP_ABC(OP_SEND, cursp(), sym, 1));
mrb_gc_arena_restore(s->mrb, ai);
push();
}
break;
case NODE_REGX:
if (val) {
char *p1 = (char*)tree->car;