@@ -78,9 +78,10 @@ class ConstTest < Test::Unit::TestCase eval <<-EOS class ::X class G - def self.parens(*a); p :subclassed!; Class.new(self); end + def self.parens(*a); Class.new(self); end end class Y + # G is not a constant of Y and is not a constnat of any of Y's ancestors class Z < G(42) end end @@ -92,7 +93,7 @@ class ConstTest < Test::Unit::TestCase eval <<-EOS class ::X class G - def self.parens(*a); p :subclassed!; Class.new(self); end + def self.parens(*a); Class.new(self); end end class Z < G(42) end @@ -122,4 +123,34 @@ class ConstTest < Test::Unit::TestCase EOS end end + + def test_default_initialize_args + eval <<-EOS + class ::X + attr_reader :x, :y, :z + def initialize(x, y, z) + @x, @y, @z = x, y, z + end + def self.parens(*args) + Class.new(self).class_eval do + define_method :initialize do + super(*args) + end + + self + end + end + end + + class ::Y < X(1, 2, 3) + end + EOS + + assert_equal 1, Y.new.x + assert_equal 2, Y.new.y + assert_equal 3, Y.new.z + ensure + Object.send :remove_const, :X + Object.send :remove_const, :Y + end end test/const_test.rb e57edcde2665f0060a1e5fad90f14e76d4ab49e0 steve coderrr.contact@gmail.com http://github.com/coderrr/parenthesis_hacks/commit/61f86b0c77997dc12db28390ee706f697549797e 61f86b0c77997dc12db28390ee706f697549797e 2008-11-30T08:57:20-08:00 2008-11-30T08:57:20-08:00 added test b0858643fddafdfd0d142fbe54f062c23a8e0fd3 steve coderrr.contact@gmail.com