spec/subtend/ext/subtend_module.c

   1 #include <ruby.h>
   2
   3 VALUE sm_define_const(VALUE self, VALUE klass, VALUE val) {
   4   rb_define_const(klass, "FOO", val);
   5   return Qnil;
   6 }
   7
   8 VALUE sm_const_defined(VALUE self, VALUE klass, VALUE id) {
   9   return (VALUE)rb_const_defined(klass, SYM2ID(id));
  10 }
  11
  12 void Init_subtend_module() {
  13   VALUE cls;
  14   cls = rb_define_class("SubtendModule", rb_cObject);
  15   rb_define_method(cls, "rb_define_const", sm_define_const, 2);
  16   rb_define_method(cls, "rb_const_defined", sm_const_defined, 2);
  17 }