Fix anonymous class doc_namespace to use named superclass

lib/repl_type_completor/result.rb

@@ -120,29 +120,38 @@ def method_doc(type, name)
       type = type.types.find { _1.all_methods.include? name.to_sym }
       case type
       when Types::SingletonType
-        "#{Types.class_name_of(type.module_or_class)}.#{name}"
+        "#{doc_class_name(type.module_or_class)}.#{name}"
       when Types::InstanceType
-        "#{Types.class_name_of(type.klass)}##{name}"
+        "#{doc_class_name(type.klass)}##{name}"
       end
     end
 
     def call_or_const_doc(type, name)
       if name =~ /\A[A-Z]/
         type = type.types.grep(Types::SingletonType).find { _1.module_or_class.const_defined?(name) }
-        type.module_or_class == Object ? name : "#{Types.class_name_of(type.module_or_class)}::#{name}" if type
+        type.module_or_class == Object ? name : "#{doc_class_name(type.module_or_class)}::#{name}" if type
       else
         method_doc(type, name)
       end
     end
 
+    def doc_class_name(module_or_class)
+      return Methods::MODULE_NAME_METHOD.bind_call module_or_class unless module_or_class.is_a?(Class)
+      while true
+        name = Methods::MODULE_NAME_METHOD.bind_call module_or_class
+        return name if name
+        module_or_class = module_or_class.superclass
+      end
+    end
+
     def value_doc(type)
       return unless type
       type.types.each do |t|
         case t
         when Types::SingletonType
-          return Types.class_name_of(t.module_or_class)
+          return doc_class_name(t.module_or_class)
         when Types::InstanceType
-          return Types.class_name_of(t.klass)
+          return doc_class_name(t.klass)
         end
       end
       nil

test/repl_type_completor/test_repl_type_completor.rb

@@ -166,6 +166,12 @@ def bo.foo; end
       end
     end
 
+    def test_anonymous_class
+      bind = eval('s = Class.new(Struct.new).new; binding')
+      assert_completion('s.', binding: bind, include: 'each_pair')
+      assert_doc_namespace('s.each_pair', 'Struct#each_pair', binding: bind)
+    end
+
     DEPRECATED_CONST = 1
     deprecate_constant :DEPRECATED_CONST
     def test_deprecated_const_without_warning