rigortype 0.4.3 → 0.4.5

data/lib/rigor/inference/project_patched_methods.rb

@@ -27,25 +27,57 @@ module Rigor
       # alias earlier in the `pre_eval:` files binds `old`, the alias's entry copies that entry's `return_type` (and
       # its `alias_of`); otherwise `alias_of` names `old`, a method the class had before the patch, and the
       # dispatcher answers the alias with what that method answers. `alias_of` is nil for a `def`.
-      Entry = Data.define(:class_name, :method_name, :kind, :source_path, :source_line, :return_type, :alias_of) do
-        def initialize(class_name:, method_name:, kind:, source_path:, source_line:, return_type: nil, alias_of: nil)
+      #
+      # Issue #1708 — `visibility` is `:public`, `:private` or `:protected`, as the patch file leaves the method: a
+      # `private def x`, a `def` after a bare `private` in the same body, a later `private :x`, and the instance copy
+      # a `module_function` makes are `:private` ({#callable?} reads it). An alias takes its old name's visibility,
+      # as Ruby's does; one whose old name no patch binds is `:public`.
+      #
+      # `farther` is set only on an entry {#lookup_through_ancestors} returns: the other definers of the name farther
+      # on the walk (entries, or {SOURCE_DEFINER} for a project-source `def`), which {#callable?} reads before it
+      # refuses the call.
+      Entry = Data.define(:class_name, :method_name, :kind, :source_path, :source_line, :return_type, :alias_of,
+                          :visibility, :farther) do
+        def initialize(class_name:, method_name:, kind:, source_path:, source_line:, return_type: nil, alias_of: nil,
+                       visibility: :public, farther: nil)
           super
         end
       end
 
-      attr_reader :by_key, :write_census
+      # Issue #1708 — one `include` or `prepend` a `pre_eval:` file writes (`Numeric.include(M)`, or `include M` in
+      # `class Numeric`): `owner` gains `module_name` as an ancestor, `kind` `:include` or `:prepend`. Names are as
+      # written, with no lexical resolution, as a patch's class name is.
+      Mixin = Data.define(:owner, :module_name, :kind)
+
+      attr_reader :by_key, :write_census, :mixins, :overrides
+
+      # Each owner's prepended and included modules, the most recent first.
+      def self.mixins_by_owner(mixins)
+        table = mixins.each_with_object({}) do |mixin, acc|
+          edges = (acc[mixin.owner] ||= { prepend: [], include: [] })
+          edges[mixin.kind].unshift(mixin.module_name)
+        end
+        table.each_value { |edges| edges.each_value(&:freeze) }.freeze
+      end
 
       # @param entries — flat list of declarations observed during the pre-pass.
       #   Last-write-wins on `(class_name, method_name, kind)` duplicates, as at runtime (ADR-17); the
       #   `pre-eval.duplicate-declaration` diagnostic emission stays decoupled from registry behaviour.
       # @param write_census — issue #1367: the `pre_eval:` files' {GlobalWriteCensus}, which the `global.*` write
       #   rules join with the project's, since a patch file is loaded ahead of the code it patches.
-      def initialize(entries: [], write_census: GlobalWriteCensus::EMPTY)
+      # @param mixins — issue #1708: the {Mixin} edges the `pre_eval:` files write, in the order they run.
+      # @param overrides — issue #1708: `[class_name, method_name, kind] => visibility` for a named visibility call
+      #   (`public :kp` in `class Integer`) on a method the class inherits rather than binds, which Ruby copies onto
+      #   the class with that visibility.
+      def initialize(entries: [], write_census: GlobalWriteCensus::EMPTY, mixins: [], overrides: {})
         @by_key = entries.each_with_object({}) do |entry, acc|
           key = [entry.class_name, entry.method_name, entry.kind]
           acc[key] = entry
         end.freeze
         @write_census = write_census.frozen? ? write_census : write_census.dup.freeze
+        @mixins = mixins.dup.freeze
+        @mixins_of = ProjectPatchedMethods.mixins_by_owner(@mixins)
+        @overrides = overrides.dup.freeze
         freeze
       end
 
@@ -55,11 +87,143 @@ module Rigor
         @by_key[[class_name, method_name, kind]]
       end
 
