im-lost 1.1.0 → 1.2.1

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: be7b612cd1d68529fbba18b5a9a4759e60111facc52e99a20b4da140e887f8c4
-  data.tar.gz: c1aeff67c05a2e31c0dab72c6c5ed84bb27f9231e759de874882a082f0fac284
+  metadata.gz: 533f4f50596d5c6a55f674e813d7053d954a26864ea80c2e266f8c6bd92c00fd
+  data.tar.gz: 31a7bd884fabb3aba95789ff9771811300e3c7cb6e75ec3c762a394df603b2ed
 SHA512:
-  metadata.gz: 9821d580f5c5e4e62133dba01fbdd9a26ec3cfd8ffe8ed6603b24760d5073184bd22bdbc6ab95317c6a39690abc56ad4e2e5afdd5df4e3d261525afc927448eb
-  data.tar.gz: b12a64d4ee2b7e9f1764c5bcb0e79a5f9b240b9b49359c10868abc2f763cefb8ea4a7844c0ba17239346157f516b10a6fc8d368386206cb0fea0c6cc330a7601
+  metadata.gz: 4631c248cc8af2691d09651ed3a90b863f72ba6954e3c14172208ceb153e69b834e5f67c12555347fa474f2f97a44ad579f8ef85a6b5db4be07ea574b76a7f36
+  data.tar.gz: d1accd54c95db533220dd98a6a741380be91050568d16cbc3b6acdaef1ba147b98f2ad39f560b1613b7351c01dca4a44bafd4db46e7ef526b169e5821da68fc0

data/LICENSE

@@ -1,6 +1,6 @@
 MIT License
 
-Copyright (c) 2024 Mike Blumtritt
+Copyright (c) 2024-2025 Mike Blumtritt
 
 Permission is hereby granted, free of charge, to any person obtaining a copy
 of this software and associated documentation files (the "Software"), to deal

data/README.md

@@ -10,7 +10,7 @@ ImLost helps you by analyzing function calls of objects, informing you about exc
 
 ## Description
 
-If you like to undertsand method call details you get a call trace with `ImLost.trace`:
+If you like to understand method call details you get a call trace with `ImLost.trace`:
 
 ```ruby
 File.open('test.txt', 'w') do |file|
@@ -22,13 +22,13 @@ end
 
 # output will look like
 #  > IO#<<(?)
-#    /projects/test.rb:1
+#    /examples/test.rb:1
 #  > IO#write(*)
-#    /projects/test.rb:1
+#    /examples/test.rb:1
 #  > IO#puts(*)
-#    /projects/test.rb:2
+#    /examples/test.rb:2
 #  > IO#write(*)
-#    /projects/test.rb:2
+#    /examples/test.rb:2
 ```
 
 When you need to know if exceptions are raised and handled you can use `ImLost.trace_exceptions`:
@@ -42,11 +42,11 @@ end
 
 # output will look like
 #  x Errno::EEXIST: File exists @ rb_sysopen - /
-#    /projects/test.rb:2
+#    /examples/test.rb:2
 #  ! Errno::EEXIST: File exists @ rb_sysopen - /
-#    /projects/test.rb:3
+#    /examples/test.rb:3
 #  x RuntimeError: something went wrong!
