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
|
require_relative '../../spec_helper'
require_relative 'fixtures/classes'
require_relative '../../fixtures/reflection'
# TODO: rewrite
describe "Kernel#private_methods" do
it "returns a list of the names of privately accessible methods in the object" do
m = KernelSpecs::Methods.private_methods(false)
m.should include(:shichi)
m = KernelSpecs::Methods.new.private_methods(false)
m.should include(:juu_shi)
end
it "returns a list of the names of privately accessible methods in the object and its ancestors and mixed-in modules" do
m = (KernelSpecs::Methods.private_methods(false) & KernelSpecs::Methods.private_methods)
m.should include(:shichi)
m = KernelSpecs::Methods.new.private_methods
m.should include(:juu_shi)
end
it "returns private methods mixed in to the metaclass" do
m = KernelSpecs::Methods.new
m.extend(KernelSpecs::Methods::MetaclassMethods)
m.private_methods.should include(:shoo)
end
end
describe :kernel_private_methods_supers, shared: true do
it "returns a unique list for an object extended by a module" do
m = ReflectSpecs.oed.private_methods(*@object)
m.select { |x| x == :pri }.sort.should == [:pri]
end
it "returns a unique list for a class including a module" do
m = ReflectSpecs::D.new.private_methods(*@object)
m.select { |x| x == :pri }.sort.should == [:pri]
end
it "returns a unique list for a subclass of a class that includes a module" do
m = ReflectSpecs::E.new.private_methods(*@object)
m.select { |x| x == :pri }.sort.should == [:pri]
end
end
describe :kernel_private_methods_with_falsy, shared: true do
it "returns a list of private methods in without its ancestors" do
ReflectSpecs::F.private_methods(@object).select{|m|/_pri\z/ =~ m}.sort.should == [:ds_pri, :fs_pri]
ReflectSpecs::F.new.private_methods(@object).should == [:f_pri]
end
end
describe "Kernel#private_methods" do
describe "when not passed an argument" do
it_behaves_like :kernel_private_methods_supers, nil, []
end
describe "when passed true" do
it_behaves_like :kernel_private_methods_supers, nil, true
end
describe "when passed false" do
it_behaves_like :kernel_private_methods_with_falsy, nil, false
end
describe "when passed nil" do
it_behaves_like :kernel_private_methods_with_falsy, nil, nil
end
end
|