+      # Issue #1708 — the entry a `kind` receiver of `class_name` reaches through its ancestors, searched in Ruby's
+      # order: a patch on `Object`, `Kernel`, `Numeric`, `Comparable` or `Enumerable` answers an `Integer`, `Array`
+      # or `String` receiver, and a patch on a nearer ancestor wins over one on a farther. A class object's chain
+      # is its singleton classes, then `Class`, `Module`, `Object`, `Kernel` and `BasicObject`, so `def zz` in
+      # `class Object` answers `Integer.zz` too. The ancestors are the class's RBS ones; a class RBS does not
+      # declare is searched as itself only, as {#lookup} searches it.
+      #
+      # It answers only which patch the chain holds. A method a nearer ancestor's RBS declares wins over the patch
+      # in Ruby, so the callers ask once that RBS has come back without the method. A method the project's own
+      # source defines on the way wins too: `source_defines` is called with each `owner, side` BEFORE that owner's
+      # patch is read, and when it answers true the walk stops with no entry, leaving the call to what types that
+      # method. That includes an owner holding both a patch and a source `def` (a `lib/` reopen loaded after the
+      # patch, or a module the project prepends to it), unlike {#lookup}, which answers the patch.
+      #
+      # A module the `pre_eval:` files include into or prepend to an owner on the way ({Mixin}) is searched where Ruby
+      # puts it: prepends ahead of the owner, includes after it, the most recent first, each with its own mixins. A
+      # named visibility call on an owner the walk passes before the body (`public :kp` in `class Integer`, an
+      # override) gives the entry it returns that visibility, and that owner for {#callable?}'s protected check.
+      # @return the entry, or `nil` when no ancestor's patch declares the method ahead of a source `def`.
+      def lookup_through_ancestors(class_name:, method_name:, kind:, rbs_loader:, source_defines: nil) # rubocop:disable Metrics/CyclomaticComplexity, Metrics/PerceivedComplexity
+        return nil if empty?
+
+        override = nil
+        found = nil
+        farther = []
+        ancestor_keys(class_name.to_s, kind, rbs_loader).each do |owner, side|
+          if source_defines&.call(owner, side)
+            return nil if found.nil?
+
+            farther << SOURCE_DEFINER
+            break
+          end
+
+          entry = @by_key[[owner, method_name, side]]
+          if found
+            farther << entry if entry
+          elsif entry
+            found = override ? entry.with(class_name: override.first, visibility: override.last) : entry
+          elsif (visibility = @overrides[[owner, method_name, side]])
+            override ||= [owner, visibility]
+          end
+        end
+        farther.empty? || found.nil? ? found : found.with(farther: farther.freeze)
+      end
+
+      # A project-source `def` of the name farther on the walk than the entry it returns, in {Entry#farther}.
+      SOURCE_DEFINER = Object.new.freeze
+
+      # Issue #1708 — whether Ruby lets a call reach `entry`. A public method answers any call; a private one only a
+      # call with no receiver or with `self` as it (`explicit` is false for those); a protected one also a call from
+      # a method whose `self` is an instance of the entry's owner. `self_type` is the caller's `self` (`nil` at the
+      # top level, where it is `main`, an Object); a `self` this cannot name (the default) may be one, so a
+      # protected entry answers it.
+      #
+      # It never refuses a call some other definer of the name may answer: the walk's order is an approximation
+      # (a module two owners mix in is spliced at the nearer one, where Ruby keeps the first include and skips the
+      # second), so when {Entry#farther} holds a definer the call may reach (a project-source `def`, or an entry this
+      # would let it reach), it answers nil: decline, neither refused nor typed from `entry`.
+      # @return true (the call reaches `entry`), false (Ruby refuses it), or nil (declined).
+      def callable?(entry, explicit:, self_type: :unknown, rbs_loader: nil)
+        return true unless explicit
+
+        allowed =
+          case entry.visibility
+          when :private, :module_function then false
+          when :protected then self_kind_of?(self_type, entry.class_name, rbs_loader)
+          else true
+          end
+        return true if allowed
+
+        reachable = (entry.farther || []).any? do |other|
+          other.equal?(SOURCE_DEFINER) || callable?(other, explicit: true, self_type: self_type, rbs_loader: rbs_loader)
+        end
+        reachable ? nil : false # rubocop:disable Style/ReturnNilInPredicateMethodDefinition
+      end
+
       def empty?
         @by_key.empty?
       end
 
       EMPTY = new.freeze
