1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
|
require 'spec_helper'
describe Immutable::Set do
[:subset?, :<=].each do |method|
describe "##{method}" do
[
[[], [], true],
[['A'], [], false],
[[], ['A'], true],
[['A'], ['A'], true],
[%w[A B C], ['B'], false],
[['B'], %w[A B C], true],
[%w[A B C], %w[A C], false],
[%w[A C], %w[A B C], true],
[%w[A B C], %w[A B C], true],
[%w[A B C], %w[A B C D], true],
[%w[A B C D], %w[A B C], false],
].each do |a, b, expected|
describe "for #{a.inspect} and #{b.inspect}" do
it "returns #{expected}" do
S[*a].send(method, S[*b]).should == expected
end
end
end
end
end
[:proper_subset?, :<].each do |method|
describe "##{method}" do
[
[[], [], false],
[['A'], [], false],
[[], ['A'], true],
[['A'], ['A'], false],
[%w[A B C], ['B'], false],
[['B'], %w[A B C], true],
[%w[A B C], %w[A C], false],
[%w[A C], %w[A B C], true],
[%w[A B C], %w[A B C], false],
[%w[A B C], %w[A B C D], true],
[%w[A B C D], %w[A B C], false],
].each do |a, b, expected|
describe "for #{a.inspect} and #{b.inspect}" do
it "returns #{expected}" do
S[*a].send(method, S[*b]).should == expected
end
end
end
end
end
end
|
