module-cluster 1.3.1 → 1.3.2

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
Files changed (28) hide show
  1. data/lib/module-cluster.rb +17 -13
  2. data/lib/module-cluster/ModuleCluster.rb +8 -8
  3. data/lib/module-cluster/ModuleCluster/CascadeFeatures.rb +155 -0
  4. data/lib/module-cluster/ModuleCluster/ClusterStack.rb +102 -0
  5. data/lib/module-cluster/ModuleCluster/Define/Cluster.rb +203 -0
  6. data/lib/module-cluster/ModuleCluster/Define/ClusterCascades.rb +220 -0
  7. data/lib/module-cluster/ModuleCluster/Define/ClusterCascadesToClass.rb +209 -0
  8. data/lib/module-cluster/ModuleCluster/Define/ClusterCascadesToModule.rb +209 -0
  9. data/lib/module-cluster/ModuleCluster/Define/ClusterStack.rb +26 -0
  10. data/lib/module-cluster/ModuleCluster/Define/DedoubleAncestors.rb +22 -0
  11. data/lib/module-cluster/ModuleCluster/ExtendForCascade.rb +15 -0
  12. data/spec/ModuleCluster/Define/ClusterCascadesToClass_spec.rb +421 -0
  13. data/spec/ModuleCluster/Define/ClusterCascadesToModule_spec.rb +432 -0
  14. data/spec/ModuleCluster/Define/ClusterCascades_spec.rb +345 -0
  15. data/spec/ModuleCluster/Define/Cluster_spec.rb +275 -0
  16. data/spec/ModuleCluster_spec.rb +4 -4
  17. metadata +16 -14
  18. data/lib/module-cluster/ModuleCluster/Define/ModuleCluster.rb +0 -211
  19. data/lib/module-cluster/ModuleCluster/Define/ModuleClusterCascades.rb +0 -223
  20. data/lib/module-cluster/ModuleCluster/Define/ModuleClusterCascadesToClass.rb +0 -223
  21. data/lib/module-cluster/ModuleCluster/Define/ModuleClusterCascadesToModule.rb +0 -227
  22. data/lib/module-cluster/ModuleCluster/Define/_private_/AnonymousModule.rb +0 -121
  23. data/lib/module-cluster/ModuleCluster/Define/_private_/ClusterStack.rb +0 -55
  24. data/spec/ModuleCluster/Define/ModuleClusterCascadesToClass_spec.rb +0 -421
  25. data/spec/ModuleCluster/Define/ModuleClusterCascadesToModule_spec.rb +0 -432
  26. data/spec/ModuleCluster/Define/ModuleClusterCascades_spec.rb +0 -345
  27. data/spec/ModuleCluster/Define/ModuleCluster_spec.rb +0 -275
  28. data/spec/ModuleCluster/Define/_private_/ClusterStack_spec.rb +0 -24
