* imported and refactored original test cases

* added methods XMLRPC::XMLParser.each_installed_parser and
  XMLRPC::XMLWriter.each_installed_writer to simply original test cases

* use Object#allocate instead of defining an empty #initialize

* module XMLRPC::Marshallable is now only used for tagging


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@7274 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

test/xmlrpc/test_features.rb

@@ -0,0 +1,47 @@
+$LOAD_PATH.unshift '../../lib'
+require 'test/unit'
+require "xmlrpc/create"
+require "xmlrpc/parser"
+require "xmlrpc/config"
+
+#XMLRPC::Config.const_set(ENABLE_NIL_CREATE, true)
+#XMLRPC::Config.const_set(ENABLE_NIL_PARSER, true)
+
+class Test_Features < Test::Unit::TestCase
+
+  def setup
+    @params = [nil, {"test" => nil}, [nil, 1, nil]]
+  end
+
+  def test_nil_create
+    XMLRPC::XMLWriter.each_installed_writer do |writer|
+      c = XMLRPC::Create.new(writer)
+
+      XMLRPC::Config.const_set(:ENABLE_NIL_CREATE, false)
+      assert_raises(RuntimeError) { str = c.methodCall("test", *@params) }
+
+      XMLRPC::Config.const_set(:ENABLE_NIL_CREATE, true)
+      assert_nothing_raised { str = c.methodCall("test", *@params) }
+    end
+  end
+
+  def test_nil_parse
+    XMLRPC::Config.const_set(:ENABLE_NIL_CREATE, true)
+
+    XMLRPC::XMLWriter.each_installed_writer do |writer|
+      c = XMLRPC::Create.new(writer)
+      str = c.methodCall("test", *@params) 
+      XMLRPC::XMLParser.each_installed_parser do |parser|
+        para = nil
+
+        XMLRPC::Config.const_set(:ENABLE_NIL_PARSER, false)
+        assert_raises(RuntimeError) { para = parser.parseMethodCall(str) }
+
+        XMLRPC::Config.const_set(:ENABLE_NIL_PARSER, true)
+        assert_nothing_raised { para = parser.parseMethodCall(str) }
+        assert_equal(para[1], @params)
+      end
+    end
+  end
+
+end