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
|
module HashSpecs
class MyHash < Hash; end
class MyInitializerHash < Hash
def initialize
raise "Constructor called"
end
end
class NewHash < Hash
def initialize(*args)
args.each_with_index do |val, index|
self[index] = val
end
end
end
class SubHashSettingInInitialize < Hash
def initialize(*args, &block)
self[:foo] = :bar
super(*args, &block)
end
end
class DefaultHash < Hash
def default(key)
100
end
end
class ToHashHash < Hash
def to_hash
{ "to_hash" => "was", "called!" => "duh." }
end
end
class KeyWithPrivateHash
private :hash
end
class ByIdentityKey
def hash
fail("#hash should not be called on compare_by_identity Hash")
end
end
class ByValueKey
attr_reader :n
def initialize(n)
@n = n
end
def hash
n
end
def eql? other
ByValueKey === other and @n == other.n
end
end
def self.empty_frozen_hash
@empty ||= {}
@empty.freeze
@empty
end
def self.frozen_hash
@hash ||= { 1 => 2, 3 => 4 }
@hash.freeze
@hash
end
end
|
