Merge pull request #8 from mattn/platform

Add CFunc::Platform to recognize mruby platform

Author: masuidrive

include/cfunc_platform.h

@@ -0,0 +1,15 @@
+//
+//  CFunc::Platform class
+// 
+//  See Copyright Notice in cfunc.h
+//
+
+
+#ifndef cfunc_platform_h
+#define cfunc_platform_h
+
+#include "cfunc.h"
+
+void init_cfunc_platform(mrb_state *mrb, struct RClass* module);
+
+#endif

src/cfunc.c

@@ -12,6 +12,7 @@
 #include "cfunc_closure.h"
 #include "cfunc_type.h"
 #include "cfunc_rubyvm.h"
+#include "cfunc_platform.h"
 
 #include "mruby/proc.h"
 #include "mruby/dump.h"
@@ -37,12 +38,14 @@ mrb_mruby_cfunc_gem_init(mrb_state* mrb)
     set_cfunc_state(mrb, ns, state);
     state->namespace = ns;
 
-    init_cfunc_type(mrb, ns);
-    init_cfunc_pointer(mrb, ns);
-    init_cfunc_struct(mrb, ns);
-    init_cfunc_closure(mrb, ns);
-    init_cfunc_call(mrb, ns);
-    init_cfunc_rubyvm(mrb, ns);
+	int ai = mrb_gc_arena_save(mrb);
+    init_cfunc_type(mrb, ns); mrb_gc_arena_restore(mrb, ai);
+    init_cfunc_pointer(mrb, ns); mrb_gc_arena_restore(mrb, ai);
+    init_cfunc_struct(mrb, ns); mrb_gc_arena_restore(mrb, ai);
+    init_cfunc_closure(mrb, ns); mrb_gc_arena_restore(mrb, ai);
+    init_cfunc_call(mrb, ns); mrb_gc_arena_restore(mrb, ai);
+    init_cfunc_rubyvm(mrb, ns); mrb_gc_arena_restore(mrb, ai);
+	init_cfunc_platform(mrb, ns); mrb_gc_arena_restore(mrb, ai);
 
     mrb_define_class_method(mrb, ns, "mrb_state", cfunc_mrb_state, ARGS_NONE());
 }

src/cfunc_platform.c

@@ -0,0 +1,40 @@
+//
+//  CFunc::call method
+// 
+//  See Copyright Notice in cfunc.h
+//
+
+#include "cfunc_platform.h"
+#include "mruby/string.h"
+#include "mruby/class.h"
+
+static mrb_value
+cfunc_platform_is_posix(mrb_state *mrb, mrb_value self)
+{
+#ifdef __USE_POSIX
+    return mrb_true_value();
+#else
+    return mrb_false_value();
+#endif
+}
+
+
+static mrb_value
+cfunc_platform_is_win32(mrb_state *mrb, mrb_value self)
+{
+#ifdef _WIN32
+    return mrb_true_value();
+#else
+    return mrb_false_value();
+#endif
+}
+
+
+void init_cfunc_platform(mrb_state *mrb, struct RClass* module)
+{
+    struct cfunc_state *state = cfunc_state(mrb, module);
+    struct RClass *struct_class = mrb_define_class_under(mrb, module, "Platform", mrb->object_class);
+    
+    mrb_define_class_method(mrb, struct_class, "is_posix?", cfunc_platform_is_posix, ARGS_NONE());
+    mrb_define_class_method(mrb, struct_class, "is_win32?", cfunc_platform_is_win32, ARGS_NONE());
+}