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
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
|
require File.expand_path('../../../spec_helper', __FILE__)
require File.expand_path('../fixtures/classes', __FILE__)
module Specs
module Kernel
class HasNone
end
class HasOpEqual
def ==(other)
other.kind_of? HasOpEqual
end
end
class HasEqual
def equal?(other)
false
end
end
class HasOppoOpEqual
def ==(other)
false
end
def equal?(other)
false
end
end
class RandomID
def ==(other)
true
end
def equal?(other)
true
end
def object_id()
@ids ||= []
loop {
candidate = rand
next if @ids.include? candidate
@ids << candidate
return candidate
}
end
end
end
end
describe "Kernel#=== for a class with default #== and #equal?" do
before :each do
@o1 = Specs::Kernel::HasNone.new
@o2 = @o1.dup
end
it "returns true if other object has same object id" do
@o1.object_id.should == @o1.object_id
(@o1 === @o1).should == true
end
it "returns false if other object does not have same object id" do
@o1.object_id.should_not == @o2.object_id
(@o1 === @o2).should == false
end
end
describe "Kernel#=== for a class with #== overridden to consider other object's class" do
before :each do
@o = Object.new
@o1 = Specs::Kernel::HasOpEqual.new
@o2 = @o1.dup
end
it "returns true if #== returns true even if #equal? is false" do
@o1.should_not equal(@o2)
(@o1 == @o2).should == true
(@o1 === @o2).should == true
end
it "returns true if #equal? returns true" do
@o1.should equal(@o1)
(@o1 === @o1).should == true
end
it "returns false if neither #== nor #equal? returns true" do
@o1.should_not equal(@o)
(@o1 == @o).should == false
(@o1 === @o).should == false
end
end
describe "Kernel#=== for a class with #equal? overridden to always be false" do
before :each do
@o = Object.new
@o1 = Specs::Kernel::HasEqual.new
@o2 = @o1.dup
end
it "returns true if #== returns true even if #equal? is false" do
@o1.should_not equal(@o1)
(@o1 == @o1).should == true
(@o1 === @o1).should == true
end
it "returns false if neither #== nor #equal? returns true" do
@o1.should_not equal(@o)
(@o1 == @o).should == false
(@o1 === @o).should == false
end
end
describe "Kernel#=== for a class with #== and #equal? overridden to always be false" do
before :each do
@o = Object.new
@o1 = Specs::Kernel::HasOppoOpEqual.new
@o2 = @o1.dup
end
not_compliant_on :rubinius do
it "returns true if the object id is the same even if both #== and #equal? return false" do
@o1.object_id.should == @o1.object_id
@o1.should_not equal(@o1)
(@o1 == @o1).should == false
(@o1 === @o1).should == true
end
end
deviates_on :rubinius do
it "returns false if both #== and #equal? return false even if object id is same" do
@o1.object_id.should == @o1.object_id
@o1.should_not equal(@o1)
(@o1 == @o1).should == false
(@o1 === @o1).should == false
end
end
it "returns false if the object id is not the same and both #== and #equal? return false" do
@o1.object_id.should_not == @o2.object_id
@o1.should_not equal(@o2)
(@o1 == @o2).should == false
(@o1 === @o2).should == false
end
end
describe "Kernel#=== for a class with #object_id overridden to always be different #== and #equal? overridden to always be true" do
before :each do
@o = Object.new
@o1 = Specs::Kernel::RandomID.new
@o2 = @o1.dup
end
it "returns true if #== or #equal? is true even if object id is different" do
@o1.object_id.should_not == @o1.object_id
@o1.should equal(@o1)
(@o1 == @o1).should == true
(@o1 === @o1).should == true
end
end
|
