?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
raw | patch | inline | side by side (parent: 3acaa44)
Restrict `OP_EPOP` operand to `1`; ref #3789
authorYukihiro "Matz" Matsumoto <[email protected]>
Tue, 5 Sep 2017 12:11:41 +0000 (5 21:11 +0900)
committerYukihiro "Matz" Matsumoto <[email protected]>
Tue, 5 Sep 2017 12:11:41 +0000 (5 21:11 +0900)
mrbgems/mruby-compiler/core/codegen.c patch | blob | blame | history

diff --git a/mrbgems/mruby-compiler/core/codegen.c b/mrbgems/mruby-compiler/core/codegen.c
index 8f15a9b..5bb0545 100644 (file)
--- a/mrbgems/mruby-compiler/core/codegen.c
+++ b/mrbgems/mruby-compiler/core/codegen.c
@@ -279,10 +279,20 @@ genop_peep(codegen_scope *s, mrb_code i, int val)
       }
       break;
     case OP_EPOP:
+#if 1
+      if (GETARG_A(i) > 1) {
+        int j, len = GETARG_A(i), n;
+        for (j=0; j<len; j++) {
+          n = genop(s, MKOP_A(OP_EPOP, 1));
+        }
+        return n;
+      }
+#else
       if (c0 == OP_EPOP) {
         s->iseq[s->pc-1] = MKOP_A(OP_EPOP, GETARG_A(i0)+GETARG_A(i));
         return 0;
       }
+#endif
       break;
     case OP_POPERR:
       if (c0 == OP_POPERR) {
lightweight implementation of the Ruby language