From 310b0dce8fa1e3f98b2184c2b6c1a0f091c2d4eb Mon Sep 17 00:00:00 2001
From: Yuichiro MASUI <masui@masuidrive.jp>
Date: Tue, 22 Jan 2013 20:18:48 +0900
Subject: Added finalizer of mrbgems

---
 src/init.c  | 9 +++++++++
 src/state.c | 3 +++
 2 files changed, 12 insertions(+)

(limited to 'src')

diff --git a/src/init.c b/src/init.c
index 48008b150..73ff8fce2 100644
--- a/src/init.c
+++ b/src/init.c
@@ -28,6 +28,7 @@ void mrb_init_time(mrb_state*);
 void mrb_init_math(mrb_state*);
 void mrb_init_mrblib(mrb_state*);
 void mrb_init_mrbgems(mrb_state*);
+void mrb_final_mrbgems(mrb_state*);
 
 #define DONE mrb_gc_arena_restore(mrb, 0);
 void
@@ -70,3 +71,11 @@ mrb_init_core(mrb_state *mrb)
   mrb_init_mrbgems(mrb); DONE;
 #endif
 }
+
+void
+mrb_final_core(mrb_state *mrb)
+{
+#ifndef DISABLE_GEMS
+  mrb_final_mrbgems(mrb); DONE;
+#endif
+}
\ No newline at end of file
diff --git a/src/state.c b/src/state.c
index c1ad4c6ad..c48997a7c 100644
--- a/src/state.c
+++ b/src/state.c
@@ -12,6 +12,7 @@
 void mrb_init_heap(mrb_state*);
 void mrb_init_core(mrb_state*);
 void mrb_init_ext(mrb_state*);
+void mrb_final_core(mrb_state*);
 
 mrb_state*
 mrb_open_allocf(mrb_allocf f, void *ud)
@@ -88,6 +89,8 @@ mrb_close(mrb_state *mrb)
 {
   int i;
 
+  mrb_final_core(mrb);
+
   /* free */
   mrb_gc_free_gv(mrb);
   mrb_free(mrb, mrb->stbase);
-- 
cgit v1.2.3