-#    /projects/test.rb:4
+#    /examples/test.rb:4
 ```
 
 When you like to know if a code point is reached, `ImLost.here` will help:
@@ -94,7 +94,6 @@ class Foo
   def bar = :bar
 end
 
-ImLost.trace_results = true
 ImLost.trace(Foo)
 
 my_foo = Foo.create(value: :foo!)
@@ -111,47 +110,55 @@ ImLost.vars(my_foo)
 
 # output will look like
 #   > Foo.create(:foo!)
-#     /projects/foo.rb:25
+#     /examples/foo.rb:24
 #   > Foo.new(*)
-#     /projects/foo.rb:6
+#     /examples/foo.rb:6
 #   < Foo.new(*)
-#     = #<Foo:0x00000001030810c0 @value=:foo!>
+#     /examples/foo.rb:6
+#     = #<Foo:0x00000001006448c0 @value=:foo!>
 #   < Foo.create(:foo!)
-#     = #<Foo:0x00000001030810c0 @value=:foo!>
+#     /examples/foo.rb:24
+#     = #<Foo:0x00000001006448c0 @value=:foo!>
 #   > Foo#foo(1, *[], :none, **{}, &nil)
-#     /projects/foo.rb:28
+#     /examples/foo.rb:27
 #   > Foo#bar()
-#     /projects/foo.rb:15
+#     /examples/foo.rb:15
 #   < Foo#bar()
+#     /examples/foo.rb:15
 #     = :bar
 #   < Foo#foo(1, *[], :none, **{}, &nil)
+#     /examples/foo.rb:27
 #     = "1-none-[]-{}-bar"
-#   = /projects/foo.rb:29
-#     instance variables:
-#     @value: "1-none-[]-{}-bar"
+#   * /examples/foo.rb:28
+#     > instance variables
+#       @value: "1-none-[]-{}-bar"
 #   > Foo#foo(2, *[:a, :b, :c], :some, **{:name=>:value}, &nil)
-#     /projects/foo.rb:31
+#     /examples/foo.rb:30
 #   > Foo#bar()
-#     /projects/foo.rb:15
+#     /examples/foo.rb:15
 #   < Foo#bar()
+#     /examples/foo.rb:15
 #     = :bar
 #   < Foo#foo(2, *[:a, :b, :c], :some, **{:name=>:value}, &nil)
+#     /examples/foo.rb:30
 #     = "2-some-[a,b,c]-{:name=>:value}-bar"
-#   = /projects/foo.rb:32
-#     instance variables:
-#     @value: "2-some-[a,b,c]-{:name=>:value}-bar"
-#   > Foo#foo(3, *[], nil, **{}, &#<Proc:0x00000001030aee30 /projects/foo.rb:34>)
-#     /projects/foo.rb:34
+#   * /examples/foo.rb:31
+#     > instance variables
+#       @value: "2-some-[a,b,c]-{:name=>:value}-bar"
+#   > Foo#foo(3, *[], nil, **{}, &#<Proc:0x0000000100641d28 /examples/foo.rb:33>)
+#     /examples/foo.rb:33
 #   > Foo#bar()
-#     /projects/foo.rb:15
+#     /examples/foo.rb:15
 #   < Foo#bar()
+#     /examples/foo.rb:15
 #     = :bar
 #   3--[]-{}-bar
-#   < Foo#foo(3, *[], nil, **{}, &#<Proc:0x00000001030aee30 /projects/foo.rb:34>)
+#   < Foo#foo(3, *[], nil, **{}, &#<Proc:0x0000000100641d28 /examples/foo.rb:33>)
+#     /examples/foo.rb:33
 #     = nil
-#   = /projects/foo.rb:35
-#     instance variables:
-#     @value: "3--[]-{}-bar"
+#   * /examples/foo.rb:34
+#     > instance variables
+#       @value: "3--[]-{}-bar"
 ```
 
 See [examples dir](./examples) for more…

data/examples/foo.rb

@@ -19,7 +19,6 @@ class Foo
   def bar = :bar
 end
 
-ImLost.trace_results = true
 ImLost.trace(Foo)
 
 my_foo = Foo.create(value: :foo!)
@@ -36,44 +35,52 @@ ImLost.vars(my_foo)
 
 # output will look like
 #   > Foo.create(:foo!)
-#     /projects/foo.rb:25
+#     /examples/foo.rb:24
 #   > Foo.new(*)
-#     /projects/foo.rb:6
+#     /examples/foo.rb:6
 #   < Foo.new(*)
-#     = #<Foo:0x00000001030810c0 @value=:foo!>
+#     /examples/foo.rb:6
+#     = #<Foo:0x00000001006448c0 @value=:foo!>
 #   < Foo.create(:foo!)
-#     = #<Foo:0x00000001030810c0 @value=:foo!>
+#     /examples/foo.rb:24
+#     = #<Foo:0x00000001006448c0 @value=:foo!>
 #   > Foo#foo(1, *[], :none, **{}, &nil)
-#     /projects/foo.rb:28
+#     /examples/foo.rb:27
 #   > Foo#bar()
-#     /projects/foo.rb:15
+#     /examples/foo.rb:15
 #   < Foo#bar()
+#     /examples/foo.rb:15
 #     = :bar
 #   < Foo#foo(1, *[], :none, **{}, &nil)
+#     /examples/foo.rb:27
 #     = "1-none-[]-{}-bar"
-#   = /projects/foo.rb:29
-#     instance variables:
-#     @value: "1-none-[]-{}-bar"
+#   * /examples/foo.rb:28
+#     > instance variables
+#       @value: "1-none-[]-{}-bar"
 #   > Foo#foo(2, *[:a, :b, :c], :some, **{:name=>:value}, &nil)
-#     /projects/foo.rb:31
+#     /examples/foo.rb:30
 #   > Foo#bar()
-#     /projects/foo.rb:15
+#     /examples/foo.rb:15
 #   < Foo#bar()
