knu	2012-07-05 12:31:36 +0900 (Thu, 05 Jul 2012)

  New Revision: 36317

  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi?view=rev&revision=36317

  Log:
    * test/net/http/test_httpresponses.rb: Add a test file for
      Net::HTTPResponses and put a test case for the previous bug.

  Added files:
    trunk/test/net/http/test_httpresponses.rb
  Modified files:
    trunk/ChangeLog

Index: ChangeLog
===================================================================
--- ChangeLog	(revision 36316)
+++ ChangeLog	(revision 36317)
@@ -1,3 +1,8 @@
+Thu Jul  5 12:28:11 2012  Akinori MUSHA  <knu@i...>
+
+	* test/net/http/test_httpresponses.rb: Add a test file for
+	  Net::HTTPResponses and put a test case for the previous bug.
+
 Thu Jul  5 06:33:52 2012  Mark Dodwell <mark@m...>
 
 	* lib/net/http/responses.rb: Fix 4xx classes to inherit correctly
Index: test/net/http/test_httpresponses.rb
===================================================================
--- test/net/http/test_httpresponses.rb	(revision 0)
+++ test/net/http/test_httpresponses.rb	(revision 36317)
@@ -0,0 +1,24 @@
+require 'net/http'
+require 'test/unit'
+
+class HTTPResponsesTest < Test::Unit::TestCase
+  def test_status_code_classes
+    Net::HTTPResponse::CODE_TO_OBJ.each_pair { |code, klass|
+      case code
+      when /\A1\d\d\z/
+        group = Net::HTTPInformation
+      when /\A2\d\d\z/
+        group = Net::HTTPSuccess
+      when /\A3\d\d\z/
+        group = Net::HTTPRedirection
+      when /\A4\d\d\z/
+        group = Net::HTTPClientError
+      when /\A5\d\d\z/
+        group = Net::HTTPServerError
+      else
+        flunk "Unknown HTTP status code: #{code} => #{klass.name}"
+      end
+      assert(klass < group, "#{klass.name} (#{code}) must inherit from #{group.name}")
+    }
+  end
+end

--
ML: ruby-changes@q...
Info: http://www.atdot.net/~ko1/quickml/