module-cluster 1.4.8 → 2.0.0

data/spec/ModuleCluster/Define/InstanceCluster_spec.rb

@@ -1,102 +0,0 @@
-
-require_relative '../../../lib/module-cluster.rb'
-
-describe ::ModuleCluster::Define::InstanceCluster do
-
-  ####################################
-  #  self.should_include_or_extend?  #
-  ####################################
-
-  it 'should return true if instance, false otherwise' do
-    ::ModuleCluster::Define::InstanceCluster.should_include_or_extend?( Kernel ).should == false
-    ::ModuleCluster::Define::InstanceCluster.should_include_or_extend?( Class ).should == false
-    ::ModuleCluster::Define::InstanceCluster.should_include_or_extend?( Object.new ).should == true    
-  end
-
-  ##########################
-  #  self.should_cascade?  #
-  ##########################
-
-  it 'should report false' do
-    ::ModuleCluster::Define::InstanceCluster.should_cascade?( Kernel ).should == false
-    ::ModuleCluster::Define::InstanceCluster.should_cascade?( Class ).should == false
-    ::ModuleCluster::Define::InstanceCluster.should_cascade?( Object.new ).should == false
-  end
-	
-	##################################
-	#  instance_extend_also_extends  #
-	##################################
-	
-  it 'can extend other modules when this one extends a module or instance' do
-    module ::ModuleCluster::Define::InstanceCluster::Mock01
-      extend ::ModuleCluster::Define::InstanceCluster
-      module Module1
-      end
-      module Module2
-      end
-      instance_extend_also_extends( Module1, Module2 ).name = :some_name
-      respond_to?( :extended ).should == true
-      module ModuleProof
-        extend ::ModuleCluster::Define::InstanceCluster::Mock01
-        ancestors.include?( ::ModuleCluster::Define::InstanceCluster::Mock01::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::InstanceCluster::Mock01::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::InstanceCluster::Mock01::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::InstanceCluster::Mock01::Module2 ).should == false
-      end
-      class ClassProof
-        extend ::ModuleCluster::Define::InstanceCluster::Mock01
-        ancestors.include?( ::ModuleCluster::Define::InstanceCluster::Mock01::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::InstanceCluster::Mock01::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::InstanceCluster::Mock01::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::InstanceCluster::Mock01::Module2 ).should == false
-      end
-      Object.new.instance_eval do
-        extend ::ModuleCluster::Define::InstanceCluster::Mock01
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::InstanceCluster::Mock01::Module1 ).should == true
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::InstanceCluster::Mock01::Module2 ).should == true
-      end
-    end
-  end
-
-	######################################
-	#  instance_extend_prepends_extends  #
-	######################################
-	
-  it 'can extend other modules before this one when this one extends an instance' do
-    module ::ModuleCluster::Define::InstanceCluster::Mock02
-      extend ::ModuleCluster::Define::InstanceCluster
-      module Module1
-      end
-      module Module2
-      end
-      instance_extend_prepends_extends( Module1, Module2 ).name = :some_name
-      respond_to?( :extend_object ).should == true
-      module ModuleProof
-        extend ::ModuleCluster::Define::InstanceCluster::Mock02
-        ancestors.include?( ::ModuleCluster::Define::InstanceCluster::Mock02::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::InstanceCluster::Mock02::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::InstanceCluster::Mock02::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::InstanceCluster::Mock02::Module2 ).should == false
-      end
-      class ClassProof
-        extend ::ModuleCluster::Define::InstanceCluster::Mock02
-        ancestors.include?( ::ModuleCluster::Define::InstanceCluster::Mock02::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::InstanceCluster::Mock02::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::InstanceCluster::Mock02::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::InstanceCluster::Mock02::Module2 ).should == false
-      end
-      Object.new.instance_eval do
-        extend ::ModuleCluster::Define::InstanceCluster::Mock02
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::InstanceCluster::Mock02::Module1 ).should == true
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::InstanceCluster::Mock02::Module2 ).should == true
-      end
-    end
-  end
-	
-end

data/spec/ModuleCluster/Define/ModuleCluster_spec.rb