+#     /examples/foo.rb:15
 #     = :bar
 #   < Foo#foo(2, *[:a, :b, :c], :some, **{:name=>:value}, &nil)
+#     /examples/foo.rb:30
 #     = "2-some-[a,b,c]-{:name=>:value}-bar"
-#   = /projects/foo.rb:32
-#     instance variables:
-#     @value: "2-some-[a,b,c]-{:name=>:value}-bar"
-#   > Foo#foo(3, *[], nil, **{}, &#<Proc:0x00000001030aee30 /projects/foo.rb:34>)
-#     /projects/foo.rb:34
+#   * /examples/foo.rb:31
+#     > instance variables
+#       @value: "2-some-[a,b,c]-{:name=>:value}-bar"
+#   > Foo#foo(3, *[], nil, **{}, &#<Proc:0x0000000100641d28 /examples/foo.rb:33>)
+#     /examples/foo.rb:33
 #   > Foo#bar()
-#     /projects/foo.rb:15
+#     /examples/foo.rb:15
 #   < Foo#bar()
+#     /examples/foo.rb:15
 #     = :bar
 #   3--[]-{}-bar
-#   < Foo#foo(3, *[], nil, **{}, &#<Proc:0x00000001030aee30 /projects/foo.rb:34>)
+#   < Foo#foo(3, *[], nil, **{}, &#<Proc:0x0000000100641d28 /examples/foo.rb:33>)
+#     /examples/foo.rb:33
 #     = nil
-#   = /projects/foo.rb:35
-#     instance variables:
-#     @value: "3--[]-{}-bar"
+#   * /examples/foo.rb:34
+#     > instance variables
+#       @value: "3--[]-{}-bar"

data/examples/kernel_calls.rb

@@ -9,7 +9,6 @@ INFO
 
 require 'im-lost'
 
-ImLost.trace_results = true
 ImLost.trace(Kernel, Object, Module, Class, self) do
   puts '=' * 79
   pp Class.new

data/lib/im-lost/version.rb

@@ -2,5 +2,5 @@
 
 module ImLost
   # The version number of the gem.
-  VERSION = '1.1.0'
+  VERSION = '1.2.1'
 end

data/lib/im-lost.rb

@@ -26,9 +26,10 @@ module ImLost
 
     #
     # The output device used to write information.
-    # This should be an `IO` device or any other object responding to `#puts`.
+    # This should be an `IO` device or any other object responding to `#<<`
+    # like a Logger.
     #
-    # `$stderr` is configured by default.
+    # `STDERR` is configured by default.
     #
     # @example Write to a file
     #   ImLost.output = File.new('./trace', 'w')
@@ -50,8 +51,13 @@ module ImLost
     attr_reader :output
 
     def output=(value)
-      return @output = value if value.respond_to?(:puts)
-      raise(ArgumentError, "invalid output device - #{value.inspect}")
+      return @output = value if defined?(value.<<)
+      raise(
+        NoMethodError,
+        "undefined method '<<' for an instance of #{
+          Kernel.instance_method(:class).bind(value).call
+        }"
+      )
     end
 
     #
@@ -67,18 +73,18 @@ module ImLost
     # @attribute [r] trace_calls
     # @return [Boolean] whether method calls will be traced
     #
-    def trace_calls = @trace_calls[0].enabled?
+    def trace_calls = @trace_calls.enabled?
 
     def trace_calls=(value)
       if value
-        @trace_calls.each(&:enable) unless trace_calls
+        @trace_calls.enable unless trace_calls
       elsif trace_calls
-        @trace_calls.each(&:disable)
+        @trace_calls.disable
       end
     end
 
     #
-    # Traces execptions raised within a given block.
+    # Traces exceptions raised within a given block.
     #
     # @example Trace exception and rescue handling
     #   ImLost.trace_exceptions do
@@ -89,13 +95,13 @@ module ImLost
     #
     #   # output will look like
     #   #   x Errno::EEXIST: File exists @ rb_sysopen - /
-    #   #   /projects/test.rb:2
+    #   #     /examples/test.rb:2
     #   #   ! Errno::EEXIST: File exists @ rb_sysopen - /
-    #   #   /projects/test.rb:3
+    #   #     /examples/test.rb:3
     #   #   x RuntimeError: something went wrong!
-    #   #   /projects/test.rb:4
+    #   #     /examples/test.rb:4
     #
-    # @param with_locations [Boolean] wheter the locations should be included
+    # @param with_locations [Boolean] whether the locations should be included
     #   into the exception trace information
     # @yieldreturn [Object] return result
     #
@@ -112,52 +118,52 @@ module ImLost
     end
 
     #
