summaryrefslogtreecommitdiffhomepage
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/array.c2
-rw-r--r--src/class.c8
-rw-r--r--src/compar.c2
-rw-r--r--src/enum.c2
-rw-r--r--src/hash.c2
-rw-r--r--src/kernel.c2
-rw-r--r--src/numeric.c6
-rw-r--r--src/proc.c2
-rw-r--r--src/range.c2
-rw-r--r--src/string.c2
-rw-r--r--src/symbol.c2
11 files changed, 16 insertions, 16 deletions
diff --git a/src/array.c b/src/array.c
index 526cf4973..ceda884c0 100644
--- a/src/array.c
+++ b/src/array.c
@@ -1111,7 +1111,7 @@ mrb_init_array(mrb_state *mrb)
{
struct RClass *a;
- a = mrb->array_class = mrb_define_class(mrb, "Array", mrb->object_class);
+ a = mrb->array_class = mrb_define_class(mrb, "Array", mrb->object_class); /* 15.2.12 */
MRB_SET_INSTANCE_TT(a, MRB_TT_ARRAY);
mrb_include_module(mrb, a, mrb_class_get(mrb, "Enumerable"));
diff --git a/src/class.c b/src/class.c
index ad4c9eaa2..d67a4af3e 100644
--- a/src/class.c
+++ b/src/class.c
@@ -1892,10 +1892,10 @@ mrb_init_class(mrb_state *mrb)
mrb_define_const(mrb, obj, "Class", mrb_obj_value(cls));
/* name each classes */
- mrb_name_class(mrb, bob, mrb_intern2(mrb, "BasicObject", 11));
- mrb_name_class(mrb, obj, mrb_intern2(mrb, "Object", 6));
- mrb_name_class(mrb, mod, mrb_intern2(mrb, "Module", 6));
- mrb_name_class(mrb, cls, mrb_intern2(mrb, "Class", 5));
+ mrb_name_class(mrb, bob, mrb_intern2(mrb, "BasicObject", 11)); /* 15.2.1 */
+ mrb_name_class(mrb, obj, mrb_intern2(mrb, "Object", 6)); /* 15.2.1 */
+ mrb_name_class(mrb, mod, mrb_intern2(mrb, "Module", 6)); /* 15.2.2 */
+ mrb_name_class(mrb, cls, mrb_intern2(mrb, "Class", 5)); /* 15.2.3 */
MRB_SET_INSTANCE_TT(cls, MRB_TT_CLASS);
mrb_define_method(mrb, bob, "initialize", mrb_bob_init, MRB_ARGS_NONE());
diff --git a/src/compar.c b/src/compar.c
index 1614d2393..0186b942f 100644
--- a/src/compar.c
+++ b/src/compar.c
@@ -9,5 +9,5 @@
void
mrb_init_comparable(mrb_state *mrb)
{
- mrb_define_module(mrb, "Comparable");
+ mrb_define_module(mrb, "Comparable"); /* 15.3.3 */
}
diff --git a/src/enum.c b/src/enum.c
index 0a58cc5bb..3def9e860 100644
--- a/src/enum.c
+++ b/src/enum.c
@@ -9,6 +9,6 @@
void
mrb_init_enumerable(mrb_state *mrb)
{
- mrb_define_module(mrb, "Enumerable");
+ mrb_define_module(mrb, "Enumerable"); /* 15.3.2 */
}
diff --git a/src/hash.c b/src/hash.c
index 3684b3b40..1ffaed5fb 100644
--- a/src/hash.c
+++ b/src/hash.c
@@ -1224,7 +1224,7 @@ mrb_init_hash(mrb_state *mrb)
{
struct RClass *h;
- h = mrb->hash_class = mrb_define_class(mrb, "Hash", mrb->object_class);
+ h = mrb->hash_class = mrb_define_class(mrb, "Hash", mrb->object_class); /* 15.2.13 */
MRB_SET_INSTANCE_TT(h, MRB_TT_HASH);
mrb_include_module(mrb, h, mrb_class_get(mrb, "Enumerable"));
diff --git a/src/kernel.c b/src/kernel.c
index ce3aa89f0..4b426c6b4 100644
--- a/src/kernel.c
+++ b/src/kernel.c
@@ -1081,7 +1081,7 @@ mrb_init_kernel(mrb_state *mrb)
{
struct RClass *krn;
- krn = mrb->kernel_module = mrb_define_module(mrb, "Kernel");
+ krn = mrb->kernel_module = mrb_define_module(mrb, "Kernel"); /* 15.3.1 */
mrb_define_class_method(mrb, krn, "block_given?", mrb_f_block_given_p_m, MRB_ARGS_NONE()); /* 15.3.1.2.2 */
mrb_define_class_method(mrb, krn, "global_variables", mrb_f_global_variables, MRB_ARGS_NONE()); /* 15.3.1.2.4 */
mrb_define_class_method(mrb, krn, "iterator?", mrb_f_block_given_p_m, MRB_ARGS_NONE()); /* 15.3.1.2.5 */
diff --git a/src/numeric.c b/src/numeric.c
index 4d794f8d8..cfde61c8c 100644
--- a/src/numeric.c
+++ b/src/numeric.c
@@ -1358,7 +1358,7 @@ mrb_init_numeric(mrb_state *mrb)
struct RClass *numeric, *integer, *fixnum, *fl;
/* Numeric Class */
- numeric = mrb_define_class(mrb, "Numeric", mrb->object_class);
+ numeric = mrb_define_class(mrb, "Numeric", mrb->object_class); /* 15.2.7 */
mrb_include_module(mrb, numeric, mrb_class_get(mrb, "Comparable"));
mrb_define_method(mrb, numeric, "+@", num_uplus, MRB_ARGS_REQ(1)); /* 15.2.7.4.1 */
@@ -1370,7 +1370,7 @@ mrb_init_numeric(mrb_state *mrb)
mrb_define_method(mrb, numeric, "<=>", num_cmp, MRB_ARGS_REQ(1)); /* 15.2.9.3.6 */
/* Integer Class */
- integer = mrb_define_class(mrb, "Integer", numeric);
+ integer = mrb_define_class(mrb, "Integer", numeric); /* 15.2.8 */
mrb_undef_class_method(mrb, integer, "new");
mrb_define_method(mrb, integer, "to_i", int_to_i, MRB_ARGS_NONE()); /* 15.2.8.3.24 */
mrb_define_method(mrb, integer, "to_int", int_to_i, MRB_ARGS_NONE());
@@ -1398,7 +1398,7 @@ mrb_init_numeric(mrb_state *mrb)
mrb_define_method(mrb, fixnum, "divmod", fix_divmod, MRB_ARGS_REQ(1)); /* 15.2.8.3.30 (x) */
/* Float Class */
- fl = mrb->float_class = mrb_define_class(mrb, "Float", numeric);
+ fl = mrb->float_class = mrb_define_class(mrb, "Float", numeric); /* 15.2.9 */
mrb_undef_class_method(mrb, fl, "new");
mrb_define_method(mrb, fl, "+", flo_plus, MRB_ARGS_REQ(1)); /* 15.2.9.3.1 */
mrb_define_method(mrb, fl, "-", flo_minus, MRB_ARGS_REQ(1)); /* 15.2.9.3.2 */
diff --git a/src/proc.c b/src/proc.c
index c8d09e62d..787a46492 100644
--- a/src/proc.c
+++ b/src/proc.c
@@ -193,7 +193,7 @@ mrb_init_proc(mrb_state *mrb)
call_irep->iseq = call_iseq;
call_irep->ilen = 1;
- mrb->proc_class = mrb_define_class(mrb, "Proc", mrb->object_class);
+ mrb->proc_class = mrb_define_class(mrb, "Proc", mrb->object_class); /* 15.2.17 */
MRB_SET_INSTANCE_TT(mrb->proc_class, MRB_TT_PROC);
mrb_define_method(mrb, mrb->proc_class, "initialize", mrb_proc_initialize, MRB_ARGS_NONE());
diff --git a/src/range.c b/src/range.c
index 6e313df51..1d6519a6e 100644
--- a/src/range.c
+++ b/src/range.c
@@ -418,7 +418,7 @@ mrb_init_range(mrb_state *mrb)
{
struct RClass *r;
- r = mrb_define_class(mrb, "Range", mrb->object_class);
+ r = mrb_define_class(mrb, "Range", mrb->object_class); /* 15.2.14 */
MRB_SET_INSTANCE_TT(r, MRB_TT_RANGE);
mrb_include_module(mrb, r, mrb_class_get(mrb, "Enumerable"));
diff --git a/src/string.c b/src/string.c
index 0c142958c..f3a788df3 100644
--- a/src/string.c
+++ b/src/string.c
@@ -2523,7 +2523,7 @@ mrb_init_string(mrb_state *mrb)
{
struct RClass *s;
- s = mrb->string_class = mrb_define_class(mrb, "String", mrb->object_class);
+ s = mrb->string_class = mrb_define_class(mrb, "String", mrb->object_class); /* 15.2.10 */
MRB_SET_INSTANCE_TT(s, MRB_TT_STRING);
mrb_include_module(mrb, s, mrb_class_get(mrb, "Comparable"));
diff --git a/src/symbol.c b/src/symbol.c
index bd8dce7df..c145a4a1a 100644
--- a/src/symbol.c
+++ b/src/symbol.c
@@ -444,7 +444,7 @@ mrb_init_symbol(mrb_state *mrb)
{
struct RClass *sym;
- sym = mrb->symbol_class = mrb_define_class(mrb, "Symbol", mrb->object_class);
+ sym = mrb->symbol_class = mrb_define_class(mrb, "Symbol", mrb->object_class); /* 15.2.11 */
mrb_define_method(mrb, sym, "===", sym_equal, MRB_ARGS_REQ(1)); /* 15.2.11.3.1 */
mrb_define_method(mrb, sym, "id2name", mrb_sym_to_s, MRB_ARGS_NONE()); /* 15.2.11.3.2 */