* 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:
parent
d109e9a67f
commit
17ccd5d013
@ -608,6 +608,7 @@ rb_dlptr_s_to_ptr(VALUE self, VALUE val)
|
|||||||
ptr = rb_dlptr_new(NUM2PTR(rb_Integer(val)), 0, NULL);
|
ptr = rb_dlptr_new(NUM2PTR(rb_Integer(val)), 0, NULL);
|
||||||
}
|
}
|
||||||
OBJ_INFECT(ptr, val);
|
OBJ_INFECT(ptr, val);
|
||||||
|
rb_iv_set(ptr, "wrapping", val);
|
||||||
return ptr;
|
return ptr;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -36,7 +36,7 @@ module DL
|
|||||||
buff1 = CPtr["12.34"]
|
buff1 = CPtr["12.34"]
|
||||||
buff2 = buff1 + 4
|
buff2 = buff1 + 4
|
||||||
r = f.call(buff1, buff2)
|
r = f.call(buff1, buff2)
|
||||||
assert_match(12.00..13.00, r)
|
assert_in_delta(12.34, r, 0.001)
|
||||||
end
|
end
|
||||||
|
|
||||||
def test_qsort1()
|
def test_qsort1()
|
||||||
|
Loading…
x
Reference in New Issue
Block a user