-    # Enables/disables tracing of returned valuess of method calls.
-    # This is disabled by default.
+    # Enables/disables tracing of returned values of method calls.
+    # This is enabled by default.
     #
     # @attribute [r] trace_results
     # @return [Boolean] whether return values will be traced
     #
-    def trace_results = @trace_results[0].enabled?
+    def trace_results = @trace_results.enabled?
 
     def trace_results=(value)
       if value
-        @trace_results.each(&:enable) unless trace_results
+        @trace_results.enable unless trace_results
       elsif trace_results
-        @trace_results.each(&:disable)
+        @trace_results.disable
       end
     end
 
     #
     # Print the call location conditionally.
     #
-    # @example simply print location
+    # @example Print current location
     #   ImLost.here
     #
-    # @example print location when instance variable is empty
+    # @example Print current location when instance variable is empty
     #   ImLost.here(@name.empty?)
     #
-    # @example print location when instance variable is nil or empty
+    # @example Print current location when instance variable is nil or empty
     #   ImLost.here { @name.nil? || @name.empty? }
     #
     # @overload here
-    #   Prints the caller location.
+    #   Prints the call location.
     #   @return [true]
     #
     # @overload here(test)
-    #   Prints the caller location when given argument is truthy.
+    #   Prints the call location when given argument is truthy.
     #   @param test [Object]
     #   @return [Object] test
     #
     # @overload here
-    #   Prints the caller location when given block returns a truthy result.
+    #   Prints the call location when given block returns a truthy result.
     #   @yield When the block returns a truthy result the location will be print
     #   @yieldreturn [Object] return result
     #
     def here(test = true)
       return test if !test || (block_given? && !(test = yield))
       loc = Kernel.caller_locations(1, 1)[0]
-      @output.puts(": #{loc.path}:#{loc.lineno}")
+      @output << "* #{loc.path}:#{loc.lineno}\n"
       test
     end
 
@@ -166,12 +172,12 @@ module ImLost
     #
     # The given arguments can be any object instance or module or class.
     #
-    # @example trace method calls of an instance variable for a while
+    # @example Trace method calls of an instance variable for a while
     #   ImLost.trace(@file)
     #   # ...
     #   ImLost.untrace(@file)
     #
-    # @example temporary trace method calls
+    # @example Temporary trace method calls
     #   File.open('test.txt', 'w') do |file|
     #     ImLost.trace(file) do
     #       file << 'hello '
@@ -181,17 +187,17 @@ module ImLost
     #
     #   # output will look like
     #   #   > IO#<<(?)
-    #   #     /projects/test.rb:1
+    #   #     /examples/test.rb:1
     #   #   > IO#write(*)
-    #   #     /projects/test.rb:1
+    #   #     /examples/test.rb:1
     #   #   > IO#puts(*)
-    #   #     /projects/test.rb:2
+    #   #     /examples/test.rb:2
     #   #   > IO#write(*)
-    #   #     /projects/test.rb:2
+    #   #     /examples/test.rb:2
     #
     # @overload trace(*args)
     #   @param args [[Object]] one or more objects to be traced
-    #   @return [[Object]] the traced object(s)
+    #   @return [Array<Object>] the traced object(s)
     #   Start tracing the given objects.
     #   @see untrace
     #   @see untrace_all!
@@ -209,30 +215,37 @@ module ImLost
       args.size == 1 ? _trace_b(args[0], &block) : _trace_all_b(args, &block)
     end
 
+    #
+    # Test if a given object is currently traced.
+    #
+    # @param arg [Object] object to be tested
+    # @return [Boolean] wheter the object is beeing traced
+    #
+    def traced?(obj) = @trace.key?(obj)
+
     #
     # Stop tracing objects.
     #
-    # @example trace some objects for some code lines
-    #   traced_vars = ImLost.trace(@file, @client)
+    # @example Trace some objects for some code lines
+    #   traced_obj = ImLost.trace(@file, @client)
     #   # ...
-    #   ImLost.untrace(*traced_vars)
+    #   ImLost.untrace(*traced_obj)
     #
     # @see trace
     #
-    # @param args [[Object]] one or more objects which should not longer be
+    # @param args [[]Object]] one or more objects which should not longer be
     #   traced
-    # @return [[Object]] the object(s) which are not longer be traced
+    # @return [Array<Object>] the object(s) which are not longer be traced
     # @return [nil] when none of the objects was traced before
     #
     def untrace(*args)
-      ret = args.filter_map { @trace.delete(_1.__id__) ? _1 : nil }
-      args.size == 1 ? ret[0] : ret
+      args = args.filter_map { @trace.delete(_1) }
+      args.size < 2 ? args[0] : args
     end
 
     #
