ops.h: add `OP_SYMBOL` instruction.

It generates a symbol by interning from the pool string.

1 files changed, 10 insertions, 0 deletions

diff --git a/mrbgems/mruby-compiler/core/codegen.c b/mrbgems/mruby-compiler/core/codegen.c
index b8891cf1b..7327f2cef 100644
--- a/mrbgems/mruby-compiler/core/codegen.c
+++ b/mrbgems/mruby-compiler/core/codegen.c
@@ -1757,6 +1757,16 @@ static void
 gen_intern(codegen_scope *s)
 {
   pop();
+  if (!no_peephole(s)) {
+    struct mrb_insn_data data = mrb_last_insn(s);
+
+    if (data.insn == OP_STRING && data.a == cursp()) {
+      rewind_pc(s);
+      genop_2(s, OP_SYMBOL, data.a, data.b);
+      push();
+      return;
+    }
+  }
   genop_1(s, OP_INTERN, cursp());
   push();
 }