dbg_tags 1.1.0 → 1.1.1

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: aaad620ad2b1c43ee4fad44431ff99f22d5fe07f66dbb68eb11247246d99083e
-  data.tar.gz: e33c27bb2b870e18bd4a910ef0918db018174f89eb3aaf95c2619bca74e0dee6
+  metadata.gz: d23d3bfe9f58ffa0b26481b6aa296208c6febff871649c197506ee836a54f36e
+  data.tar.gz: 669f9963e7dcdb9bffceabff6c7f45ba48d7b75c0d7d7293d9c65d16d772eb1d
 SHA512:
-  metadata.gz: 660f4307b55f0c7b0ff5e029916b436f000346c31cca80e1956eaada5a71599a2e1e21f654bc0d8cd6dfb086e0489445a4f4385394ec4f558e8f8284a9aaee59
-  data.tar.gz: 5be152c20aa033ba1372d132b7f514a0ddbd5fe5da459148e9790f120ad5c342564e24402c344cfb61aee4e437aa16238380b13f9a86520fe624242f1c4ec00b
+  metadata.gz: 1b2f84b3808a68011ae0a489c294e20f81d10ebc8a99f28d620191dd862b9ae399046ddfd5e9952334730377a11c6b49c8912aaca3a91c9617b24838899b5785
+  data.tar.gz: db37f12455aef1520cd5a0c1e93dbe2f352b07f3cd345fc92b367e26da649b6eb817e66550b90d64a46ebc9fa7feeb971edd0344292854b756f7e2bff23fab1d

data/lib/dbg_tags.rb

@@ -130,7 +130,7 @@ module Tag
     #
     # enable performs a merge with an existing enable.
     def enable *features, **opts
-      org_enabled = @enabled.dup # to restore the state at the end (unused unless block_given)
+      org_enabled = @enabled.clone # to restore the state at the end (unused unless block_given)
       features.each do |feature|
         case feature
         when 0..5 # not a feature, apply to :generic
@@ -163,6 +163,21 @@ module Tag
       end # block_given?
     end # GlobalState.enable
 
+    # @param state [{Symbol=>0..5}] As returned by Tag.state (aka Tag.enabled)
+    # A block can be given to restore the original state afterwards.
+    # restore_state overwrites any existing enabled feature.
+    def restore_state state
+      org_enabled = @enabled.clone # to restore the state at the end (unused unless block_given)
+      @enabled = state.dup
+      if block_given?
+        begin
+          yield
+        ensure
+          @enabled = org_enabled
+        end # ensure
+      end # block_given?
+    end # GlobalState.restore_state
+
     # @param feature [Symbol]
     # @return [0..5] Current effective level for feature.
     def level feature
@@ -240,8 +255,12 @@ module Tag
     # @see GlobalState.enable
     def enable(...); global_state.enable(...); end
 
+    # @see GlobalState.restore_state
+    def restore_state(...); global_state.restore_state(...); end
+
     # @return [{Symbol=>0..5}] Keys are the features
     def enabled; global_state.enabled; end
+    alias state enabled
 
     # @return [IO] By default this is STDERR
     def stream; global_state.stream; end

data/spec/01_tag_spec.rb

@@ -1,6 +1,8 @@
 
-require 'simplecov'
-SimpleCov.start
+if t = ENV['USE_SIMPLECOV'] and !t.empty?
+  require 'simplecov'
+  SimpleCov.start { add_filter '/spec/' }
+end
 
 require_relative '../lib/dbg_tags'
 
@@ -9,7 +11,7 @@ class Pathological
     Tag.trc { "HERE in #{self}!" }
     super
   end # to_s
-end 
+end # class Pathological
 
 describe 'tag' do
   before :each do
@@ -290,6 +292,61 @@ describe 'tag' do
     end
   end # it
 
+  it 'each fiber has a private tag system (tag_302)' do
+    Tag.enable threads: :trc do
+      expect(Tag.enabled).to eq({threads: 3})
+      t1 = Fiber.new do
+        expect(Tag.enabled).to eq({})
+        Tag.enable threads: :log do
+          expect(Tag.enabled).to eq({threads: 2})
+          Tag.trc(:threads) {
+            expect(Tag.inside?).to be true
+            sleep 1
+            nil
+          }
+        end
+      end 
+      t1.resume
+      expect(Tag.enabled).to eq({threads: 3})
+    end
+  end # it
+
+  it 'does allow restore_state to transfer state through a Fiber barrier (tag_310)' do
+    did_something = false
+    Tag.enable example: :dtl, fiber: :trc do
+      state = Tag.state # same as Tag.enabled
+      expect(state).to eq({example: Tag::DTL, fiber: Tag::TRC})
+      t1 = Fiber.new do
+        expect(Tag.state).to eq({})
+        Tag.enable foo: :trc
+        Tag.restore_state state do
+          expect(Tag.state).to eq({example: Tag::DTL, fiber: Tag::TRC})
+          did_something = true
+        end
+      end
+      t1.resume
+      expect(Tag.state).to eq({example: Tag::DTL, fiber: Tag::TRC})
+    end # enable
+    expect(did_something).to be true
+  end # it
+
+  it 'does allow a nil-state to transfer state through a Fiber barrier (tag_311)' do
+    did_something = false
+    state = Tag.state
+    expect(state).to eq({})
+    t1 = Fiber.new do
+      expect(Tag.state).to eq({})
+      Tag.enable foo: :trc
+      Tag.restore_state state do
+        expect(Tag.state).to eq({})
+        did_something = true
+      end
+    end
+    t1.resume
+    expect(Tag.state).to eq({})
+    expect(did_something).to be true
+  end # it
+
   it 'does not allow levels out of range (tag_900)' do
     expect do
       Tag.enable nest: 24

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: dbg_tags
 version: !ruby/object:Gem::Version
-  version: 1.1.0
+  version: 1.1.1
 platform: ruby
 authors:
 - Eugene Brazwick
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2024-05-06 00:00:00.000000000 Z
+date: 2024-06-04 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: rspec