data/lib/module-cluster/ModuleCluster/Define/_private_/AnonymousModule.rb DELETED
@@ -1,121 +0,0 @@
1
-
2
- module ModuleCluster::Define::AnonymousModule
3
-
4
- ###########################################################################################################
5
- private ###############################################################################################
6
- ###########################################################################################################
7
-
8
- include ModuleCluster::Define::ClusterStack
9
-
10
- ##########################################
11
- # anonymous_module_for_append_features #
12
- ##########################################
13
-
14
- def anonymous_module_for_append_features( subset_string = '', & method_block )
15
-
16
- module_instance = Module.new do
17
-
18
- #-------------------#
19
- # append_features #
20
- #-------------------#
21
-
22
- define_method( :append_features ) do |class_or_module|
23
- class_or_module.module_eval( & method_block )
24
- super( class_or_module )
25
- end
26
-
27
- end
28
-
29
- set_anonymous_module_constant( 'AppendFeatures' + subset_string, module_instance )
30
-
31
- return module_instance
32
-
33
- end
34
-
35
- ###################################
36
- # anonymous_module_for_included #
37
- ###################################
38
-
39
- def anonymous_module_for_included( subset_string = '', & method_block )
40
-
41
- module_instance = Module.new do
42
-
43
- #------------#
44
- # included #
45
- #------------#
46
-
47
- define_method( :included ) do |class_or_module|
48
- super( class_or_module )
49
- class_or_module.module_eval( & method_block )
50
- end
51
-
52
- end
53
-
54
- set_anonymous_module_constant( 'Included' + subset_string, module_instance )
55
-
56
- return module_instance
57
-
58
- end
59
-
60
- ########################################
61
- # anonymous_module_for_extend_object #
62
- ########################################
63
-
64
- def anonymous_module_for_extend_object( subset_string = '', & method_block )
65
-
66
- module_instance = Module.new do
67
-
68
- #-----------------#
69
- # extend_object #
70
- #-----------------#
71
-
72
- define_method( :extend_object ) do |class_or_module|
73
- class_or_module.module_eval( & method_block )
74
- super( class_or_module )
75
- end
76
-
77
- end
78
-
79
- set_anonymous_module_constant( 'ExtendObject' + subset_string, module_instance )
80
-
81
- return module_instance
82
-
83
- end
84
-
85
- ###################################
86
- # anonymous_module_for_extended #
87
- ###################################
88
-
89
- def anonymous_module_for_extended( subset_string = '', & method_block )
90
-
91
- module_instance = Module.new do
92
-
93
- #------------#
94
- # extended #
95
- #------------#
96
-
97
- define_method( :extended ) do |class_or_module|
98
- super( class_or_module )
99
- class_or_module.module_eval( & method_block )
100
- end
101
-
102
- end
103
-
104
- set_anonymous_module_constant( 'Included' + subset_string, module_instance )
105
-
106
- return module_instance
107
-
108
- end
109
-
110
- ###################################
111
- # set_anonymous_module_constant #
112
- ###################################
113
-
114
- def set_anonymous_module_constant( base_name, module_instance )
115
-
116
- module_constant_name = ( base_name << clusterstack_module.increment_stack_count.to_s ).to_sym
117
- const_set( module_constant_name, module_instance )
118
-
119
- end
120
-
121
- end
data/lib/module-cluster/ModuleCluster/Define/_private_/ClusterStack.rb DELETED
@@ -1,55 +0,0 @@
1
-
2
- module ModuleCluster::Define::ClusterStack
3
-
4
- ###########################################################################################################
5
- private ###############################################################################################
6
- ###########################################################################################################
7
-
8
- ################
9
- # eigenclass #
10
- ################
11
-
12
- def eigenclass
13
- return class << self ; self ; end
14
- end
15
-
16
- #########################
17
- # clusterstack_module #
18
- #########################
19
-
20
- def clusterstack_module( & clusterstack_extend_include_block )
21
-
22
- module_instance = nil
23
-
24
- unless const_defined?( :ClusterStackModule ) and module_instance = const_get( :ClusterStackModule )
25
-
26
- module_instance = Module.new do
27
-
28
- #-------------------------#
29
- # increment_stack_count #
30
- #-------------------------#
31
-
32
- def self.increment_stack_count
33
- @stack_count ||= 0
34
- @stack_count += 1
35
- return @stack_count
36
- end
37
-
38
- end
39
-
40
- const_set( :ClusterStackModule, module_instance )
41
-
42
- end
43
-
44
- # we use a block so that we don't have to worry about manually re-extending each time
45
- if block_given?
46
- module_instance.module_eval( & clusterstack_extend_include_block )
47
- # we have to re-extend each time so that new includes/extends apply to self
48
- extend( module_instance )
49
- end
50
-
51
- return module_instance
52
-
53
- end
54
-
55
- end
data/spec/ModuleCluster/Define/ModuleClusterCascadesToClass_spec.rb DELETED
@@ -1,421 +0,0 @@
1
-
2
- require_relative '../../../lib/module-cluster.rb'
3
-
4
- describe ModuleCluster::Define::ModuleClusterCascadesToClass do
5
-
6
- ########################################
7
- # include_cascades_includes_to_class #
8
- ########################################
9
-
10
- it 'include modules for any class this module or any including modules are included in' do
11
- module ModuleCluster::Define::ModuleClusterCascadesToClass::Mock01
12
- extend ModuleCluster::Define::ModuleClusterCascadesToClass
13
- module Module1
14
- end
15
- module Module2
16
- end
17
- include_cascades_includes_to_class( Module1, Module2 )
18
- respond_to?( :included ).should == true
19
- module Proof1
20
- include ModuleCluster::Define::ModuleClusterCascadesToClass::Mock01
21
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock01::Module1 ).should == false
22
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock01::Module2 ).should == false
23
- end
24
- module Proof2
25
- include ModuleCluster::Define::ModuleClusterCascadesToClass::Mock01::Proof1
26
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock01::Module1 ).should == false
27
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock01::Module2 ).should == false
28
- end
29
- class Proof3
30
- include ModuleCluster::Define::ModuleClusterCascadesToClass::Mock01::Proof2
31
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock01::Module1 ).should == true
32
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock01::Module2 ).should == true
33
- end
34
- end
35
- end
36
-
37
- #######################################
38
- # include_cascades_extends_to_class #
39
- #######################################
40
-
41
- it 'extends modules for any class this module or any including modules are included in' do
42
- module ModuleCluster::Define::ModuleClusterCascadesToClass::Mock02
43
- extend ModuleCluster::Define::ModuleClusterCascadesToClass
44
- module Module1
45
- end
46
- module Module2
47
- end
48
- include_cascades_extends_to_class( Module1, Module2 )
49
- respond_to?( :included ).should == true
50
- module Proof1
51
- include ModuleCluster::Define::ModuleClusterCascadesToClass::Mock02
52
- eigenclass = class << self ; self ; end
53
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock02::Module1 ).should == false
54
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock02::Module2 ).should == false
55
- end
56
- module Proof2
57
- include ModuleCluster::Define::ModuleClusterCascadesToClass::Mock02::Proof1
58
- eigenclass = class << self ; self ; end
59
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock02::Module1 ).should == false
60
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock02::Module2 ).should == false
61
- end
62
- class Proof3
63
- include ModuleCluster::Define::ModuleClusterCascadesToClass::Mock02::Proof2
64
- eigenclass = class << self ; self ; end
65
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock02::Module1 ).should == true
66
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock02::Module2 ).should == true
67
- end
68
- end
69
- end
70
-
71
- ####################################################
72
- # include_cascades_includes_and_extends_to_class #
73
- ####################################################
74
-
75
- it 'include and extends modules for any class this module or any including modules are included in' do
76
- module ModuleCluster::Define::ModuleClusterCascadesToClass::Mock03
77
- extend ModuleCluster::Define::ModuleClusterCascadesToClass
78
- module Module1
79
- end
80
- module Module2
81
- end
82
- include_cascades_includes_and_extends_to_class( Module1, Module2 )
83
- respond_to?( :included ).should == true
84
- module Proof1
85
- include ModuleCluster::Define::ModuleClusterCascadesToClass::Mock03
86
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock03::Module1 ).should == false
87
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock03::Module2 ).should == false
88
- eigenclass = class << self ; self ; end
89
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock03::Module1 ).should == false
90
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock03::Module2 ).should == false
91
- end
92
- module Proof2
93
- include ModuleCluster::Define::ModuleClusterCascadesToClass::Mock03::Proof1
94
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock03::Module1 ).should == false
95
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock03::Module2 ).should == false
96
- eigenclass = class << self ; self ; end
97
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock03::Module1 ).should == false
98
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock03::Module2 ).should == false
99
- end
100
- class Proof3
101
- include ModuleCluster::Define::ModuleClusterCascadesToClass::Mock03::Proof2
102
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock03::Module1 ).should == true
103
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock03::Module2 ).should == true
104
- eigenclass = class << self ; self ; end
105
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock03::Module1 ).should == true
106
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock03::Module2 ).should == true
107
- end
108
- end
109
- end
110
-
111
- #######################################
112
- # extend_cascades_includes_to_class #
113
- #######################################
114
-
115
- it 'include modules for any class this module is extended in' do
116
- module ModuleCluster::Define::ModuleClusterCascadesToClass::Mock04
117
- extend ModuleCluster::Define::ModuleClusterCascadesToClass
118
- module Module1
119
- end
120
- module Module2
121
- end
122
- extend_cascades_includes_to_class( Module1, Module2 )
123
- respond_to?( :extended ).should == true
124
- module Proof1
125
- extend ModuleCluster::Define::ModuleClusterCascadesToClass::Mock04
126
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock04::Module1 ).should == false
127
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock04::Module2 ).should == false
128
- end
129
- module Proof2
130
- extend ModuleCluster::Define::ModuleClusterCascadesToClass::Mock04::Proof1
131
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock04::Module1 ).should == false
132
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock04::Module2 ).should == false
133
- end
134
- class Proof3
135
- extend ModuleCluster::Define::ModuleClusterCascadesToClass::Mock04::Proof2
136
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock04::Module1 ).should == true
137
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock04::Module2 ).should == true
138
- end
139
- end
140
- end
141
-
142
- ######################################
143
- # extend_cascades_extends_to_class #
144
- ######################################
145
-
146
- it 'extend modules for any class this module is extended in' do
147
- module ModuleCluster::Define::ModuleClusterCascadesToClass::Mock05
148
- extend ModuleCluster::Define::ModuleClusterCascadesToClass
149
- module Module1
150
- end
151
- module Module2
152
- end
153
- extend_cascades_extends_to_class( Module1, Module2 )
154
- respond_to?( :extended ).should == true
155
- module Proof1
156
- extend ModuleCluster::Define::ModuleClusterCascadesToClass::Mock05
157
- eigenclass = class << self ; self ; end
158
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock05::Module1 ).should == false
159
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock05::Module2 ).should == false
160
- end
161
- module Proof2
162
- extend ModuleCluster::Define::ModuleClusterCascadesToClass::Mock05::Proof1
163
- eigenclass = class << self ; self ; end
164
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock05::Module1 ).should == false
165
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock05::Module2 ).should == false
166
- end
167
- class Proof3
168
- extend ModuleCluster::Define::ModuleClusterCascadesToClass::Mock05::Proof2
169
- eigenclass = class << self ; self ; end
170
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock05::Module1 ).should == true
171
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock05::Module2 ).should == true
172
- end
173
- end
174
- end
175
-
176
- ###################################################
177
- # extend_cascades_includes_and_extends_to_class #
178
- ###################################################
179
-
180
- it 'include and extend modules for any class this module is extended in' do
181
- module ModuleCluster::Define::ModuleClusterCascadesToClass::Mock06
182
- extend ModuleCluster::Define::ModuleClusterCascadesToClass
183
- module Module1
184
- end
185
- module Module2
186
- end
187
- extend_cascades_includes_and_extends_to_class( Module1, Module2 )
188
- respond_to?( :extended ).should == true
189
- module Proof1
190
- extend ModuleCluster::Define::ModuleClusterCascadesToClass::Mock06
191
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock06::Module1 ).should == false
192
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock06::Module2 ).should == false
193
- eigenclass = class << self ; self ; end
194
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock06::Module1 ).should == false
195
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock06::Module2 ).should == false
196
- end
197
- module Proof2
198
- extend ModuleCluster::Define::ModuleClusterCascadesToClass::Mock06::Proof1
199
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock06::Module1 ).should == false
200
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock06::Module2 ).should == false
201
- eigenclass = class << self ; self ; end
202
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock06::Module1 ).should == false
203
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock06::Module2 ).should == false
204
- end
205
- class Proof3
206
- extend ModuleCluster::Define::ModuleClusterCascadesToClass::Mock06::Proof2
207
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock06::Module1 ).should == true
208
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock06::Module2 ).should == true
209
- eigenclass = class << self ; self ; end
210
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock06::Module1 ).should == true
211
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock06::Module2 ).should == true
212
- end
213
- end
214
- end
215
-
216
- ###################################################
217
- # include_cascades_to_class_prepending_includes #
218
- ###################################################
219
-
220
- it 'include other modules for any class this module or any including modules are included in, before this module or including module is included' do
221
- module ModuleCluster::Define::ModuleClusterCascadesToClass::Mock07
222
- extend ModuleCluster::Define::ModuleClusterCascadesToClass
223
- module Module1
224
- end
225
- module Module2
226
- end
227
- include_cascades_to_class_prepending_includes( Module1, Module2 )
228
- respond_to?( :append_features ).should == true
229
- module Proof1
230
- include ModuleCluster::Define::ModuleClusterCascadesToClass::Mock07
231
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock07::Module1 ).should == false
232
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock07::Module2 ).should == false
233
- end
234
- module Proof2
235
- include ModuleCluster::Define::ModuleClusterCascadesToClass::Mock07::Proof1
236
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock07::Module1 ).should == false
237
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock07::Module2 ).should == false
238
- end
239
- class Proof3
240
- include ModuleCluster::Define::ModuleClusterCascadesToClass::Mock07::Proof2
241
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock07::Module1 ).should == true
242
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock07::Module2 ).should == true
243
- end
244
- end
245
- end
246
-
247
- ##################################################
248
- # include_cascades_to_class_prepending_extends #
249
- ##################################################
250
-
251
- it 'extend other modules for any class this module or any including modules are included in, before this module or including module is included' do
252
- module ModuleCluster::Define::ModuleClusterCascadesToClass::Mock08
253
- extend ModuleCluster::Define::ModuleClusterCascadesToClass
254
- module Module1
255
- end
256
- module Module2
257
- end
258
- include_cascades_to_class_prepending_extends( Module1, Module2 )
259
- respond_to?( :append_features ).should == true
260
- module Proof1
261
- include ModuleCluster::Define::ModuleClusterCascadesToClass::Mock08
262
- eigenclass = class << self ; self ; end
263
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock08::Module1 ).should == false
264
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock08::Module2 ).should == false
265
- end
266
- module Proof2
267
- include ModuleCluster::Define::ModuleClusterCascadesToClass::Mock08::Proof1
268
- eigenclass = class << self ; self ; end
269
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock08::Module1 ).should == false
270
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock08::Module2 ).should == false
271
- end
272
- class Proof3
273
- include ModuleCluster::Define::ModuleClusterCascadesToClass::Mock08::Proof2
274
- eigenclass = class << self ; self ; end
275
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock08::Module1 ).should == true
276
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock08::Module2 ).should == true
277
- end
278
- end
279
- end
280
-
281
- ###############################################################
282
- # include_cascades_to_class_prepending_includes_and_extends #
283
- ###############################################################
284
-
285
- it 'include and extend other modules for any class this module or any including modules are included in, before this module or including module is included' do
286
- module ModuleCluster::Define::ModuleClusterCascadesToClass::Mock09
287
- extend ModuleCluster::Define::ModuleClusterCascadesToClass
288
- module Module1
289
- end
290
- module Module2
291
- end
292
- include_cascades_to_class_prepending_includes_and_extends( Module1, Module2 )
293
- respond_to?( :append_features ).should == true
294
- module Proof1
295
- include ModuleCluster::Define::ModuleClusterCascadesToClass::Mock09
296
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock09::Module1 ).should == false
297
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock09::Module2 ).should == false
298
- eigenclass = class << self ; self ; end
299
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock09::Module1 ).should == false
300
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock09::Module2 ).should == false
301
- end
302
- module Proof2
303
- include ModuleCluster::Define::ModuleClusterCascadesToClass::Mock09::Proof1
304
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock09::Module1 ).should == false
305
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock09::Module2 ).should == false
306
- eigenclass = class << self ; self ; end
307
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock09::Module1 ).should == false
308
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock09::Module2 ).should == false
309
- end
310
- class Proof3
311
- include ModuleCluster::Define::ModuleClusterCascadesToClass::Mock09::Proof2
312
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock09::Module1 ).should == true
313
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock09::Module2 ).should == true
314
- eigenclass = class << self ; self ; end
315
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock09::Module1 ).should == true
316
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock09::Module2 ).should == true
317
- end
318
- end
319
- end
320
-
321
- ##################################################
322
- # extend_cascades_to_class_prepending_includes #
323
- ##################################################
324
-
325
- it 'include other modules for any class this module or any including modules are included in, before this module is extended' do
326
- module ModuleCluster::Define::ModuleClusterCascadesToClass::Mock10
327
- extend ModuleCluster::Define::ModuleClusterCascadesToClass
328
- module Module1
329
- end
330
- module Module2
331
- end
332
- extend_cascades_to_class_prepending_includes( Module1, Module2 )
333
- respond_to?( :extend_object ).should == true
334
- module Proof1
335
- extend ModuleCluster::Define::ModuleClusterCascadesToClass::Mock10
336
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock10::Module1 ).should == false
337
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock10::Module2 ).should == false
338
- end
339
- module Proof2
340
- extend ModuleCluster::Define::ModuleClusterCascadesToClass::Mock10::Proof1
341
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock10::Module1 ).should == false
342
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock10::Module2 ).should == false
343
- end
344
- class Proof3
345
- extend ModuleCluster::Define::ModuleClusterCascadesToClass::Mock10::Proof2
346
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock10::Module1 ).should == true
347
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock10::Module2 ).should == true
348
- end
349
- end
350
- end
351
-
352
- #################################################
353
- # extend_cascades_to_class_prepending_extends #
354
- #################################################
355
-
356
- it 'extend other modules for any class this module or any including modules are included in, before this module is extended' do
357
- module ModuleCluster::Define::ModuleClusterCascadesToClass::Mock11
358
- extend ModuleCluster::Define::ModuleClusterCascadesToClass
359
- module Module1
360
- end
361
- module Module2
362
- end
363
- extend_cascades_to_class_prepending_extends( Module1, Module2 )
364
- respond_to?( :extend_object ).should == true
365
- module Proof1
366
- extend ModuleCluster::Define::ModuleClusterCascadesToClass::Mock11
367
- eigenclass = class << self ; self ; end
368
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock11::Module1 ).should == false
369
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock11::Module2 ).should == false
370
- end
371
- module Proof2
372
- extend ModuleCluster::Define::ModuleClusterCascadesToClass::Mock11::Proof1
373
- eigenclass = class << self ; self ; end
374
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock11::Module1 ).should == false
375
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock11::Module2 ).should == false
376
- end
377
- class Proof3
378
- extend ModuleCluster::Define::ModuleClusterCascadesToClass::Mock11::Proof2
379
- eigenclass = class << self ; self ; end
380
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock11::Module1 ).should == true
381
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock11::Module2 ).should == true
382
- end
383
- end
384
- end
385
-
386
- ##############################################################
387
- # extend_cascades_to_class_prepending_includes_and_extends #
388
- ##############################################################
389
-
390
- it 'include and extend other modules for any class this module or any including modules are included in, before this module is extended' do
391
- module ModuleCluster::Define::ModuleClusterCascadesToClass::Mock12
392
- extend ModuleCluster::Define::ModuleClusterCascadesToClass
393
- module Module1
394
- end
395
- module Module2
396
- end
397
- extend_cascades_to_class_prepending_includes_and_extends( Module1, Module2 )
398
- respond_to?( :extend_object ).should == true
399
- module Proof1
400
- extend ModuleCluster::Define::ModuleClusterCascadesToClass::Mock12
401
- end
402
- module Proof2
403
- extend ModuleCluster::Define::ModuleClusterCascadesToClass::Mock12::Proof1
404
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock12::Module1 ).should == false
405
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock12::Module2 ).should == false
406
- eigenclass = class << self ; self ; end
407
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock12::Module1 ).should == false
408
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock12::Module2 ).should == false
409
- end
410
- class Proof3
411
- extend ModuleCluster::Define::ModuleClusterCascadesToClass::Mock12::Proof2
412
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock12::Module1 ).should == true
413
- ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock12::Module2 ).should == true
414
- eigenclass = class << self ; self ; end
415
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock12::Module1 ).should == true
416
- eigenclass.ancestors.include?( ModuleCluster::Define::ModuleClusterCascadesToClass::Mock12::Module2 ).should == true
417
- end
418
- end
419
- end
420
-
421
- end