From bda7156f152292e80d0d2667683f4dde68e65a78 Mon Sep 17 00:00:00 2001 From: wanabe Date: Fri, 13 Jun 2008 08:22:13 +0000 Subject: * complex.c (string_to_c_internal): save and restore backref. fixed [ruby-dev:34991] git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@17148 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- complex.c | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) (limited to 'complex.c') diff --git a/complex.c b/complex.c index 1485d1348..935d4d6f2 100644 --- a/complex.c +++ b/complex.c @@ -1153,8 +1153,10 @@ string_to_c_internal(VALUE self) return rb_assoc_new(Qnil, self); { - VALUE m, sr, si, re, r, i; + VALUE m, sr, si, re, r, i, backref; + backref = rb_backref_get(); + rb_match_busy(backref); m = f_match(comp_pat1, s); if (!NIL_P(m)) { sr = Qnil; @@ -1170,8 +1172,10 @@ string_to_c_internal(VALUE self) } if (NIL_P(m)) { m = f_match(comp_pat2, s); - if (NIL_P(m)) + if (NIL_P(m)) { + rb_backref_set(backref); return rb_assoc_new(Qnil, self); + } sr = f_aref(m, INT2FIX(1)); if (NIL_P(f_aref(m, INT2FIX(2)))) si = Qnil; @@ -1206,6 +1210,7 @@ string_to_c_internal(VALUE self) else i = f_to_i(si); } + rb_backref_set(backref); return rb_assoc_new(rb_complex_new2(r, i), re); } } -- cgit