finally creating less objects in the test

basic still #23 , now applied
Basic size of 20, interpreter gets 50 and the full set is 1024

Tests run more than twice as fast!!

test/parfait/test_factory.rb

@@ -23,8 +23,8 @@ module Parfait
     def test_get_next_object
       assert_equal Parfait::Integer ,  @factory.get_next_object.class
     end
-    def test_default_page
-      assert_equal 1024 , Factory.page_size
+    def test_default_test_page
+      assert_equal 20 , Factory.page_size
     end
     def test_default_reserve
       assert_equal 10 , Factory.reserve_size
@@ -37,15 +37,6 @@ module Parfait
       @factory.get_next_object
       assert_equal Parfait::Integer , @factory.reserve.class
     end
-    def test_chain_length
-      count = 0
-      start = @factory.get_next_object
-      while( start )
-        start = start.next_integer
-        count += 1
-      end
-      assert_equal 1024 - 10 , count
-    end
     def test_reserve_length
       count = 0
       start = @factory.get_next_object
@@ -56,5 +47,23 @@ module Parfait
       end
       assert_equal 11 , count
     end
+    class BigFactoryTest < BigParfaitTest
+      def setup
+        super
+        @factory = Factory.new Parfait.object_space.get_type_by_class_name(:Integer)
+      end
+      def test_chain_length
+        count = 0
+        start = @factory.get_next_object
+        while( start )
+          start = start.next_integer
+          count += 1
+        end
+        assert_equal 1024 - 10 , count
+      end
+      def test_default_page
+        assert_equal 1024 , Factory.page_size
+      end
+    end
   end
 end

test/parfait/test_space.rb

@@ -117,15 +117,6 @@ module Parfait
     def test_has_next_address
       assert_equal Parfait::ReturnAddress , @space.get_next_for(:ReturnAddress).class
     end
-    def test_address_count
-      addr = @space.get_next_for(:ReturnAddress)
-      count = 0
-      while(addr)
-        count += 1
-        addr = addr.next_integer
-      end
-      assert_equal 1014, count
-    end
     def test_has_message_factory
       ints = @space.get_factory_for(:Message)
       assert_equal Factory , ints.class
@@ -138,16 +129,6 @@ module Parfait
     def test_has_next_message
       assert_equal Parfait::Message , @space.get_next_for(:Message).class
     end
-    def test_message_count
-      mess = @space.get_next_for(:Message)
-      count = 0
-      while(mess)
-        count += 1
-        assert mess.frame
-        mess = mess.next_message
-      end
-      assert_equal 1014, count
-    end
     def test_create_class
       assert @space.create_class( :NewClass )
     end
@@ -191,4 +172,26 @@ module Parfait
       end
     end
   end
+  class BigTestSpace < BigParfaitTest
+    def test_address_count
+      addr = @space.get_next_for(:ReturnAddress)
+      count = 0
+      while(addr)
+        count += 1
+        addr = addr.next_integer
+      end
+      assert_equal 1014, count
+    end
+    def test_message_count
+      mess = @space.get_next_for(:Message)
+      count = 0
+      while(mess)
+        count += 1
+        assert mess.frame
+        mess = mess.next_message
+      end
+      assert_equal 1014, count
+    end
+  end
+
 end