2011-01-24 17:00:55 -05:00
|
|
|
#include "ruby.h"
|
2013-07-11 07:17:59 -04:00
|
|
|
#include "ruby/encoding.h"
|
2011-01-24 17:00:55 -05:00
|
|
|
|
|
|
|
static VALUE
|
|
|
|
bug_str_cstr_term(VALUE str)
|
|
|
|
{
|
|
|
|
long len;
|
|
|
|
char *s;
|
2013-07-11 07:17:59 -04:00
|
|
|
int c;
|
|
|
|
rb_encoding *enc;
|
|
|
|
|
2011-01-24 17:00:55 -05:00
|
|
|
rb_str_modify(str);
|
|
|
|
len = RSTRING_LEN(str);
|
|
|
|
RSTRING_PTR(str)[len] = 'x';
|
|
|
|
s = StringValueCStr(str);
|
|
|
|
rb_gc();
|
2013-07-11 07:17:59 -04:00
|
|
|
enc = rb_enc_get(str);
|
|
|
|
c = rb_enc_codepoint(&s[len], &s[len+rb_enc_mbminlen(enc)], enc);
|
|
|
|
return INT2NUM(c);
|
2011-01-24 17:00:55 -05:00
|
|
|
}
|
|
|
|
|
|
|
|
void
|
|
|
|
Init_cstr(VALUE klass)
|
|
|
|
{
|
|
|
|
rb_define_method(klass, "cstr_term", bug_str_cstr_term, 0);
|
|
|
|
}
|