From 600d4f9ed17f02ed0e5e9355ae1ca7a249f78e05 Mon Sep 17 00:00:00 2001
From: Yukihiro Matz Matsumoto <matz@ruby-lang.org>
Date: Wed, 16 Jan 2013 18:38:53 +0900
Subject: save/restore arena index in mirb; close #740

---
 tools/mirb/mirb.c | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'tools')

diff --git a/tools/mirb/mirb.c b/tools/mirb/mirb.c
index b89c63cff..85c3249d2 100644
--- a/tools/mirb/mirb.c
+++ b/tools/mirb/mirb.c
@@ -159,6 +159,7 @@ main(void)
   mrb_value result;
   int n;
   int code_block_open = FALSE;
+  int ai;
 
   print_hint();
 
@@ -172,6 +173,7 @@ main(void)
   cxt = mrbc_context_new(mrb);
   cxt->capture_errors = 1;
 
+  ai = mrb_gc_arena_save(mrb);
   while (TRUE) {
 #ifndef ENABLE_READLINE
     print_cmdline(code_block_open);
@@ -253,6 +255,7 @@ main(void)
       ruby_code[0] = '\0';
       last_code_line[0] = '\0';
       mrb_parser_free(parser);
+      mrb_gc_arena_restore(mrb, ai);
     }
   }
   mrbc_context_free(mrb, cxt);
-- 
cgit v1.2.3