diff --git a/ChangeLog b/ChangeLog index 517335eb99..e62f4a41e0 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,7 @@ +Thu Sep 7 01:54:22 2006 Yukihiro Matsumoto + + * string.c (sym_equal): override. check equivalence. + Wed Sep 6 13:25:04 2006 Yukihiro Matsumoto * parse.y (symbols_i): need to initialize early-created symbols. diff --git a/string.c b/string.c index ce33f9541c..3935eb426e 100644 --- a/string.c +++ b/string.c @@ -4422,6 +4422,22 @@ rb_sym_s_intern(VALUE s) return rb_intern2(RSTRING_PTR(s), RSTRING_LEN(s)); } +/* + * call-seq: + * sym == obj => true or false + * + * Equality---If sym and obj are exactly the same + * symbol, returns true. Otherwise, returns + * false. + */ + +static VALUE +sym_equal(VALUE sym1, VALUE sym2) +{ + if (sym1 == sym2) return Qtrue; + return Qfalse; +} + /* * call-seq: * sym.to_i => fixnum @@ -4703,6 +4719,7 @@ Init_String(void) rb_define_singleton_method(rb_cSymbol, "all_symbols", rb_sym_all_symbols, 0); /* in parse.y */ rb_define_singleton_method(rb_cSymbol, "intern", rb_sym_s_intern, 1); + rb_define_method(rb_cSymbol, "==", sym_equal, 1); rb_define_method(rb_cSymbol, "to_i", sym_to_i, 0); rb_define_method(rb_cSymbol, "inspect", sym_inspect, 0); rb_define_method(rb_cSymbol, "to_s", sym_to_s, 0);