* ext/dl/cptr.c (rb_dlptr_s_to_ptr): when wrapping a pointer it should

keep a reference to the object it's wrapping
* test/dl/test_func.rb use standard test methods

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@25742 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
tenderlove 2009-11-12 22:41:07 +00:00
parent d109e9a67f
commit 17ccd5d013
2 changed files with 2 additions and 1 deletions

View File

@ -608,6 +608,7 @@ rb_dlptr_s_to_ptr(VALUE self, VALUE val)
ptr = rb_dlptr_new(NUM2PTR(rb_Integer(val)), 0, NULL);
}
OBJ_INFECT(ptr, val);
rb_iv_set(ptr, "wrapping", val);
return ptr;
}

View File

@ -36,7 +36,7 @@ module DL
buff1 = CPtr["12.34"]
buff2 = buff1 + 4
r = f.call(buff1, buff2)
assert_match(12.00..13.00, r)
assert_in_delta(12.34, r, 0.001)
end
def test_qsort1()