+
+      private
+
+      # Whether `self_type` may be an instance of `owner`: false only when the ancestors of a class RBS knows,
+      # with the patches' mixins, do not hold it.
+      def self_kind_of?(self_type, owner, rbs_loader)
+        name, kind =
+          if self_type.nil? then ["Object", :instance]
+          elsif self_type.respond_to?(:class_name) && self_type.class_name
+            [self_type.class_name.to_s, self_type.is_a?(Type::Singleton) ? :singleton : :instance]
+          end
+        return true if name.nil? || rbs_loader.nil?
+
+        keys = ancestor_keys(name, kind, rbs_loader)
+        keys == [[name, kind]] || keys.include?([owner, :instance])
+      end
+
+      def ancestor_keys(class_name, kind, rbs_loader)
+        pairs =
+          if kind == :singleton
+            sides = rbs_loader ? rbs_loader.singleton_ancestors_for(class_name) : []
+            sides.empty? ? [[class_name, :singleton]] : sides.map { |side, owner| [owner, side] }
+          else
+            names = rbs_loader ? rbs_loader.ancestor_names_for(class_name) : []
+            (names.empty? ? [class_name] : names).map { |owner| [owner, :instance] }
+          end
+        @mixins_of.empty? ? pairs : with_mixins(pairs)
+      end
+
+      # The RBS ancestor pairs with each instance-side owner's `pre_eval:` mixins spliced in. A module already on
+      # the chain is not added again, as Ruby skips a module the ancestors already hold.
+      def with_mixins(pairs)
+        chain = pairs.filter_map { |owner, side| owner if side == :instance }.to_set
+        seen = Set.new
+        pairs.flat_map do |owner, side|
+          side == :instance ? expand_mixins(owner, chain, seen).map { |name| [name, :instance] } : [[owner, side]]
+        end
+      end
+
+      # `owner` with the modules the patches prepend to it ahead and the ones they include after, each expanded the
+      # same way: the order Ruby's `ancestors` lists them in. An include of a module the RBS chain already holds
+      # changes nothing, as Ruby skips it (`Integer.include(Comparable)`); a prepend of one is spliced ahead all the
+      # same, as Ruby adds it again (`Integer.prepend(Comparable)`). `seen` holds the modules already spliced, so a
+      # module is spliced once, at the nearest owner that mixes it in, and an include cycle ends. Ruby skips
+      # `Integer.include(A)` run after `Numeric.include(A)`, leaving A after Numeric; the registry, which does not read
+      # the order the two edges ran in, splices A after Integer either way.
+      def expand_mixins(owner, chain, seen)
+        edges = @mixins_of[owner]
+        return [owner] if edges.nil?
+
+        ahead = edges[:prepend].flat_map { |name| seen.add?(name) ? expand_mixins(name, chain, seen) : [] }
+        after = edges[:include].flat_map do |name|
+          !chain.include?(name) && seen.add?(name) ? expand_mixins(name, chain, seen) : []
+        end
+        ahead + [owner] + after
+      end
     end
   end
 end

data/lib/rigor/inference/project_patched_mixins.rb

