summaryrefslogtreecommitdiff
path: root/spec/ruby/core/class/subclasses_spec.rb
blob: 50eb5358d974190b379a14bd02296083ffb49fac (plain)
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
require_relative '../../spec_helper'
require_relative '../module/fixtures/classes'

ruby_version_is '3.1' do
  describe "Class#subclasses" do
    it "returns a list of classes directly inheriting from self" do
      assert_subclasses(ModuleSpecs::Parent, [ModuleSpecs::Child, ModuleSpecs::Child2])
    end

    it "does not return included modules from the parent" do
      parent = Class.new
      child = Class.new(parent)
      mod = Module.new
      parent.include(mod)

      assert_subclasses(parent, [child])
    end

    it "does not return included modules from the child" do
      parent = Class.new
      child = Class.new(parent)
      mod = Module.new
      parent.include(mod)

      assert_subclasses(parent, [child])
    end

    it "does not return prepended modules from the parent" do
      parent = Class.new
      child = Class.new(parent)
      mod = Module.new
      parent.prepend(mod)

      assert_subclasses(parent, [child])
    end

    it "does not return prepended modules from the child" do
      parent = Class.new
      child = Class.new(parent)
      mod = Module.new
      child.prepend(mod)

      assert_subclasses(parent, [child])
    end

    it "does not return singleton classes" do
      a = Class.new

      a_obj = a.new
      def a_obj.force_singleton_class
        42
      end

      a.subclasses.should_not include(a_obj.singleton_class)
    end

    it "has 1 entry per module or class" do
      ModuleSpecs::Parent.subclasses.should == ModuleSpecs::Parent.subclasses.uniq
    end

    it "works when creating subclasses concurrently" do
      t = 16
      n = 1000
      go = false
      superclass = Class.new

      threads = t.times.map do
        Thread.new do
          Thread.pass until go
          n.times.map do
            Class.new(superclass)
          end
        end
      end

      go = true
      classes = threads.map(&:value)

      superclass.subclasses.size.should == t * n
      superclass.subclasses.each { |c| c.should be_kind_of(Class) }
    end

    def assert_subclasses(mod,subclasses)
      mod.subclasses.sort_by(&:inspect).should == subclasses.sort_by(&:inspect)
    end
  end
end