-    # Stop tracing any object.
-    # (When you are really lost and just like to stop tracing of all your
-    #   objects.)
+    # Stop tracing any object. When you are really lost and just like to stop
+    # tracing of all your objects.
     #
     # @see trace
     #
@@ -244,101 +257,140 @@ module ImLost
     end
 
     #
-    # Inspect internal variables.
+    # Inspect internal variables of a given object.
+    #
+    # @note The dedicated handling of `Fiber` is platform dependent!
+    #
+    # @example Inspect current instance variables
+    #   @a = 22
+    #   b = 20
+    #   c = @a + b
+    #   ImLost.vars(self)
+    #   # => print value of `@a`
+    #
+    # @example Inspect local variables
+    #   @a = 22
+    #   b = 20
+    #   c = @a + b
+    #   ImLost.vars(binding)
+    #   # => print values of `b` and 'c'
     #
-    # @overload vars(binding)
-    #   Inspect local variables of given Binding.
-    #   @param binding [Binding] which local variables should be print
-    #   @return [self] itself
+    # @example Inspect a thread's variables
+    #   th = Thread.new { th[:var1] += 20 }
+    #   th[:var1] = 22
+    #   ImLost.vars(th)
+    #   # => print value of `var1`
+    #   th.join
+    #   ImLost.vars(th)
     #
-    # @overload vars(object)
-    #   Inspect instance variables of given object.
-    #   @param object [Object] which instance variables should be print
-    #   @return [Object] the given object
+    # @example Inspect the current fiber's storage
+    #   Fiber[:var1] = 22
+    #   Fiber[:var2] = 20
+    #   Fiber[:var3] = Fiber[:var1] + Fiber[:var2]
+    #   ImLost.vars(Fiber.current)
+    #
+    # When the given object is
+    #
+    # - a `Binding` it prints the local variables of the binding
+    # - a `Thread` it prints the fiber-local and thread variables
+    # - the current `Fiber` it prints the fibers' storage
+    #
+    # Be aware that only the current fiber can be inspected.
+    #
+    # When the given object can not be inspected it prints an error message.
+    #
+    # @param object [Object] which instance variables should be print
+    # @return [Object] the given object
     #
     def vars(object)
-      traced = @trace.delete(object.__id__)
-      return _local_vars(object) if object.is_a?(Binding)
-      return unless object.respond_to?(:instance_variables)
-      _vars(object, Kernel.caller_locations(1, 1)[0])
+      out = LineStore.new
+      traced = @trace.delete(object)
+      return _local_vars(out, object) if Binding === object
+      out.location(Kernel.caller_locations(1, 1)[0])
+      return _thread_vars(out, object) if Thread === object
+      return _fiber_vars(out, object) if @fiber_support && Fiber === object
+      return _instance_vars(out, object) if defined?(object.instance_variables)
+      out << '  !!! unable to retrieve vars'
+      object
     ensure
       @trace[traced] = traced if traced
+      @output << out.to_s
     end
 
     private
 
-    def as_sig(prefix, info, args)
-      args = args.join(', ')
-      case info.self
-      when Class, Module
-        "#{prefix} #{info.self}.#{info.method_id}(#{args})"
-      else
-        "#{prefix} #{info.defined_class}##{info.method_id}(#{args})"
-      end
+    def _can_trace?(arg)
+      (id = arg.__id__) != __id__ && id != @output.__id__
     end
 
     def _trace(arg)
-      id = arg.__id__
-      @trace[id] = id if __id__ != id && @output.__id__ != id
+      @trace[arg] = arg if _can_trace?(arg)
       arg
     end
 
-    def _trace_all(args)
-      args.each do |arg|
-        arg = arg.__id__
-        @trace[arg] = arg if __id__ != arg && @output.__id__ != arg
-      end
-      args
-    end
+    def _trace_all(args) = args.each { @trace[_1] = _1 if _can_trace?(_1) }
 
     def _trace_b(arg)
-      id = arg.__id__
-      return yield(arg) if __id__ == id || @output.__id__ == id
+      return yield(arg) if @trace.key?(arg) || !_can_trace?(arg)
       begin
-        @trace[id] = id
+        @trace[arg] = arg
         yield(arg)
       ensure
-        @trace.delete(id) if id
+        @trace.delete(arg)
       end
     end
 
     def _trace_all_b(args)
-      ids =
+      temp =
         args.filter_map do |arg|