@@ -0,0 +1,162 @@
+# frozen_string_literal: true
+
+require "prism"
+
+require_relative "project_patched_methods"
+require_relative "../source/constant_path"
+
+module Rigor
+  module Inference
+    module ProjectPatchedScanner
+      # Issue #1708 — the `include` / `prepend` edges a `pre_eval:` file writes, so a module it mixes into an
+      # ancestor (`Numeric.include(M)`) answers the receivers below that ancestor through
+      # {ProjectPatchedMethods#lookup_through_ancestors}. Ruby 4.0.5: after `Numeric.include(NumExt)`, `1.inc_m` and
+      # `1.5.inc_m` run.
+      module Mixins
+        # An `include` / `prepend` the walk met, with the lexical prefix {.resolve} resolves its module's written
+        # name in.
+        Pending = Data.define(:owner, :module_name, :kind, :prefix)
+
+        CALLS = %i[include prepend].freeze
+        private_constant :CALLS
+
+        module_function
+
+        # The {Pending} edges `node` writes, or none: `Numeric.include(M)` on a constant, or `include M` /
+        # `self.include(M)` in a body. A top-level `include M` includes into `Object`, as Ruby's does. One in a
+        # `class << self` body is an `extend`, which this does not read; a module argument that is not a constant is
+        # skipped.
+        def pending(node, qualified_prefix, in_singleton_class)
+          return [] unless CALLS.include?(node.name) && node.arguments
+
+          owner = owner(node.receiver, qualified_prefix, in_singleton_class)
+          return [] if owner.nil?
+
+          node.arguments.arguments.filter_map do |arg|
+            name = Source::ConstantPath.qualified_name_or_nil(arg)
+            next if name.nil?
+
+            prefix = arg.is_a?(Prism::ConstantPathNode) && arg.parent.nil? ? [] : qualified_prefix
+            Pending.new(owner: owner, module_name: name, kind: node.name, prefix: prefix)
+          end
+        end
+
+        def owner(receiver, qualified_prefix, in_singleton_class)
+          case receiver
+          when nil, Prism::SelfNode
+            return nil if in_singleton_class
+            return "Object" if qualified_prefix.empty? && receiver.nil?
+
+            qualified_prefix.join("::") unless qualified_prefix.empty?
+          else
+            Source::ConstantPath.qualified_name_or_nil(receiver)
+          end
+        end
+        private_class_method :owner
+
+        # The `include` / `prepend` call an idempotence guard runs only while its module is not yet an ancestor of its
+        # receiver, or nil. The guards are `X.include?(M)`, `X.ancestors.include?(M)` and `X < M`, written after the
+        # call as `unless` or as `if !`; the guard only skips a second include, so the call is read as a direct
+        # statement would be (#2109). The guard names the call's own receiver and module; any other condition, or a
+        # guard naming another receiver or module, leaves the call unread.
+        #
+        # `top_level` says the conditional is a direct statement of the file's top level, where a receiverless call
+        # includes into Object; see {guarded_call?}. The `CALLS` check is defensive: the scanner applies a call's mixin
+        # edge only when {Mixins.pending} reads it as include or prepend, so a call of another name changes nothing.
+        def guarded(node, top_level)
+          return nil unless node.is_a?(Prism::UnlessNode) || node.is_a?(Prism::IfNode)
+
+          call = guarded_body(node)
+          return nil unless call.is_a?(Prism::CallNode) && CALLS.include?(call.name) && guarded_call?(call, top_level)
+
+          guard = when_undefined(node)
+          call if guard && guards?(guard, call)
+        end
+
+        # Whether `call` takes exactly one module, and is not receiverless at the file's top level. Such an include's
+        # guard would be `include?` on main, which Ruby does not define: the guard raises, so it is not read as an
+        # include into Object. A receiverless call in a class or module body names that body's own module.
+        def guarded_call?(call, top_level)
+          call.arguments&.arguments&.size == 1 && !(top_level && call.receiver.nil?)
+        end
+        private_class_method :guarded_call?
+
+        # The sole statement of an `unless` or `if` body, or nil when the conditional has an else branch or another
+        # body.
+        def guarded_body(node)
+          return nil if node.is_a?(Prism::UnlessNode) ? node.else_clause : node.subsequent
+
+          body = node.statements&.body
+          body.first if body&.size == 1
+        end
+        private_class_method :guarded_body
+
+        # The predicate the body runs under: `unless P` runs its body when P is false; `if !P` does too.
+        def when_undefined(node)
+          predicate = unwrap(node.predicate)
+          return predicate if node.is_a?(Prism::UnlessNode)
+          return nil unless predicate.is_a?(Prism::CallNode) && predicate.name == :! && predicate.receiver
+
+          unwrap(predicate.receiver)
+        end
+        private_class_method :when_undefined
+
+        def unwrap(node)
+          body = node.body.body if node.is_a?(Prism::ParenthesesNode) && node.body.is_a?(Prism::StatementsNode)
+          body&.size == 1 ? body.first : node
+        end
+        private_class_method :unwrap
+
+        # Whether `guard` is `X.include?(M)`, `X.ancestors.include?(M)` or `X < M`, where `X` and `M` are the receiver
+        # and the argument of `call`; {guarded} passes only a call with exactly one argument.
+        def guards?(guard, call)
+          return false unless guard.is_a?(Prism::CallNode) && guard.arguments&.arguments&.size == 1
+
+          subject, named = guard_subject(guard)
+          named && same_constant?(subject, call.receiver) && same_constant?(named, call.arguments.arguments.first)
+        end
+        private_class_method :guards?
+
+        # The `[receiver, module]` a guard names, or nil.
+        def guard_subject(guard)
+          named = guard.arguments.arguments.first
+          case guard.name
+          when :<
+            [guard.receiver, named] if guard.receiver
+          when :include?
+            receiver = guard.receiver
+            if receiver.is_a?(Prism::CallNode) && receiver.name == :ancestors && receiver.arguments.nil?
+              [receiver.receiver, named]
+            else
+              [receiver, named]
+            end
+          end
+        end
+        private_class_method :guard_subject
+
+        # Whether two receivers or modules name the same constant; two absent receivers (self) match.
+        def same_constant?(left, right)
+          return left.nil? && right.nil? if left.nil? || right.nil?
+
+          name = Source::ConstantPath.qualified_name_or_nil(left)
+          !name.nil? && name == Source::ConstantPath.qualified_name_or_nil(right)
+        end
+        private_class_method :same_constant?
+
+        # Each {Pending} edge's module name, resolved as Ruby resolves the constant from where it is written:
+        # `include NumExt` in `module Ext` names `Ext::NumExt` when a patch body opens that, else `NumExt`. Only the
+        # names the `pre_eval:` files open or mix into are candidates; one they do not name stays as written.
+        def resolve(pending, entries)
+          known = entries.to_set(&:class_name).merge(pending.map(&:owner))
+          pending.map do |item|
+            candidates = item.prefix.size.downto(1).map do |depth|
+              [*item.prefix.first(depth), item.module_name].join("::")
+            end
+            name = candidates.find { |candidate| known.include?(candidate) } || item.module_name
+            ProjectPatchedMethods::Mixin.new(owner: item.owner, module_name: name, kind: item.kind)
+          end
+        end
+      end
+    end
+  end
+end

