From d815d30338ed5939229afcf2a5bfce1678395989 Mon Sep 17 00:00:00 2001 From: tenderlove Date: Thu, 3 Dec 2009 03:04:27 +0000 Subject: * test/dl/test_callback.rb (**): testing return values of dl callbacks git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@25978 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- test/dl/test_callback.rb | 23 +++++++++++++++++++++++ 1 file changed, 23 insertions(+) (limited to 'test') diff --git a/test/dl/test_callback.rb b/test/dl/test_callback.rb index f3dd665fe..0b4ad5dde 100644 --- a/test/dl/test_callback.rb +++ b/test/dl/test_callback.rb @@ -1,10 +1,33 @@ require_relative 'test_base' require_relative '../ruby/envutil' +require 'dl/callback' +require 'dl/func' module DL class TestCallback < TestBase include DL + def test_callback_return_value + addr = set_callback(TYPE_VOIDP, 1) do |str| + str + end + func = CFunc.new(addr, TYPE_VOIDP, 'test') + f = Function.new(func, [TYPE_VOIDP]) + ptr = CPtr['blah'] + assert_equal ptr, f.call(ptr) + end + + def test_callback_return_arbitrary + addr = set_callback(TYPE_VOIDP, 1) do |ptr| + CPtr['foo'].to_i + end + func = CFunc.new(addr, TYPE_VOIDP, 'test') + f = Function.new(func, [TYPE_VOIDP]) + + ptr = CPtr['foo'] + assert_equal 'foo', f.call(ptr).to_s + end + def test_callback_with_string called_with = nil addr = set_callback(TYPE_VOID, 1) do |str| -- cgit