-          arg = arg.__id__
-          @trace[arg] = arg if __id__ != arg && @output.__id__ != arg
+          @trace[arg] = arg if !@trace.key?(arg) && _can_trace?(arg)
         end
       yield(args)
     ensure
-      ids.each { @trace.delete(_1) }
+      temp.each { @trace.delete(_1) }
     end
 
-    def _vars(obj, location)
-      @output.puts("= #{location.path}:#{location.lineno}")
-      vars = obj.instance_variables
-      if vars.empty?
-        @output.puts('  <no instance variables defined>')
-        return obj
+    def _local_vars(out, binding)
+      out << "* #{binding.source_location.join(':')}"
+      out.vars('local variables', binding.local_variables) do |name|
+        binding.local_variable_get(name)
       end
-      @output.puts('  instance variables:')
-      vars.sort!.each do |name|
-        @output.puts("  #{name}: #{obj.instance_variable_get(name).inspect}")
+      binding
+    end
+
+    def _thread_vars(out, thread)
+      out << "  #{_thread_identifier(thread)}"
+      flv = thread.keys
+      out.vars('fiber-local variables', flv) { thread[_1] } unless flv.empty?
+      out.vars('thread variables', thread.thread_variables) do |name|
+        thread.thread_variable_get(name)
       end
-      obj
+      thread
     end
 
-    def _local_vars(binding)
-      @output.puts("= #{binding.source_location.join(':')}")
-      vars = binding.local_variables
-      if vars.empty?
-        @output.puts('  <no local variables>')
-        return self
+    def _fiber_vars(out, fiber)
+      if Fiber.current == fiber
+        storage = fiber.storage || {}
+        out.vars('fiber storage', storage.keys) { storage[_1] }
+      else
+        out << '  !!! given Fiber is not the current Fiber' <<
+          "      #{fiber.inspect}"
       end
-      @output.puts('  local variables:')
-      vars.sort!.each do |name|
-        @output.puts("  #{name}: #{binding.local_variable_get(name).inspect}")
+      fiber
+    end
+
+    def _instance_vars(out, object)
+      out.vars('instance variables', object.instance_variables) do |n|
+        object.instance_variable_get(n)
       end
-      self
+      object
+    end
+
+    def _thread_identifier(thr)
+      state = thr.status
+      "#{state || (state.nil? ? 'aborted' : 'terminated')} Thread #{
+        defined?(thr.native_thread_id) ? thr.native_thread_id : thr.__id__
+      } #{thr.name}".rstrip
     end
   end
 
@@ -365,7 +417,7 @@ module ImLost
   #   # the timer with name 'my_test' is not longer valid now
   #
   #
-  # @example Use an anonymous timer (identified by ID)
+  # @example Use an anonymous timer
   #   tmr = ImLost.timer.create
   #
   #   # ...your code here...
@@ -397,12 +449,12 @@ module ImLost
     def count = ids.size
 
     # @attribute [r] empty?
-    # @return [Boolean] wheter the timer store is empty or not
+    # @return [Boolean] whether the timer store is empty or not
     def empty? = ids.empty?
 
     # @attribute [r] ids
     # @return [Array<Integer>] IDs of all registered timers
-    def ids = (@ll.keys.keep_if { _1.is_a?(Integer) })
+    def ids = (@ll.keys.keep_if { Integer === _1 })
 
     #
     # Create and register a new named or anonymous timer.
@@ -428,7 +480,7 @@ module ImLost
     #
     def delete(*id_or_names)
       id_or_names.flatten.each do |id|
-        if id.is_a?(Integer)
+        if Integer === id
           del = @ll.delete(id)
           @ll.delete(del[0]) if del
         else
@@ -440,7 +492,7 @@ module ImLost
     end
 
     #
-    # Print the ID or name and the runtime since timer was created.
+    # Print the ID or name and the runtime since a timer was created.
     # It includes the location.
     #
     # @param id_or_name [Integer, #to_s] the identifier or the name of the timer
@@ -449,10 +501,10 @@ module ImLost
     #   identifier or name
     #
     def [](id_or_name)
-      time = self.class.now
-      timer = @ll[id_or_name.is_a?(Integer) ? id_or_name : id_or_name.to_s]
+      now = self.class.now
+      timer = @ll[Integer === id_or_name ? id_or_name : id_or_name.to_s]
       raise(ArgumentError, "not a timer - #{id_or_name.inspect}") unless timer
-      @cb[timer[0], Kernel.caller_locations(1, 1)[0], time - timer[1]]
+      @cb[timer[0], Kernel.caller_locations(1, 1)[0], (now - timer[1]).round(4)]
       timer.__id__
     end
 