data/lib/rigor/inference/project_patched_scanner.rb

@@ -4,6 +4,8 @@ require "prism"
 
 require_relative "project_patched_methods"
 require_relative "project_patched_definedness_guard"
+require_relative "project_patched_visibility"
+require_relative "project_patched_mixins"
 require_relative "../analysis/dependency_source_inference/return_type_heuristic"
 require_relative "../source/alias_names"
 require_relative "../source/constant_path"
@@ -20,7 +22,7 @@ module Rigor
     # only needs `class C; def m; end; end` shape recognition, not full inference. Parse errors degrade
     # to a fail-soft `:warning` `pre-eval.parse-error` diagnostic accumulated alongside the registry;
     # per ADR-17 § "Failure modes" a parse failure in a pre-eval file MUST NOT abort the rest of the run.
-    module ProjectPatchedScanner
+    module ProjectPatchedScanner # rubocop:disable Metrics/ModuleLength
       # Frozen scan outcome carrying the populated registry and the per-file warnings the runner emits
       # at run start.
       class Result < Data.define(:registry, :diagnostics)
@@ -57,10 +59,13 @@ module Rigor
         diagnostics = []
         census = Set.new
         paths.each { |path| scan_file(path, collected, diagnostics, buffer, census) }
-        entries = resolve_aliases(collected)
+        pending_mixins, collected = collected.partition { |item| item.is_a?(Mixins::Pending) }
+        overrides = {}
+        entries = resolve_aliases(collected, overrides)
         diagnostics.concat(duplicate_declaration_diagnostics(entries))
         Result.new(
-          registry: ProjectPatchedMethods.new(entries: entries, write_census: census.freeze),
+          registry: ProjectPatchedMethods.new(entries: entries, write_census: census.freeze, overrides: overrides,
+                                              mixins: Mixins.resolve(pending_mixins, entries)),
           diagnostics: diagnostics
         )
       end
@@ -105,32 +110,50 @@ module Rigor
       # idiom (`def foo`, `alias_method :foo_without_x, :foo`, `alias_method :foo, :foo_with_x`) leaves `foo` the
       # alias. Bindings of one name in DIFFERENT files are what `pre-eval.duplicate-declaration` reports, and the
       # registry keeps the last of those, as Ruby does.
-      def resolve_aliases(collected)
+      #
+      # A {Visibility::Pending} (issue #1708) changes the visibility of the binding its name has when it runs, in the
+      # file that bound it, so it is not a second declaration; a name no earlier patch binds on the class is one it
+      # inherits, recorded in `overrides` ({Visibility.apply}). `module_function :x` also binds the public singleton
+      # copy.
+      def resolve_aliases(collected, overrides = {})
         bound = {}
