diff options
author | akr <akr@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2007-11-23 04:35:53 +0000 |
---|---|---|
committer | akr <akr@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2007-11-23 04:35:53 +0000 |
commit | 0dbdad759916fb214750882cf73f4d686b3f10aa (patch) | |
tree | c6b7e399bd690789bac7dff9cc25708b4053c5fd /struct.c | |
parent | d73f08d56d92de1ad41abb877c2f9ed6c8c15d76 (diff) | |
download | ruby-0dbdad759916fb214750882cf73f4d686b3f10aa.tar.gz |
* struct.c (rb_struct_define_without_accessor): new function.
* range.c (range_alloc): removed.
(Init_Range): use rb_struct_define_without_accessor.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@14000 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'struct.c')
-rw-r--r-- | struct.c | 35 |
1 files changed, 35 insertions, 0 deletions
@@ -218,6 +218,41 @@ make_struct(VALUE name, VALUE members, VALUE klass) } VALUE +rb_struct_define_without_accessor(char *class_name, VALUE super, ...) +{ + VALUE klass; + va_list ar; + VALUE members; + long i; + char *name; + + members = rb_ary_new2(0); + va_start(ar, super); + i = 0; + while ((name = va_arg(ar, char*)) != NULL) { + rb_ary_push(members, ID2SYM(rb_intern(name))); + } + va_end(ar); + OBJ_FREEZE(members); + + if (class_name) { + klass = rb_define_class(class_name, super); + } + else { + klass = rb_class_new(super); + rb_make_metaclass(klass, RBASIC(super)->klass); + rb_class_inherited(super, klass); + } + + rb_iv_set(klass, "__size__", LONG2NUM(RARRAY_LEN(members))); + rb_iv_set(klass, "__members__", members); + + rb_define_alloc_func(klass, struct_alloc); + + return klass; +} + +VALUE rb_struct_define(const char *name, ...) { va_list ar; |