@@ -469,87 +521,132 @@ module ImLost
       nil
     end
 
-    # @!visibility private
+    private
+
     def initialize(&block)
       @cb = block
       @ll = {}
     end
   end
 
-  ARG_SIG = { rest: '*', keyrest: '**', block: '&' }.compare_by_identity.freeze
-  NO_NAME = { :* => 1, :** => 1, :& => 1 }.compare_by_identity.freeze
-  private_constant :ARG_SIG, :NO_NAME
+  class LineStore
+    def initialize(*lines) = (@lines = lines)
+    def to_s = (@lines << nil).join("\n")
+    def <<(str) = @lines << str
+    def location(loc) = @lines << "* #{loc.path}:#{loc.lineno}"
 
-  @trace = {}.compare_by_identity
-  @caller_locations = true
-  @output = $stderr.respond_to?(:puts) ? $stderr : STDERR
-
-  @timer =
-    TimerStore.new do |title, location, time|
-      @output.puts(
-        "T #{title}: #{time ? "#{time} sec." : 'created'}",
-        "  #{location.path}:#{location.lineno}"
-      )
+    def vars(kind, names)
+      return @lines << "  <no #{kind} defined>" if names.empty?
+      @lines << "  > #{kind}"
+      names.sort!.each { @lines << "    #{_1}: #{yield(_1).inspect}" }
     end
-  TimerStore.private_class_method(:new)
+  end
+  private_constant :LineStore
 
-  @trace_calls = [
-    TracePoint.new(:c_call) do |tp|
-      next if !@trace.key?(tp.self.__id__) || tp.path == __FILE__
-      @output.puts(as_sig('>', tp, tp.parameters.map { ARG_SIG[_1[0]] || '?' }))
-      @output.puts("  #{tp.path}:#{tp.lineno}") if @caller_locations
-    end,
-    TracePoint.new(:call) do |tp|
-      next if !@trace.key?(tp.self.__id__) || tp.path == __FILE__
-      ctx = tp.binding
-      @output.puts(
-        as_sig(
-          '>',
-          tp,
-          tp.parameters.map do |kind, name|
-            next name if NO_NAME.key?(name)
-            "#{ARG_SIG[kind]}#{ctx.local_variable_get(name).inspect}"
-          end
-        )
-      )
-      next unless @caller_locations
-      loc = ctx.eval('caller_locations(4,1)')[0]
-      @output.puts("  #{loc.path}:#{loc.lineno}")
-    end
-  ]
-
-  @trace_results = [
-    TracePoint.new(:c_return) do |tp|
-      next if !@trace.key?(tp.self.__id__) || tp.path == __FILE__
-      @output.puts(as_sig('<', tp, tp.parameters.map { ARG_SIG[_1[0]] || '?' }))
-      @output.puts("  = #{tp.return_value.inspect}")
-    end,
-    TracePoint.new(:return) do |tp|
-      next if !@trace.key?(tp.self.__id__) || tp.path == __FILE__
-      ctx = tp.binding
-      @output.puts(
-        as_sig(
-          '<',
-          tp,
-          tp.parameters.map do |kind, name|
-            next name if NO_NAME.key?(name)
-            "#{ARG_SIG[kind]}#{ctx.local_variable_get(name).inspect}"
-          end
-        )
-      )
-      @output.puts("  = #{tp.return_value.inspect}")
+  class CCallLineStore < LineStore
+    def initialize(prefix, info, include_location)
+      @info = info
+      sig = "#{info.method_id}(#{args.join(', ')})"
+      case info.self
+      when Class, Module
+        super("#{prefix} #{info.self}.#{sig}")
+      else
+        super("#{prefix} #{info.defined_class}##{sig}")
+      end
+      return unless include_location
+      loc = location
+      path = loc.path
+      path = path[10..-2] if path.start_with?('<internal:')
+      @lines << "  #{path}:#{loc.lineno}"
     end
-  ]
 
