blood 0.1.0 → 0.1.2

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: d68b62c2e2a24cd8195e951957aef1e134fba03d149f955fdb6d50818e284b1a
-  data.tar.gz: f21fd7f0e71d778ce15f82407539595dc427de0efdd3747f3797d95e82c6f8b4
+  metadata.gz: 761ec35533a1ca239737387f6db021aff647615513d94f3a863d544cff6f829d
+  data.tar.gz: 77c985d7880aa0ec40a88ad5835b666cffbbae181e31c7c2bee9be1696ad8a33
 SHA512:
-  metadata.gz: b532773779d7395194b4a2d0cd518291ccc2f9f29e3c58be7fe6857c7055b00da7dcc3f74e2133f44f9d3b10e70a4af8ab51977b7a29e50497f3fb7650bedc03
-  data.tar.gz: f4d57e9a01119cda50948603270728e8bca299bea8b67da4a8f6b282efd37ff0169f21ddc6754d82cd4b87814c007150f02e940606a4ec82beeb76433212afba
+  metadata.gz: 913f867664ab4c5ea34c16a07ac93128007cff92f3d9d5f0b817e814cf2e7d6488063d6d227187cbdd4d3e891bcafe829f09d033cb842d7b67c44fbf4bdd0e3c
+  data.tar.gz: e18c7a9b0152137dbef1cbb6efd06fba6bd2f33482866082db6ab228ec3f28c2322d882490ab27017acfcf7c95b8d7daa55da6daf7683d496f924b67594778da

data/Gemfile.lock

@@ -1,7 +1,7 @@
 PATH
   remote: .
   specs:
-    blood (0.1.0)
+    blood (0.1.1)
       tree_html (~> 0.1.10)
 
 GEM

data/lib/blood/version.rb

@@ -1,5 +1,5 @@
 # frozen_string_literal: true
 
 module Blood
-  VERSION = "0.1.0"
+  VERSION = "0.1.2"
 end

data/lib/blood.rb

@@ -9,7 +9,13 @@ module Blood
   def self.source(mods)
     hier = Hash.new{ |h, k| h[k] = Set.new }
     mods.each do |mod|
-      ances = mod.ancestors
+      # maybe [Class, [Module, Module], ...]
+      ances = mod.ancestors.reduce([]) do |arr, a|
+        next arr << a if Class === a
+        arr << Modules.new unless Modules === arr[-1]
+        arr[-1].add(a)
+        arr
+      end
       ances.each_with_index do |child, i|
         parent = ances[i + 1]
         hier[parent] << child
@@ -18,6 +24,26 @@ module Blood
     Node.new(BasicObject, hier)
   end
 
+  class Modules
+    def add(mod)
+      (@mods ||= []) << mod
+    end
+
+    def to_s
+      @to_s ||= (@mods.count == 1 ? @mods[0].to_s : @mods.to_s)
+    end
+
+    alias_method :name, :to_s
+
+    def hash
+      to_s.hash
+    end
+
+    def eql?(other)
+      to_s.eql?(other.to_s)
+    end
+  end
+
   class Node
     include TreeHtml
 
@@ -27,16 +53,31 @@ module Blood
     end
 
     def label_for_tree_html
-      name = ::CGI.escapeHTML(@mod.to_s)
+      name = ::CGI.escapeHTML(@mod.name || @mod.to_s)
       Class === @mod ? "<span class='hl'>#{name}</span>" : name
     end
 
+    NORMAL_NAME = /^[A-Z][A-Za-z0-9]*(::[A-Z][A-Za-z0-9]*)*$/
+
+    if Module.method_defined?(:const_source_location)
+      alias_method :raw_label_for_tree_html, :label_for_tree_html
+
+      def label_for_tree_html
+        return raw_label_for_tree_html if Modules === @mod
+        return raw_label_for_tree_html unless @mod.name =~ NORMAL_NAME
+        loc = Module.const_source_location(@mod.name)
+        return raw_label_for_tree_html unless loc
+        loc = ::CGI.escapeHTML(loc.join(':'))
+        "#{raw_label_for_tree_html} <span class='sd'>#{loc}</span>"
+      end
+    end
+
     def children_for_tree_html
       children.map{ |sub| Node.new(sub, @hier) }
     end
 
     def css_for_tree_html
-      '.hl{color: #cc342d;}'
+      '.hl{color: #cc342d;} .sd{color: #9e9e9e;}'
     end
 
     private

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: blood
 version: !ruby/object:Gem::Version
-  version: 0.1.0
+  version: 0.1.2
 platform: ruby
 authors:
 - ken
 autorequire:
 bindir: exe
 cert_chain: []
-date: 2024-02-26 00:00:00.000000000 Z
+date: 2024-05-24 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: tree_html