From 54ec1c4fe81672ca66f327ef6ae170f458cd79e5 Mon Sep 17 00:00:00 2001 From: shyouhei Date: Wed, 15 Aug 2007 20:57:30 +0000 Subject: sorry. I made wrong tags. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/tags/v1_8_5_54@13009 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- ruby_1_8_5/test/xmlrpc/test_marshal.rb | 93 ---------------------------------- 1 file changed, 93 deletions(-) delete mode 100644 ruby_1_8_5/test/xmlrpc/test_marshal.rb (limited to 'ruby_1_8_5/test/xmlrpc/test_marshal.rb') diff --git a/ruby_1_8_5/test/xmlrpc/test_marshal.rb b/ruby_1_8_5/test/xmlrpc/test_marshal.rb deleted file mode 100644 index 38bc8c646f..0000000000 --- a/ruby_1_8_5/test/xmlrpc/test_marshal.rb +++ /dev/null @@ -1,93 +0,0 @@ -require 'test/unit' -require "xmlrpc/marshal" - -class Test_Marshal < Test::Unit::TestCase - # for test_parser_values - class Person - include XMLRPC::Marshallable - attr_reader :name - def initialize(name) - @name = name - end - end - - - def test1_dump_response - assert_nothing_raised(NameError) { - XMLRPC::Marshal.dump_response('arg') - } - end - - def test1_dump_call - assert_nothing_raised(NameError) { - XMLRPC::Marshal.dump_call('methodName', 'arg') - } - end - - def test2_dump_load_response - value = [1, 2, 3, {"test" => true}, 3.4] - res = XMLRPC::Marshal.dump_response(value) - - assert_equal(value, XMLRPC::Marshal.load_response(res)) - end - - def test2_dump_load_call - methodName = "testMethod" - value = [1, 2, 3, {"test" => true}, 3.4] - exp = [methodName, [value, value]] - - res = XMLRPC::Marshal.dump_call(methodName, value, value) - - assert_equal(exp, XMLRPC::Marshal.load_call(res)) - end - - def test_parser_values - v1 = [ - 1, -7778, # integers - 1.0, 0.0, -333.0, 2343434343.0, # floats - false, true, true, false, # booleans - "Hallo", "with < and >", "" # strings - ] - - v2 = [ - [v1, v1, v1], - {"a" => v1} - ] - - v3 = [ - XMLRPC::Base64.new("\001"*1000), # base64 - :aSymbol, :anotherSym # symbols (-> string) - ] - v3_exp = [ - "\001"*1000, - "aSymbol", "anotherSym" - ] - person = Person.new("Michael") - - XMLRPC::XMLParser.each_installed_parser do |parser| - m = XMLRPC::Marshal.new(parser) - - assert_equal( v1, m.load_response(m.dump_response(v1)) ) - assert_equal( v2, m.load_response(m.dump_response(v2)) ) - assert_equal( v3_exp, m.load_response(m.dump_response(v3)) ) - - pers = m.load_response(m.dump_response(person)) - - assert( pers.is_a?(Person) ) - assert( person.name == pers.name ) - end - - # missing, Date, Time, DateTime - # Struct - end - - def test_no_params_tag - # bug found by Idan Sofer - - expect = %{myMethod\n} - - str = XMLRPC::Marshal.dump_call("myMethod") - assert_equal(expect, str) - end - -end -- cgit v1.2.3