From de51a663b4300777be15003388070748a974e7c7 Mon Sep 17 00:00:00 2001 From: matz Date: Mon, 26 Mar 2001 08:57:16 +0000 Subject: * eval.c: remove TMP_PROTECT_END to prevent C_ALLOCA crash. * file.c (rb_file_flock): do not trap EINTR. * missing/flock.c (flock): returns the value from lockf(2) directly. * eval.c (ev_const_defined): should ignore toplevel cbase (Object). * eval.c (ev_const_get): ditto. * ext/md5/md5.h: replace by independent md5 implementation contributed by L. Peter Deutsch (thanks). * ext/md5/md5init.c: adopted to Deutsch's md5 implementation. * pack.c (pack_unpack): string from P/p should be tainted. * ext/curses/curses.c: curses on Mac OS X public beta does not have _maxx etc. * marshal.c (w_object): should truncate trailing zero short for bignums. * object.c (sym_intern): new method. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@1281 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- object.c | 8 ++++++++ 1 file changed, 8 insertions(+) (limited to 'object.c') diff --git a/object.c b/object.c index 8bb1d29e68..a9f8b0297e 100644 --- a/object.c +++ b/object.c @@ -525,6 +525,13 @@ sym_to_s(sym) return rb_str_new2(rb_id2name(SYM2ID(sym))); } +static VALUE +sym_intern(sym) + VALUE sym; +{ + return sym; +} + static VALUE rb_mod_clone(module) VALUE module; @@ -1228,6 +1235,7 @@ Init_Object() rb_define_method(rb_cSymbol, "inspect", sym_inspect, 0); rb_define_method(rb_cSymbol, "to_s", sym_to_s, 0); rb_define_method(rb_cSymbol, "id2name", sym_to_s, 0); + rb_define_method(rb_cSymbol, "intern", sym_intern, 0); rb_define_method(rb_cModule, "===", rb_mod_eqq, 1); rb_define_method(rb_cModule, "<=>", rb_mod_cmp, 1); -- cgit v1.2.3