From ab0b1c478333f270f959155e0e31115284d79599 Mon Sep 17 00:00:00 2001 From: mattn Date: Tue, 3 Jun 2014 20:20:30 +0900 Subject: Implement String#chr for utf-8 --- mrbgems/mruby-string-utf8/src/string.c | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/mrbgems/mruby-string-utf8/src/string.c b/mrbgems/mruby-string-utf8/src/string.c index edda491fc..5b215c992 100644 --- a/mrbgems/mruby-string-utf8/src/string.c +++ b/mrbgems/mruby-string-utf8/src/string.c @@ -667,6 +667,12 @@ mrb_str_split_m(mrb_state *mrb, mrb_value str) return result; } +static mrb_value +mrb_str_chr(mrb_state *mrb, mrb_value self) +{ + return str_substr(mrb, self, 0, 1); +} + void mrb_mruby_string_utf8_gem_init(mrb_state* mrb) { @@ -682,6 +688,7 @@ mrb_mruby_string_utf8_gem_init(mrb_state* mrb) mrb_define_method(mrb, s, "reverse", mrb_str_reverse, MRB_ARGS_NONE()); mrb_define_method(mrb, s, "reverse!", mrb_str_reverse_bang, MRB_ARGS_NONE()); mrb_define_method(mrb, s, "rindex", mrb_str_rindex_m, MRB_ARGS_ANY()); + mrb_define_method(mrb, s, "chr", mrb_str_chr, MRB_ARGS_NONE()); mrb_define_method(mrb, mrb->fixnum_class, "chr", mrb_fixnum_chr, MRB_ARGS_NONE()); } -- cgit v1.2.3 From 1fab96668c055c9e352dbb00416603fba1cea22c Mon Sep 17 00:00:00 2001 From: mattn Date: Tue, 3 Jun 2014 20:33:02 +0900 Subject: Add test --- mrbgems/mruby-string-utf8/test/string.rb | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/mrbgems/mruby-string-utf8/test/string.rb b/mrbgems/mruby-string-utf8/test/string.rb index 1bfa8512c..ad864410a 100644 --- a/mrbgems/mruby-string-utf8/test/string.rb +++ b/mrbgems/mruby-string-utf8/test/string.rb @@ -66,3 +66,7 @@ assert('String#rindex') do assert_equal 12, str.rindex('ち') assert_equal 3, str.rindex('ち', 10) end + +assert('String#chr') do + assert_equal "こ", "こんにちは世界!".chr +end -- cgit v1.2.3