-  supported = RUBY_VERSION.to_f < 3.3 ? %i[raise] : %i[raise rescue]
+    def location = @info
+
+    def args
+      argc = -1
+      @info.parameters.map do |kind, _|
+        argc += 1
+        CARG_TYPE[kind] || "arg#{argc}"
+      end
+    end
+
+    CARG_TYPE = {
+      rest: '*args',
+      keyrest: '**kwargs',
+      block: '&block'
+    }.compare_by_identity.freeze
+  end
+  private_constant :CCallLineStore
+
+  class RbCallLineStore < CCallLineStore
+    def initialize(prefix, info, include_location)
+      @ctx = info.binding
+      super
+      @ctx = nil
+    end
+
+    def location
+      locations = @ctx.eval('caller_locations(7,3)')
+      unless locations[1].path.start_with?('<internal:prelude')
+        return locations[1]
+      end
+      locations[0].path.start_with?('<internal:') ? locations[0] : locations[2]
+    end
+
+    def args
+      @info.parameters.map do |kind, name|
+        next name if ARG_SKIP.key?(name)
+        "#{ARG_TYPE[kind]}#{@ctx.local_variable_get(name).inspect}"
+      end
+    end
+
+    ARG_TYPE = { rest: :*, keyrest: :**, block: :& }.compare_by_identity.freeze
+    ARG_SKIP = ARG_TYPE.invert.compare_by_identity.freeze
+  end
+  private_constant :RbCallLineStore
+
+  @trace_calls =
+    TracePoint.new(:c_call, :call) do |tp|
+      next if !@trace.key?(tp.self) || tp.path == __FILE__
+      klass = tp.event == :c_call ? CCallLineStore : RbCallLineStore
+      @output << klass.new('>', tp, @caller_locations).to_s
+    end
+
+  @trace_results =
+    TracePoint.new(:c_return, :return) do |tp|
+      next if !@trace.key?(tp.self) || tp.path == __FILE__
+      klass = tp.event == :c_return ? CCallLineStore : RbCallLineStore
+      out = klass.new('<', tp, @caller_locations)
+      out << "  = #{tp.return_value.inspect}"
+      @output << out.to_s
+    end
+
+  exception_support = RUBY_VERSION.to_f < 3.3 ? %i[raise] : %i[raise rescue]
   @trace_exceptions =
-    TracePoint.new(*supported) do |tp|
-      ex = tp.raised_exception.inspect
-      @output.puts(
-        "#{tp.event == :raise ? 'x' : '!'} #{ex[0] == '#' ? ex[2..-2] : ex}"
-      )
-      @output.puts("  #{tp.path}:#{tp.lineno}") if @exception_locations
+    TracePoint.new(*exception_support) do |tp|
+      ex = tp.raised_exception
+      mark, parent = tp.event == :rescue ? ['!', ex.cause] : 'x'
+      ex = ex.inspect
+      out = LineStore.new("#{mark} #{ex[0] == '#' ? ex[2..-2] : ex}")
+      while parent
+        ex = parent.inspect
+        out << "  [#{ex[0] == '#' ? ex[2..-2] : ex}]"
+        parent = parent.cause
+      end
+      out << "  #{tp.path}:#{tp.lineno}" if @exception_locations
+      @output << out.to_s
     end
 
-  self.trace_calls = true
+  @timer = TimerStore.new { |title, location, time| @output << <<~TIMER_MSG }
+    T #{title}: #{time ? "#{time} sec." : 'created'}
+      #{location.path}:#{location.lineno}
+  TIMER_MSG
+  TimerStore.private_class_method(:new)
+
+  @fiber_support = !!defined?(Fiber.current.storage)
+
+  @output = STDERR
+  @trace = {}.compare_by_identity
+  @caller_locations = @exception_locations = true
+  self.trace_calls = self.trace_results = true
 end

metadata

@@ -1,14 +1,13 @@
 --- !ruby/object:Gem::Specification
 name: im-lost
 version: !ruby/object:Gem::Version
-  version: 1.1.0
+  version: 1.2.1
 platform: ruby
 authors:
 - Mike Blumtritt
-autorequire:
 bindir: bin
 cert_chain: []
-date: 2024-05-29 00:00:00.000000000 Z
+date: 2025-01-30 00:00:00.000000000 Z
 dependencies: []
 description: |
   If you have overlooked something again and don't really understand what
@@ -19,7 +18,6 @@ description: |
   ImLost helps you by analyzing function calls of objects, informing you
   about exceptions and logging your way through your code. In short, ImLost
   is your debugging helper!
-email:
 executables: []
 extensions: []
 extra_rdoc_files:
@@ -42,7 +40,6 @@ metadata:
   bug_tracker_uri: https://github.com/mblumtritt/im-lost/issues
   documentation_uri: https://rubydoc.info/gems/im-lost
   rubygems_mfa_required: 'true'
-post_install_message:
 rdoc_options: []
 require_paths:
 - lib
@@ -57,8 +54,7 @@ required_rubygems_version: !ruby/object:Gem::Requirement
     - !ruby/object:Gem::Version
       version: '0'
 requirements: []
-rubygems_version: 3.5.11
-signing_key:
+rubygems_version: 3.6.3
 specification_version: 4
 summary: Your debugging helper.
 test_files: []