Implemented rb_eval_string_protect and added specs.

Author: aardvark179

CHANGELOG.md

@@ -3,6 +3,7 @@
 Bug fixes:
 
 * Fixed `BigDecimal#dup` so it now just returns the receiver, per Ruby 2.5+ semantics (#1680).
+* Implemented `rb_eval_string_protect`.
 
 # 1.0 RC 17
 

spec/ruby/optional/capi/ext/kernel_spec.c

@@ -175,6 +175,17 @@ static VALUE kernel_spec_rb_protect_yield(VALUE self, VALUE obj, VALUE ary) {
   return res;
 }
 
+static VALUE kernel_spec_rb_eval_string_protect(VALUE self, VALUE str, VALUE ary) {
+  int status = 0;
+  VALUE res = rb_eval_string_protect(RSTRING_PTR(str), &status);
+  rb_ary_store(ary, 0, INT2NUM(23));
+  rb_ary_store(ary, 1, res);
+  if (status) {
+    rb_jump_tag(status);
+  }
+  return res;
+}
+
 VALUE kernel_spec_rb_sys_fail(VALUE self, VALUE msg) {
   errno = 1;
   if(msg == Qnil) {
@@ -301,6 +312,7 @@ void Init_kernel_spec(void) {
   rb_define_method(cls, "rb_rescue", kernel_spec_rb_rescue, 4);
   rb_define_method(cls, "rb_rescue2", kernel_spec_rb_rescue2, -1);
   rb_define_method(cls, "rb_protect_yield", kernel_spec_rb_protect_yield, 2);
+  rb_define_method(cls, "rb_eval_string_protect", kernel_spec_rb_eval_string_protect, 2);
   rb_define_method(cls, "rb_catch", kernel_spec_rb_catch, 2);
   rb_define_method(cls, "rb_catch_obj", kernel_spec_rb_catch_obj, 2);
   rb_define_method(cls, "rb_sys_fail", kernel_spec_rb_sys_fail, 1);

spec/ruby/optional/capi/kernel_spec.rb

@@ -292,6 +292,22 @@
     end
   end
 
+  describe "rb_eval_string_protect" do
+    it "will evaluate the given string" do
+      proof = []
+      res = @s.rb_eval_string_protect('1 + 7', proof)
+      proof.should == [23, 8]
+    end
+
+    it "will allow cleanup code to be run when an exception is raised" do
+      proof = []
+      lambda do
+        @s.rb_eval_string_protect('raise RuntimeError', proof)
+      end.should raise_error(RuntimeError)
+      proof.should == [23, nil]
+    end
+  end
+
   describe "rb_rescue" do
     before :each do
       @proc = lambda { |x| x }

src/main/c/cext/ruby.c

@@ -4663,7 +4663,7 @@ VALUE rb_check_symbol(volatile VALUE *namep) {
 }
 
 VALUE rb_eval_string_protect(const char *str, int *state) {
-  rb_tr_error("rb_eval_string_protect not implemented");
+  return rb_protect((VALUE (*)(VALUE))rb_eval_string, (VALUE)str, state);
 }
 
 VALUE rb_eval_string_wrap(const char *str, int *state) {