@@ -1,728 +0,0 @@
-
-require_relative '../../../lib/module-cluster.rb'
-
-describe ::ModuleCluster::Define::ModuleCluster do
-
-  ####################################
-  #  self.should_include_or_extend?  #
-  ####################################
-
-  it 'should return true if module (not class), false otherwise' do
-    ::ModuleCluster::Define::ModuleCluster.should_include_or_extend?( Kernel ).should == true
-    ::ModuleCluster::Define::ModuleCluster.should_include_or_extend?( Class ).should == false
-    ::ModuleCluster::Define::ModuleCluster.should_include_or_extend?( Object.new ).should == false    
-  end
-
-  ##########################
-  #  self.should_cascade?  #
-  ##########################
-
-  it 'should report false' do
-    ::ModuleCluster::Define::ModuleCluster.should_cascade?( Kernel ).should == false
-    ::ModuleCluster::Define::ModuleCluster.should_cascade?( Class ).should == false
-    ::ModuleCluster::Define::ModuleCluster.should_cascade?( Object.new ).should == false
-  end
-  
-	##################################
-	#  module_include_also_includes  #
-	##################################
-
-  it 'can include other modules when this one is included in a module' do
-    module ::ModuleCluster::Define::ModuleCluster::Mock01
-      extend ::ModuleCluster::Define::ModuleCluster
-      module Module1
-      end
-      module Module2
-      end
-      module_include_also_includes( Module1, Module2 ).name = :some_name
-      respond_to?( :included ).should == true
-      module ModuleProof
-        include ::ModuleCluster::Define::ModuleCluster::Mock01
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock01::Module1 ).should == true
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock01::Module2 ).should == true
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock01::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock01::Module2 ).should == false
-      end
-      class ClassProof
-        include ::ModuleCluster::Define::ModuleCluster::Mock01
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock01::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock01::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock01::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock01::Module2 ).should == false
-      end
-    end
-  end
-	
-	#################################
-	#  module_include_also_extends  #
-	#################################
-	
-  it 'can extend other modules when this one is included in a module' do
-    module ::ModuleCluster::Define::ModuleCluster::Mock02
-      extend ::ModuleCluster::Define::ModuleCluster
-      module Module1
-      end
-      module Module2
-      end
-      module_include_also_extends( Module1, Module2 ).name = :some_name
-      respond_to?( :included ).should == true
-      module ModuleProof
-        include ::ModuleCluster::Define::ModuleCluster::Mock02
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock02::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock02::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock02::Module1 ).should == true
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock02::Module2 ).should == true
-      end
-      class ClassProof
-        include ::ModuleCluster::Define::ModuleCluster::Mock02
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock02::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock02::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock02::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock02::Module2 ).should == false
-      end
-    end    
-  end
-	
-	##############################################
-	#  module_include_also_includes_and_extends  #
-	##############################################
-
-  it 'can include and extend other modules when this one is included in a module' do
-    module ::ModuleCluster::Define::ModuleCluster::Mock03
-      extend ::ModuleCluster::Define::ModuleCluster
-      module Module1
-      end
-      module Module2
-      end
-      module_include_also_includes_and_extends( Module1, Module2 ).name = :some_name
-      respond_to?( :included ).should == true
-      module ModuleProof
-        include ::ModuleCluster::Define::ModuleCluster::Mock03
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock03::Module1 ).should == true
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock03::Module2 ).should == true
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock03::Module1 ).should == true
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock03::Module2 ).should == true
-      end
-      class ClassProof
-        include ::ModuleCluster::Define::ModuleCluster::Mock03
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock03::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock03::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock03::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock03::Module2 ).should == false
-      end
-    end
-  end
-
-	#################################
-	#  module_extend_also_includes  #
-	#################################
-
-  it 'can include other modules when this one extends a module' do
-    module ::ModuleCluster::Define::ModuleCluster::Mock04
-      extend ::ModuleCluster::Define::ModuleCluster
-      module Module1
-      end
-      module Module2
-      end
-      module_extend_also_includes( Module1, Module2 ).name = :some_name
-      respond_to?( :extended ).should == true
-      module ModuleProof
-        extend ::ModuleCluster::Define::ModuleCluster::Mock04
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock04::Module1 ).should == true
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock04::Module2 ).should == true
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock04::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock04::Module2 ).should == false
-      end
-      class ClassProof
-        extend ::ModuleCluster::Define::ModuleCluster::Mock04
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock04::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock04::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock04::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock04::Module2 ).should == false
-      end
-    end
-  end
-	
-	################################
-	#  module_extend_also_extends  #
-	################################
-	
-  it 'can extend other modules when this one extends a module' do
-    module ::ModuleCluster::Define::ModuleCluster::Mock05
-      extend ::ModuleCluster::Define::ModuleCluster
-      module Module1
-      end
-      module Module2
-      end
-      module_extend_also_extends( Module1, Module2 ).name = :some_name
-      respond_to?( :extended ).should == true
-      module ModuleProof
-        extend ::ModuleCluster::Define::ModuleCluster::Mock05
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock05::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock05::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock05::Module1 ).should == true
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock05::Module2 ).should == true
-      end
-      class ClassProof
-        extend ::ModuleCluster::Define::ModuleCluster::Mock05
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock05::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock05::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock05::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock05::Module2 ).should == false
-      end
-      Object.new.instance_eval do
-        extend ::ModuleCluster::Define::ModuleCluster::Mock05
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock05::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock05::Module2 ).should == false
-      end
-    end
-  end
-	
-	#############################################
-	#  module_extend_also_includes_and_extends  #
-	#############################################
-
-  it 'can include and extend other modules when this one extends a module' do
-    module ::ModuleCluster::Define::ModuleCluster::Mock06
-      extend ::ModuleCluster::Define::ModuleCluster
-      module Module1
-      end
-      module Module2
-      end
-      module_extend_also_includes_and_extends( Module1, Module2 ).name = :some_name
-      respond_to?( :extended ).should == true
-      module ModuleProof
-        extend ::ModuleCluster::Define::ModuleCluster::Mock06
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock06::Module1 ).should == true
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock06::Module2 ).should == true
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock06::Module1 ).should == true
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock06::Module2 ).should == true
-      end
-      class ClassProof
-        extend ::ModuleCluster::Define::ModuleCluster::Mock06
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock06::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock06::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock06::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock06::Module2 ).should == false
-      end
-      Object.new.instance_eval do
-        extend ::ModuleCluster::Define::ModuleCluster::Mock06
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock06::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock06::Module2 ).should == false
-      end
-    end
-  end
-
-	######################################
-	#  module_include_prepends_includes  #
-	######################################
-
-  it 'can include other modules before this one when this one is included in a module' do
-    module ::ModuleCluster::Define::ModuleCluster::Mock07
-      extend ::ModuleCluster::Define::ModuleCluster
-      module Module1
-      end
-      module Module2
-      end
-      module_include_prepends_includes( Module1, Module2 ).name = :some_name
-      respond_to?( :append_features ).should == true
-      module ModuleProof
-        include ::ModuleCluster::Define::ModuleCluster::Mock07
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock07::Module1 ).should == true
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock07::Module2 ).should == true
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock07::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock07::Module2 ).should == false
-      end
-      class ClassProof
-        include ::ModuleCluster::Define::ModuleCluster::Mock07
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock07::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock07::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock07::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock07::Module2 ).should == false
-      end
-    end
-  end
-
-	#####################################
-	#  module_include_prepends_extends  #
-	#####################################
-	
-  it 'can extend other modules before this one when this one is included in a module' do
-    module ::ModuleCluster::Define::ModuleCluster::Mock08
-      extend ::ModuleCluster::Define::ModuleCluster
-      module Module1
-      end
-      module Module2
-      end
-      module_include_prepends_extends( Module1, Module2 ).name = :some_name
-      respond_to?( :append_features ).should == true
-      module ModuleProof
-        include ::ModuleCluster::Define::ModuleCluster::Mock08
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock08::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock08::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock08::Module1 ).should == true
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock08::Module2 ).should == true
-      end
-      class ClassProof
-        include ::ModuleCluster::Define::ModuleCluster::Mock08
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock08::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock08::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock08::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock08::Module2 ).should == false
-      end
-    end
-  end
-	
-	##################################################
-	#  module_include_prepends_includes_and_extends  #
-	##################################################
-
-  it 'can include and extend other modules before this one when this one is included in a module' do
-    module ::ModuleCluster::Define::ModuleCluster::Mock09
-      extend ::ModuleCluster::Define::ModuleCluster
-      module Module1
-      end
-      module Module2
-      end
-      module_include_prepends_includes_and_extends( Module1, Module2 ).name = :some_name
-      respond_to?( :append_features ).should == true
-      module ModuleProof
-        include ::ModuleCluster::Define::ModuleCluster::Mock09
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock09::Module1 ).should == true
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock09::Module2 ).should == true
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock09::Module1 ).should == true
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock09::Module2 ).should == true
-      end
-      class ClassProof
-        include ::ModuleCluster::Define::ModuleCluster::Mock09
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock09::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock09::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock09::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock09::Module2 ).should == false
-      end
-    end    
-  end
-
-	#####################################
-	#  module_extend_prepends_includes  #
-	#####################################
-
-  it 'can include other modules before this one when this one extends a module' do
-    module ::ModuleCluster::Define::ModuleCluster::Mock10
-      extend ::ModuleCluster::Define::ModuleCluster
-      module Module1
-      end
-      module Module2
-      end
-      module_extend_prepends_includes( Module1, Module2 ).name = :some_name
-      respond_to?( :extend_object ).should == true
-      module ModuleProof
-        extend ::ModuleCluster::Define::ModuleCluster::Mock10
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock10::Module1 ).should == true
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock10::Module2 ).should == true
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock10::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock10::Module2 ).should == false
-      end
-      class ClassProof
-        extend ::ModuleCluster::Define::ModuleCluster::Mock10
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock10::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock10::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock10::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock10::Module2 ).should == false
-      end
-    end
-  end
-
-	####################################
-	#  module_extend_prepends_extends  #
-	####################################
-	
-  it 'can extend other modules before this one when this one extends a module' do
-    module ::ModuleCluster::Define::ModuleCluster::Mock11
-      extend ::ModuleCluster::Define::ModuleCluster
-      module Module1
-      end
-      module Module2
-      end
-      module_extend_prepends_extends( Module1, Module2 ).name = :some_name
-      respond_to?( :extend_object ).should == true
-      module ModuleProof
-        extend ::ModuleCluster::Define::ModuleCluster::Mock11
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock11::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock11::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock11::Module1 ).should == true
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock11::Module2 ).should == true
-      end
-      class ClassProof
-        extend ::ModuleCluster::Define::ModuleCluster::Mock11
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock11::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock11::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock11::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock11::Module2 ).should == false
-      end
-      Object.new.instance_eval do
-        extend ::ModuleCluster::Define::ModuleCluster::Mock11
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock11::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock11::Module2 ).should == false
-      end
-    end
-  end
-	
-	#################################################
-	#  module_extend_prepends_includes_and_extends  #
-	#################################################
-
-  it 'can include and extend other modules before this one when this one extends a module' do
-    module ::ModuleCluster::Define::ModuleCluster::Mock12
-      extend ::ModuleCluster::Define::ModuleCluster
-      module Module1
-      end
-      module Module2
-      end
-      module_extend_prepends_includes_and_extends( Module1, Module2 ).name = :some_name
-      respond_to?( :extend_object ).should == true
-      module ModuleProof
-        extend ::ModuleCluster::Define::ModuleCluster::Mock12
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock12::Module1 ).should == true
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock12::Module2 ).should == true
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock12::Module1 ).should == true
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock12::Module2 ).should == true
-      end
-      class ClassProof
-        extend ::ModuleCluster::Define::ModuleCluster::Mock12
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock12::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock12::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock12::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock12::Module2 ).should == false
-      end
-      Object.new.instance_eval do
-        extend ::ModuleCluster::Define::ModuleCluster::Mock12
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock12::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock12::Module2 ).should == false
-      end
-    end
-  end
-	
-	############################################
-	#  module_include_or_extend_also_includes  #
-	############################################
-
-  it 'can include other modules when this one is included in or extends a module' do
-    module ::ModuleCluster::Define::ModuleCluster::Mock13
-      extend ::ModuleCluster::Define::ModuleCluster
-      module Module1
-      end
-      module Module2
-      end
-      module_include_or_extend_also_includes( Module1, Module2 ).name = :some_name
-      respond_to?( :append_features ).should == true
-      module ModuleProof
-        include ::ModuleCluster::Define::ModuleCluster::Mock13
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock13::Module1 ).should == true
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock13::Module2 ).should == true
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock13::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock13::Module2 ).should == false
-      end
-      module ModuleProof2
-        extend ::ModuleCluster::Define::ModuleCluster::Mock13
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock13::Module1 ).should == true
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock13::Module2 ).should == true
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock13::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock13::Module2 ).should == false
-      end
-      class ClassProof
-        include ::ModuleCluster::Define::ModuleCluster::Mock13
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock13::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock13::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock13::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock13::Module2 ).should == false
-      end
-      class ClassProof2
-        include ::ModuleCluster::Define::ModuleCluster::Mock13
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock13::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock13::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock13::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock13::Module2 ).should == false
-      end
-    end
-  end
-
-	###########################################
-	#  module_include_or_extend_also_extends  #
-	###########################################
-
-  it 'can extend other modules when this one is included in or extends a module' do
-    module ::ModuleCluster::Define::ModuleCluster::Mock14
-      extend ::ModuleCluster::Define::ModuleCluster
-      module Module1
-      end
-      module Module2
-      end
-      module_include_or_extend_also_extends( Module1, Module2 ).name = :some_name
-      respond_to?( :included ).should == true
-      module ModuleProof
-        include ::ModuleCluster::Define::ModuleCluster::Mock14
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock14::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock14::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock14::Module1 ).should == true
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock14::Module2 ).should == true
-      end
-      module ModuleProof2
-        extend ::ModuleCluster::Define::ModuleCluster::Mock14
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock14::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock14::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock14::Module1 ).should == true
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock14::Module2 ).should == true
-      end
-      class ClassProof
-        include ::ModuleCluster::Define::ModuleCluster::Mock14
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock14::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock14::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock14::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock14::Module2 ).should == false
-      end
-      class ClassProof2
-        extend ::ModuleCluster::Define::ModuleCluster::Mock14
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock14::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock14::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock14::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock14::Module2 ).should == false
-      end
-    end
-  end
-
-	########################################################
-	#  module_include_or_extend_also_includes_and_extends  #
-	########################################################
-
-  it 'can include and extend other modules when this one is included in or extends a module' do
-    module ::ModuleCluster::Define::ModuleCluster::Mock15
-      extend ::ModuleCluster::Define::ModuleCluster
-      module Module1
-      end
-      module Module2
-      end
-      module_include_or_extend_also_includes_and_extends( Module1, Module2 ).name = :some_name
-      respond_to?( :included ).should == true
-      module ModuleProof
-        include ::ModuleCluster::Define::ModuleCluster::Mock15
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock15::Module1 ).should == true
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock15::Module2 ).should == true
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock15::Module1 ).should == true
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock15::Module2 ).should == true
-      end
-      module ModuleProo2
-        extend ::ModuleCluster::Define::ModuleCluster::Mock15
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock15::Module1 ).should == true
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock15::Module2 ).should == true
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock15::Module1 ).should == true
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock15::Module2 ).should == true
-      end
-      class ClassProof
-        include ::ModuleCluster::Define::ModuleCluster::Mock15
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock15::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock15::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock15::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock15::Module2 ).should == false
-      end
-      class ClassProof2
-        extend ::ModuleCluster::Define::ModuleCluster::Mock15
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock15::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock15::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock15::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock15::Module2 ).should == false
-      end
-    end
-  end
-
-	################################################
-	#  module_include_or_extend_prepends_includes  #
-	################################################
-
-  it 'can include other modules before this one when this one is included in or extends a module' do
-    module ::ModuleCluster::Define::ModuleCluster::Mock16
-      extend ::ModuleCluster::Define::ModuleCluster
-      module Module1
-      end
-      module Module2
-      end
-      module_include_or_extend_prepends_includes( Module1, Module2 ).name = :some_name
-      respond_to?( :append_features ).should == true
-      module ModuleProof
-        include ::ModuleCluster::Define::ModuleCluster::Mock16
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock16::Module1 ).should == true
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock16::Module2 ).should == true
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock16::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock16::Module2 ).should == false
-      end
-      module ModuleProof2
-        extend ::ModuleCluster::Define::ModuleCluster::Mock16
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock16::Module1 ).should == true
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock16::Module2 ).should == true
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock16::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock16::Module2 ).should == false
-      end
-      class ClassProof
-        include ::ModuleCluster::Define::ModuleCluster::Mock16
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock16::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock16::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock16::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock16::Module2 ).should == false
-      end
-      class ClassProof2
-        extend ::ModuleCluster::Define::ModuleCluster::Mock16
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock16::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock16::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock16::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock16::Module2 ).should == false
-      end
-    end
-  end
-
-	###############################################
-	#  module_include_or_extend_prepends_extends  #
-	###############################################
-
-  it 'can extend other modules before this one when this one is included in or extends a module' do
-    module ::ModuleCluster::Define::ModuleCluster::Mock17
-      extend ::ModuleCluster::Define::ModuleCluster
-      module Module1
-      end
-      module Module2
-      end
-      module_include_or_extend_prepends_extends( Module1, Module2 ).name = :some_name
-      respond_to?( :extend_object ).should == true
-      module ModuleProof
-        include ::ModuleCluster::Define::ModuleCluster::Mock17
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock17::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock17::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock17::Module1 ).should == true
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock17::Module2 ).should == true
-      end
-      module ModuleProof2
-        extend ::ModuleCluster::Define::ModuleCluster::Mock17
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock17::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock17::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock17::Module1 ).should == true
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock17::Module2 ).should == true
-      end
-      class ClassProof
-        include ::ModuleCluster::Define::ModuleCluster::Mock17
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock17::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock17::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock17::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock17::Module2 ).should == false
-      end
-      class ClassProof2
-        extend ::ModuleCluster::Define::ModuleCluster::Mock17
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock17::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock17::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock17::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock17::Module2 ).should == false
-      end
-      Object.new.instance_eval do
-        extend ::ModuleCluster::Define::ModuleCluster::Mock17
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock17::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock17::Module2 ).should == false
-      end
-    end
-  end
-
-	############################################################
-	#  module_include_or_extend_prepends_includes_and_extends  #
-	############################################################
-
-  it 'can include and extend other modules before this one when this one is included in or extends a module' do
-    module ::ModuleCluster::Define::ModuleCluster::Mock18
-      extend ::ModuleCluster::Define::ModuleCluster
-      module Module1
-      end
-      module Module2
-      end
-      module_include_or_extend_prepends_includes_and_extends( Module1, Module2 ).name = :some_name
-      respond_to?( :append_features ).should == true
-      module ModuleProof
-        include ::ModuleCluster::Define::ModuleCluster::Mock18
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock18::Module1 ).should == true
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock18::Module2 ).should == true
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock18::Module1 ).should == true
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock18::Module2 ).should == true
-      end
-      module ModuleProof2
-        extend ::ModuleCluster::Define::ModuleCluster::Mock18
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock18::Module1 ).should == true
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock18::Module2 ).should == true
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock18::Module1 ).should == true
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock18::Module2 ).should == true
-      end
-      class ClassProof
-        include ::ModuleCluster::Define::ModuleCluster::Mock18
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock18::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock18::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock18::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock18::Module2 ).should == false
-      end
-      class ClassProof2
-        extend ::ModuleCluster::Define::ModuleCluster::Mock18
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock18::Module1 ).should == false
-        ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock18::Module2 ).should == false
-        eigenclass = class << self ; self ; end
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock18::Module1 ).should == false
-        eigenclass.ancestors.include?( ::ModuleCluster::Define::ModuleCluster::Mock18::Module2 ).should == false
-      end
-    end    
-  end
-
-end