Call methods on owned classes in ls command

Previously, when calling comparison methods on
receivers we don't control (`c >= Object`), there
was a chance it could lack or have overridden the
method. This commit flips them to prevent this
`Object <= c`

Author: dejmedus

lib/irb/command/ls.rb

@@ -72,8 +72,8 @@ def dump_methods(o, klass, obj)
         singleton_class = begin Kernel.instance_method(:singleton_class).bind(obj).call; rescue TypeError; nil end
         dumped_mods = Array.new
         ancestors = klass.ancestors
-        ancestors = ancestors.reject { |c| c >= Object } if klass < Object
-        singleton_ancestors = (singleton_class&.ancestors || []).reject { |c| c >= Class }
+        ancestors = ancestors.reject { |c| Object <= c } if klass < Object
+        singleton_ancestors = (singleton_class&.ancestors || []).reject { |c| Class <= c }
 
         # singleton_class' ancestors should be at the front
         maps = class_method_map(singleton_ancestors, dumped_mods) + class_method_map(ancestors, dumped_mods)

test/irb/test_command.rb

@@ -757,6 +757,16 @@ def test_ls_with_no_singleton_class
       assert_match(/Numeric#methods:\s+/, out)
       assert_match(/Integer#methods:\s+/, out)
     end
+
+    def test_ls_when_class_overrides_comparison
+      out, err = execute_lines(
+        "class BadCompare; class << self; undef >=; end; def foo; end; end\n",
+        "obj = BadCompare.new\n",
+        "ls obj\n",
+      )
+      assert_empty err
+      assert_match(/BadCompare#methods:\s+foo/, out)
+    end
   end
 
   class ShowDocTest < CommandTestCase