ext/-test-/string/rb_interned_str.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14

#include "ruby.h"

static VALUE
bug_rb_interned_str_dup(VALUE self, VALUE str)
{
    Check_Type(str, T_STRING);
    return rb_interned_str(RSTRING_PTR(str), RSTRING_LEN(str));
}

void
Init_string_rb_interned_str(VALUE klass)
{
    rb_define_singleton_method(klass, "rb_interned_str_dup", bug_rb_interned_str_dup, 1);
}