From 677a2ac22633473fb286d7297a8585c01fe7394b Mon Sep 17 00:00:00 2001 From: "Yukihiro \"Matz\" Matsumoto" Date: Thu, 7 Nov 2013 04:20:46 +0900 Subject: irep->pool not to be GCed --- src/string.c | 28 ---------------------------- 1 file changed, 28 deletions(-) (limited to 'src/string.c') diff --git a/src/string.c b/src/string.c index 90852943e..af70e8e45 100644 --- a/src/string.c +++ b/src/string.c @@ -331,34 +331,6 @@ str_make_shared(mrb_state *mrb, struct RString *s) } } -/* - * call-seq: (Caution! string literal) - * String.new(str="") => new_str - * - * Returns a new string object containing a copy of str. - */ - -mrb_value -mrb_str_literal(mrb_state *mrb, mrb_value str) -{ - struct RString *s, *orig; - mrb_shared_string *shared; - - s = mrb_obj_alloc_string(mrb); - orig = mrb_str_ptr(str); - if (!(orig->flags & MRB_STR_SHARED)) { - str_make_shared(mrb, orig); - } - shared = orig->aux.shared; - shared->refcnt++; - s->ptr = shared->ptr; - s->len = shared->len; - s->aux.shared = shared; - s->flags |= MRB_STR_SHARED; - - return mrb_obj_value(s); -} - /* * call-seq: * char* str = String("abcd"), len=strlen("abcd") -- cgit v1.2.3