+        homes = {}
         per_file = collected.group_by(&:source_path).values.map do |items|
           final = {}
           items.each do |item|
+            if item.is_a?(Visibility::Pending)
+              next Visibility.apply(item, bound, homes, overrides) { |copy| bind(copy, bound, homes, final) }
+            end
+
             entry = item.is_a?(PendingAlias) ? alias_entry(item, bound) : item
             entry = entry.entry if entry.is_a?(GuardedDef)
             key = [entry.class_name, entry.method_name, entry.kind]
             next if item.is_a?(GuardedDef) && bound.key?(key)
 
-            bound[key] = entry
-            final.delete(key)
-            final[key] = entry
+            bind(entry, bound, homes, final)
           end
-          final.values
+          final
         end
-        per_file.flatten(1)
+        per_file.flat_map(&:values)
       end
       private_class_method :resolve_aliases
 
+      def bind(entry, bound, homes, final)
+        key = [entry.class_name, entry.method_name, entry.kind]
+        bound[key] = entry
+        homes[key] = final
+        final.delete(key)
+        final[key] = entry
+      end
+      private_class_method :bind
+
       def alias_entry(item, bound)
         target = bound[[item.class_name, item.old_name, item.kind]]
         ProjectPatchedMethods::Entry.new(
           class_name: item.class_name, method_name: item.new_name, kind: item.kind,
           source_path: item.source_path, source_line: item.source_line,
-          return_type: target&.return_type, alias_of: target ? target.alias_of : item.old_name
+          return_type: target&.return_type, alias_of: target ? target.alias_of : item.old_name,
+          visibility: target ? target.visibility : :public
         )
       end
       private_class_method :alias_entry
@@ -148,8 +171,7 @@ module Rigor
           return
         end
 
-        Thread.current[:rigor_guarded_defs] = DefinednessGuard.defs(parse_result.value)
-        walk_node(parse_result.value, [], false, path, entries)
+        walk_file(parse_result.value, path, entries)
         # Issue #1367 — the file's `global.*` write facts: a patch file may alias a special or give a class the
         # method a setter asks for, as any project file may.
         census.merge(GlobalWriteCensus.scan(parse_result.value))
@@ -164,9 +186,19 @@ module Rigor
         )
       ensure
         Thread.current[:rigor_guarded_defs] = nil
+        Thread.current[:rigor_def_visibilities] = nil
       end
       private_class_method :scan_file
 
+      # Walks one parsed file with its definedness guards and `def` visibilities (issue #1708) in reach of
+      # {record_def_node}.
+      def walk_file(root, path, entries)
+        Thread.current[:rigor_guarded_defs] = DefinednessGuard.defs(root)
+        Thread.current[:rigor_def_visibilities] = Visibility.defs(root)
+        walk_node(root, [], false, path, entries)
+      end
+      private_class_method :walk_file
+
       def parse_error_diagnostic(path, errors)
         first = errors.first
         line = first.respond_to?(:location) ? first.location&.start_line || 1 : 1
@@ -205,6 +237,11 @@ module Rigor
         when Prism::CallNode
           record_alias(node, Source::AliasNames.alias_method_call_names(node), qualified_prefix,
                        in_singleton_class, source_path, entries)
+          if Thread.current[:rigor_def_visibilities]&.[](node).equal?(Visibility::STATEMENT)
+            pending = Visibility.pending(node, qualified_prefix, in_singleton_class, source_path)
+            entries << pending if pending
+            entries.concat(Mixins.pending(node, qualified_prefix, in_singleton_class))
+          end
           walk_children(node, qualified_prefix, in_singleton_class, source_path, entries)
         else
           walk_children(node, qualified_prefix, in_singleton_class, source_path, entries)
@@ -251,7 +288,9 @@ module Rigor
           source_path: source_path, source_line: line,
           return_type: return_type
         )
+        entry, *copies = Visibility.applied(entry, Thread.current[:rigor_def_visibilities]&.[](node) || :public)
         entries << (Thread.current[:rigor_guarded_defs]&.key?(node) ? GuardedDef.new(entry: entry) : entry)
+        entries.concat(copies)
       end
       private_class_method :record_def_node