From 029e9449ce7fa4710eac7a66e605afb3dc8a99ce Mon Sep 17 00:00:00 2001 From: matz Date: Wed, 30 Jul 2003 07:08:56 +0000 Subject: [PATCH] * ruby.c (proc_options): -F set compiled regular expression to $;. [ruby-talk:77381] * string.c (Init_String): no setter type check for $; git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@4230 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- ChangeLog | 7 +++++++ ruby.c | 2 +- string.c | 4 ++-- 3 files changed, 10 insertions(+), 3 deletions(-) diff --git a/ChangeLog b/ChangeLog index cec6459085..9f51732997 100644 --- a/ChangeLog +++ b/ChangeLog @@ -3,6 +3,13 @@ Wed Jul 30 15:54:04 2003 GOTOU Yuuzou * ext/openssl/ossl_ssl.c (ossl_sslctx_initialize): should initialize instance variables. [ruby-talk:77362] +Wed Jul 30 15:39:54 2003 Yukihiro Matsumoto + + * ruby.c (proc_options): -F set compiled regular expression to $;. + [ruby-talk:77381] + + * string.c (Init_String): no setter type check for $; + Wed Jul 30 15:10:02 2003 Nobuyoshi Nakada * error.c (rb_raise): snprintf() termination moved to diff --git a/ruby.c b/ruby.c index 39755802c1..344007b5a0 100644 --- a/ruby.c +++ b/ruby.c @@ -589,7 +589,7 @@ proc_options(argc, argv) case 'F': if (*++s) { - rb_fs = rb_str_new2(s); + rb_fs = rb_reg_new(s, strlen(s), 0); } break; diff --git a/string.c b/string.c index 9d3da92069..ae157f474e 100644 --- a/string.c +++ b/string.c @@ -3402,6 +3402,6 @@ Init_String() id_to_s = rb_intern("to_s"); rb_fs = Qnil; - rb_define_hooked_variable("$;", &rb_fs, 0, rb_str_setter); - rb_define_hooked_variable("$-F", &rb_fs, 0, rb_str_setter); + rb_define_variable("$;", &rb_fs); + rb_define_variable("$-F", &rb_fs); }