ruby/test/win32ole/err_in_callback.rb

require 'win32ole'
ie = WIN32OLE.new('InternetExplorer.Application')
ie.visible = true
WIN32OLE_EVENT.message_loop
sleep 0.2
ev = WIN32OLE_EVENT.new(ie)

ev.on_event('BeforeNavigate2') {|*args|
  foo
}
ie.navigate(ARGV.shift)
* test/win32ole/err_in_callback.rb : add test of raising exception in WIN32OLE_EVENT callback. * test/win32ole/test_err_in_callback.rb : ditto. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@18215 b2dd03c8-39d4-4d8f-98ff-823fe69b080e 2008-07-25 15:59:53 +04:00			`require 'win32ole'`
			`ie = WIN32OLE.new('InternetExplorer.Application')`
			`ie.visible = true`
			`WIN32OLE_EVENT.message_loop`
			`sleep 0.2`
			`ev = WIN32OLE_EVENT.new(ie)`

			`ev.on_event('BeforeNavigate2') {\|*args\|`
			`foo`
			`}`
			`ie.navigate(ARGV.shift)`