From 7e825eeefcc7b7ab9985d906857f77bb23db53f8 Mon Sep 17 00:00:00 2001 From: nobu Date: Thu, 14 Jan 2016 02:45:03 +0000 Subject: variable.c: $1..$9 in global_variables * variable.c (rb_f_global_variables): add $1..$9 only if $~ is set. fix the condition removed at r14014. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@53530 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- variable.c | 14 ++++++++------ 1 file changed, 8 insertions(+), 6 deletions(-) (limited to 'variable.c') diff --git a/variable.c b/variable.c index 842006ed71..26d9a4b944 100644 --- a/variable.c +++ b/variable.c @@ -880,14 +880,16 @@ VALUE rb_f_global_variables(void) { VALUE ary = rb_ary_new(); - char buf[2]; - int i; rb_id_table_foreach(rb_global_tbl, gvar_i, (void *)ary); - buf[0] = '$'; - for (i = 1; i <= 9; ++i) { - buf[1] = (char)(i + '0'); - rb_ary_push(ary, ID2SYM(rb_intern2(buf, 2))); + if (!NIL_P(rb_backref_get())) { + char buf[2]; + int i; + buf[0] = '$'; + for (i = 1; i <= 9; ++i) { + buf[1] = (char)(i + '0'); + rb_ary_push(ary, ID2SYM(rb_intern2(buf, 2))); + } } return ary; } -- cgit v1.2.3