rua 0.2.2-mswin32 → 0.2.3-mswin32

data/ext/rua.c

@@ -16,7 +16,7 @@ __declspec(dllexport) void Init_rua(void);
 
 #include "rua.h"
 
-#define VERSION "0.2.2"
+#define VERSION "0.2.3"
 #define REF_RBOBJ "self"
 
 static const char *insecure_methods[] = {
@@ -121,9 +121,16 @@ void Init_rua() {
 
 static VALUE rua_alloc(VALUE klass) {
   struct rua *p = ALLOC(struct rua);
+
   p->R = ALLOC(struct rua_state);
+  p->R->rua = Qnil;
+  p->R->error_handler = Qnil;
+  return Data_Wrap_Struct(klass, rua_mark, rua_free, p);
+}
 
-  return Data_Wrap_Struct(klass, 0, rua_free, p);
+static void rua_mark(struct rua *p) {
+  rb_gc_mark(p->R->rua);
+  rb_gc_mark(p->R->error_handler);
 }
 
 static void rua_free(struct rua *p) {
@@ -146,8 +153,9 @@ static VALUE rua_initialize(int argc, VALUE *argv, VALUE self) {
 
   Data_Get_Struct(self, struct rua, p);
   p->L = lua_open();
-  p->R->secure = 1;
+  p->R->rua = self;
   p->R->error_handler = Qnil;
+  p->R->secure = 1;
 
   if (argc > 0) {
     rua_openlibs(argc, argv, self);
@@ -293,7 +301,7 @@ static VALUE rua_set_secure(VALUE self, VALUE secure) {
 
 
 /*
- * get error handler flag.
+ * get error handler.
  */
 static VALUE rua_get_error_handler(VALUE self) {
   struct rua *p;
@@ -303,7 +311,7 @@ static VALUE rua_get_error_handler(VALUE self) {
 }
 
 /*
- * set error handler flag.
+ * set error handler.
  */
 static VALUE rua_set_error_handler(VALUE self, VALUE error_handler) {
   struct rua *p;
@@ -347,7 +355,12 @@ static VALUE rua_method_missing(int argc, VALUE *argv, VALUE self) {
 static VALUE rua_func_alloc(VALUE klass) {
   struct rua_ref *p = ALLOC(struct rua_ref);
 
-  return Data_Wrap_Struct(klass, 0, -1, p);
+  return Data_Wrap_Struct(klass, rua_func_mark, -1, p);
+}
+
+static void rua_func_mark(struct rua_ref *p) {
+  rb_gc_mark(p->R->rua);
+  rb_gc_mark(p->R->error_handler);
 }
 
 /*
@@ -399,7 +412,12 @@ static VALUE rua_func_call(int argc, VALUE *argv, VALUE self) {
 static VALUE rua_thread_alloc(VALUE klass) {
   struct rua_ref *p = ALLOC(struct rua_ref);
 
-  return Data_Wrap_Struct(klass, 0, -1, p);
+  return Data_Wrap_Struct(klass, rua_thread_mark, -1, p);
+}
+
+static void rua_thread_mark(struct rua_ref *p) {
+  rb_gc_mark(p->R->rua);
+  rb_gc_mark(p->R->error_handler);
 }
 
 /*

metadata

@@ -1,10 +1,10 @@
 --- !ruby/object:Gem::Specification 
-rubygems_version: 0.9.4
+rubygems_version: 0.9.2
 specification_version: 1
 name: rua
 version: !ruby/object:Gem::Version 
-  version: 0.2.2
-date: 2007-11-19 00:00:00 +09:00
+  version: 0.2.3
+date: 2007-11-20 00:00:00 +09:00
 summary: Rua is a library for using Lua under Ruby.
 require_paths: 
 - lib/i386-mswin32