judges 0.2.0 → 0.4.0

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: f36d80279b095db31b037136ab951bbc395bd5b5d74922149706ab8fe404381b
-  data.tar.gz: c0e1c403f0857e5c1764c8a0cf620761c36bf9e92dbcf9f4c4f2dbc420755651
+  metadata.gz: 2cc71c6f27206802eb89caac6ea4cf95558c5f36f484efea771e5ad5c442084d
+  data.tar.gz: 717c6de821765a54a916dc2eabafaf63827fd5a522584c7af866f5beea5475c7
 SHA512:
-  metadata.gz: d729a939b8a4b5894122d3e899487b8838dc92db04176f7ab3cb843d401b05edfd081744c5979c9169d98f78070ab0637f54b1f6d3623c60086e70b8666398f7
-  data.tar.gz: 15246686f5279034d4a57d0050931d93ebe6546c807e30e2d1bc0dd8611b7b8edfe6cd552272db3103f1001947078aa2b49b8a58935b1831fde503e509eef3ec
+  metadata.gz: 895ea9f8d9b1527113c1a33d1c5e5a5d18b16994d00593d7f3eaf5c135c9a9eb9787c7ca969bcbced5b025eef8ff03e3927ecc90d3ee0738b9cee3cf1b948799
+  data.tar.gz: 2c86328e14c85f7685fb46b8cf78bcac87058725db51b57ca447186c61cbf5650dee93570c7000c11105792a14d8b8879d54e861325c1f12a97f200b09e33bb3

data/Gemfile.lock

@@ -9,14 +9,15 @@ PATH
       iri (~> 0.8)
       loog (~> 0.2)
       nokogiri (~> 1.10)
+      retries (~> 0.0)
       typhoeus (~> 1.3)
 
 GEM
   remote: https://rubygems.org/
   specs:
-    actionpack (7.1.3.3)
-      actionview (= 7.1.3.3)
-      activesupport (= 7.1.3.3)
+    actionpack (7.1.3.4)
+      actionview (= 7.1.3.4)
+      activesupport (= 7.1.3.4)
       nokogiri (>= 1.8.5)
       racc
       rack (>= 2.2.4)
@@ -24,13 +25,13 @@ GEM
       rack-test (>= 0.6.3)
       rails-dom-testing (~> 2.2)
       rails-html-sanitizer (~> 1.6)
-    actionview (7.1.3.3)
-      activesupport (= 7.1.3.3)
+    actionview (7.1.3.4)
+      activesupport (= 7.1.3.4)
       builder (~> 3.1)
       erubi (~> 1.11)
       rails-dom-testing (~> 2.2)
       rails-html-sanitizer (~> 1.6)
-    activesupport (7.1.3.3)
+    activesupport (7.1.3.4)
       base64
       bigdecimal
       concurrent-ruby (~> 1.0, >= 1.0.2)
@@ -84,7 +85,7 @@ GEM
     erubi (1.12.0)
     ethon (0.16.0)
       ffi (>= 1.15.0)
-    factbase (0.0.41)
+    factbase (0.0.42)
       json (~> 2.7)
       loog (~> 0.2)
       nokogiri (~> 1.10)
@@ -92,6 +93,7 @@ GEM
     ffi (1.17.0-aarch64-linux-gnu)
     ffi (1.17.0-arm-linux-gnu)
     ffi (1.17.0-arm64-darwin)
+    ffi (1.17.0-x64-mingw-ucrt)
     ffi (1.17.0-x86-linux-gnu)
     ffi (1.17.0-x86_64-darwin)
     ffi (1.17.0-x86_64-linux-gnu)
@@ -121,6 +123,8 @@ GEM
       racc (~> 1.4)
     nokogiri (1.16.5-arm64-darwin)
       racc (~> 1.4)
+    nokogiri (1.16.5-x64-mingw-ucrt)
+      racc (~> 1.4)
     nokogiri (1.16.5-x86-linux)
       racc (~> 1.4)
     nokogiri (1.16.5-x86_64-darwin)
@@ -150,9 +154,9 @@ GEM
     rails-html-sanitizer (1.6.0)
       loofah (~> 2.21)
       nokogiri (~> 1.14)
-    railties (7.1.3.3)
-      actionpack (= 7.1.3.3)
-      activesupport (= 7.1.3.3)
+    railties (7.1.3.4)
+      actionpack (= 7.1.3.4)
+      activesupport (= 7.1.3.4)
       irb
       rackup (>= 1.0.0)
       rake (>= 12.2)
@@ -165,6 +169,7 @@ GEM
     regexp_parser (2.9.2)
     reline (0.5.8)
       io-console (~> 0.5)
+    retries (0.0.5)
     rexml (3.2.8)
       strscan (>= 3.0.9)
     rspec-core (3.13.0)
@@ -244,6 +249,7 @@ PLATFORMS
   aarch64-linux
   arm-linux
   arm64-darwin
+  x64-mingw-ucrt
   x86-linux
   x86_64-darwin
   x86_64-linux

data/fixtures/try/try.rb

@@ -20,7 +20,7 @@
 # OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
 # SOFTWARE.
 
-each_once($fb, "(and (exists number) (lt time #{Time.now.utc.iso8601}))") do |f|
+$fb.query("(and (exists number) (lt time #{Time.now.utc.iso8601}))").each do |f|
   n = $fb.insert
   n.guess = f.number
 end

data/judges.gemspec

@@ -26,7 +26,7 @@ Gem::Specification.new do |s|
   s.required_rubygems_version = Gem::Requirement.new('>= 0') if s.respond_to? :required_rubygems_version=
   s.required_ruby_version = '>=3.2'
   s.name = 'judges'
-  s.version = '0.2.0'
+  s.version = '0.4.0'
   s.license = 'MIT'
   s.summary = 'Command-Line Tool for a Factbase'
   s.description =
@@ -42,13 +42,14 @@ Gem::Specification.new do |s|
   s.executables = s.files.grep(%r{^bin/}) { |f| File.basename(f) }
   s.rdoc_options = ['--charset=UTF-8']
   s.extra_rdoc_files = ['README.md', 'LICENSE.txt']
-  s.add_runtime_dependency 'backtrace', '~> 0.3'
+  s.add_runtime_dependency 'backtrace', '~>0.3'
   s.add_runtime_dependency 'concurrent-ruby', '1.2.3'
   s.add_runtime_dependency 'factbase', '~>0.0'
   s.add_runtime_dependency 'gli', '~>2.21'
   s.add_runtime_dependency 'iri', '~>0.8'
   s.add_runtime_dependency 'loog', '~>0.2'
-  s.add_runtime_dependency 'nokogiri', '~> 1.10'
+  s.add_runtime_dependency 'nokogiri', '~>1.10'
+  s.add_runtime_dependency 'retries', '~>0.0'
   s.add_runtime_dependency 'typhoeus', '~>1.3'
   s.metadata['rubygems_mfa_required'] = 'true'
 end

data/lib/judges/baza.rb

@@ -21,6 +21,7 @@
 # SOFTWARE.
 
 require 'typhoeus'
+require 'retries'
 require 'iri'
 require 'loog'
 require_relative '../judges'
@@ -45,17 +46,20 @@ class Judges::Baza
   def push(name, data)
     id = 0
     elapsed(@loog) do
-      ret = Typhoeus::Request.put(
-        home.append('push').append(name).to_s,
-        body: data,
-        headers: headers.merge(
-          'Content-Type' => 'application/octet-stream',
-          'Content-Length' => data.size
-        ),
-        connecttimeout: @timeout,
-        timeout: @timeout
-      )
-      check_code(ret)
+      ret = with_retries do
+        checked(
+          Typhoeus::Request.put(
+            home.append('push').append(name).to_s,
+            body: data,
+            headers: headers.merge(
+              'Content-Type' => 'application/octet-stream',
+              'Content-Length' => data.size
+            ),
+            connecttimeout: @timeout,
+            timeout: @timeout
+          )
+        )
+      end
       id = ret.body.to_i
       throw :"Pushed #{data.size} bytes to #{@host}, job ID is ##{id}"
     end
@@ -79,7 +83,7 @@ class Judges::Baza
             f.write(chunk)
           end
           request.run
-          check_code(request.response)
+          checked(request.response)
         end
         data = File.binread(file)
         throw :"Pulled #{data.size} bytes of job ##{id} factbase at #{@host}"
@@ -92,11 +96,14 @@ class Judges::Baza
   def finished?(id)
     finished = false
     elapsed(@loog) do
-      ret = Typhoeus::Request.get(
-        home.append('finished').append(id).to_s,
-        headers:
-      )
-      check_code(ret)
+      ret = with_retries do
+        checked(
+          Typhoeus::Request.get(
+            home.append('finished').append(id).to_s,
+            headers:
+          )
+        )
+      end
       finished = ret.body == 'yes'
       throw :"The job ##{id} is #{finished ? '' : 'not yet '}finished at #{@host}"
     end
@@ -106,11 +113,14 @@ class Judges::Baza
   def recent(name)
     job = 0
     elapsed(@loog) do
-      ret = Typhoeus::Request.get(
-        home.append('recent').append("#{name}.txt").to_s,
-        headers:
-      )
-      check_code(ret)
+      ret = with_retries do
+        checked(
+          Typhoeus::Request.get(
+            home.append('recent').append("#{name}.txt").to_s,
+            headers:
+          )
+        )
+      end
       job = ret.body.to_i
       throw :"The recent \"#{name}\" job's ID is ##{job} at #{@host}"
     end
@@ -120,11 +130,12 @@ class Judges::Baza
   def name_exists?(name)
     exists = 0
     elapsed(@loog) do
-      ret = Typhoeus::Request.get(
-        home.append('exists').append(name).to_s,
-        headers:
+      ret = checked(
+        Typhoeus::Request.get(
+          home.append('exists').append(name).to_s,
+          headers:
+        )
       )
-      check_code(ret)
       exists = ret.body == 'yes'
       throw :"The name \"#{name}\" #{exists ? 'exists' : "doesn't exist"} at #{@host}"
     end
@@ -148,14 +159,14 @@ class Judges::Baza
       .scheme(@ssl ? 'https' : 'http')
   end
 
-  def check_code(ret, allowed = [200])
+  def checked(ret, allowed = [200])
     allowed = [allowed] unless allowed.is_a?(Array)
     mtd = (ret.request.original_options[:method] || '???').upcase
     url = ret.effective_url
     log = "#{mtd} #{url} -> #{ret.code}"
     if allowed.include?(ret.code)
       @loog.debug(log)
-      return
+      return ret
     end
     @loog.debug("#{log}\n  #{(ret.headers || {}).map { |k, v| "#{k}: #{v}" }.join("\n  ")}")
     msg =

data/lib/judges/commands/update.rb

@@ -56,9 +56,9 @@ class Judges::Update
         if c > 1
           @loog.info("\n\nStarting cycle ##{c}#{opts['max-cycles'] ? " (out of #{opts['max-cycles']})" : ''}...")
         end
-        diff = cycle(opts, judges, fb, options)
+        churn = cycle(opts, judges, fb, options)
         impex.export(fb)
-        if diff.zero?
+        if churn.zero?
           @loog.info("The update cycle ##{c} has made no changes to the factbase, let's stop")
           break
         end
@@ -66,36 +66,50 @@ class Judges::Update
           @loog.info("Too many cycles already, as set by --max-cycles=#{opts['max-cycles']}, breaking")
           break
         end
-        @loog.info(
-          "By #{diff.abs} fact(s) the factbase " \
-          "#{diff.positive? ? 'increased' : 'decreased'} " \
-          "its size at the cycle ##{c}"
-        )
+        @loog.info("At the cycle #{c}, the factbase was modified by #{churn} fact(s)")
       end
       throw :"Update finished in #{c} cycle(s), #{format('+%d', fb.size - before)} fact(s)"
     end
   end
 
+  # How many facts were modified.
+  class Churn
+    attr_reader :added, :removed
+
+    def initialize(added, removed)
+      @added = added
+      @removed = removed
+    end
+
+    def to_s
+      "#{format('+%d', @added)}/#{format('+%d', -@removed)}"
+    end
+
+    def zero?
+      @added.zero? && @removed.zero?
+    end
+
+    def +(other)
+      Churn.new(@added + other.added, @removed + other.removed)
+    end
+  end
+
   private
 
+  # Run all judges in a full cycle, one by one.
+  # @return [Churn] How many modifications have been made
   def cycle(opts, judges, fb, options)
     errors = []
-    diff = 0
+    churn = Churn.new(0, 0)
     global = {}
     elapsed(@loog) do
       done = judges.each_with_index do |p, i|
-        local = {}
-        @loog.info("👉 Running #{p.name} (##{i}) at #{p.dir.to_rel}...")
-        before = fb.size
-        begin
-          p.run(fb, global, local, options)
-        rescue StandardError, SyntaxError => e
-          @loog.warn(Backtrace.new(e))
-          errors << p.script
-        end
-        after = fb.size
-        @loog.info("👍 The judge #{p.dir.to_rel} added #{after - before} facts") if after > before
-        diff += after - before
+        @loog.info("\n👉 Running #{p.name} (##{i}) at #{p.dir.to_rel}...")
+        churn += one_judge(fb, p, global, options)
+        @loog.info("👍 The judge #{p.name} modified #{churn} facts")
+      rescue StandardError, SyntaxError => e
+        @loog.warn(Backtrace.new(e))
+        errors << p.script
       end
       throw :"👍 #{done} judge(s) processed" if errors.empty?
       throw :"❌ #{done} judge(s) processed with #{errors.size} errors"
@@ -104,6 +118,21 @@ class Judges::Update
       raise "Failed to update correctly (#{errors.size} errors)" unless opts['quiet']
       @loog.info('Not failing because of the --quiet flag provided')
     end
-    diff
+    churn
+  end
+
+  # Run a single judge.
+  # @return [Churn] How many modifications have been made
+  def one_judge(fb, judge, global, options)
+    local = {}
+    before = fb.size
+    judge.run(fb, global, local, options)
+    after = fb.size
+    diff = after - before
+    if diff.positive?
+      Churn.new(diff, 0)
+    else
+      Churn.new(0, diff)
+    end
   end
 end

data/lib/judges/judge.rb

@@ -23,8 +23,6 @@
 require_relative '../judges'
 require_relative '../judges/to_rel'
 require_relative '../judges/elapsed'
-require_relative '../judges/fb/once'
-require_relative '../judges/fb/if_absent'
 
 # A single judge.
 # Author:: Yegor Bugayenko (yegor256@gmail.com)

data/lib/judges.rb

@@ -25,5 +25,5 @@
 # Copyright:: Copyright (c) 2024 Yegor Bugayenko
 # License:: MIT
 module Judges
-  VERSION = '0.2.0'
+  VERSION = '0.4.0'
 end

data/test/test_judge.rb

@@ -55,14 +55,6 @@ class TestPack < Minitest::Test
     end
   end
 
-  def test_with_supplemenary_functions
-    Dir.mktmpdir do |d|
-      File.write(File.join(d, 'x.rb'), 'each_once($fb, "(always)").to_a')
-      judge = Judges::Judge.new(d, nil, Loog::NULL)
-      judge.run(Factbase.new, {}, {}, {})
-    end
-  end
-
   def test_passes_local_vars_between_tests
     Dir.mktmpdir do |d|
       File.write(
@@ -93,21 +85,6 @@ class TestPack < Minitest::Test
     end
   end
 
-  def test_with_library
-    Dir.mktmpdir do |d|
-      dir = File.join(d, 'judges')
-      FileUtils.mkdir_p(dir)
-      File.write(File.join(dir, 'x.rb'), '$fb.insert.bar = $foo; each_once($fb, "(always)").to_a')
-      lib = File.join(d, 'lib')
-      FileUtils.mkdir_p(lib)
-      File.write(File.join(lib, 'y.rb'), '$foo = 42')
-      judge = Judges::Judge.new(dir, lib, Loog::NULL)
-      fb = Factbase.new
-      judge.run(fb, {}, {}, {})
-      assert_equal(42, fb.query('(always)').each.to_a.first.bar)
-    end
-  end
-
   def test_with_broken_ruby_syntax
     assert_raises do
       Dir.mktmpdir do |d|

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: judges
 version: !ruby/object:Gem::Version
-  version: 0.2.0
+  version: 0.4.0
 platform: ruby
 authors:
 - Yegor Bugayenko
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2024-06-04 00:00:00.000000000 Z
+date: 2024-06-06 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: backtrace
@@ -108,6 +108,20 @@ dependencies:
     - - "~>"
       - !ruby/object:Gem::Version
         version: '1.10'
+- !ruby/object:Gem::Dependency
+  name: retries
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '0.0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '0.0'
 - !ruby/object:Gem::Dependency
   name: typhoeus
   requirement: !ruby/object:Gem::Requirement
@@ -187,8 +201,6 @@ files:
 - lib/judges/commands/trim.rb
 - lib/judges/commands/update.rb
 - lib/judges/elapsed.rb
-- lib/judges/fb/if_absent.rb
-- lib/judges/fb/once.rb
 - lib/judges/impex.rb
 - lib/judges/judge.rb
 - lib/judges/judges.rb
@@ -205,8 +217,6 @@ files:
 - test/commands/test_test.rb
 - test/commands/test_trim.rb
 - test/commands/test_update.rb
-- test/fb/test_if_absent.rb
-- test/fb/test_once.rb
 - test/test__helper.rb
 - test/test_baza.rb
 - test/test_categories.rb

data/lib/judges/fb/if_absent.rb

@@ -1,74 +0,0 @@
-# frozen_string_literal: true
-
-# Copyright (c) 2024 Yegor Bugayenko
-#
-# Permission is hereby granted, free of charge, to any person obtaining a copy
-# of this software and associated documentation files (the 'Software'), to deal
-# in the Software without restriction, including without limitation the rights
-# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
-# copies of the Software, and to permit persons to whom the Software is
-# furnished to do so, subject to the following conditions:
-#
-# The above copyright notice and this permission notice shall be included in all
-# copies or substantial portions of the Software.
-#
-# THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
-# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
-# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
-# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
-# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
-# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
-# SOFTWARE.
-
-require 'judges'
-require 'time'
-
-# Injects a fact if it's absent in the factbase.
-def if_absent(fb)
-  attrs = {}
-  f = Judges::Accumulator.new(attrs)
-  yield f
-  q = attrs.map do |k, v|
-    vv = v.to_s
-    if v.is_a?(String)
-      vv = "'#{vv.gsub('"', '\\\\"').gsub("'", "\\\\'")}'"
-    elsif v.is_a?(Time)
-      vv = v.utc.iso8601
-    end
-    "(eq #{k} #{vv})"
-  end.join(' ')
-  q = "(and #{q})"
-  return unless fb.query(q).each.to_a.empty?
-  n = fb.insert
-  attrs.each { |k, v| n.send("#{k}=", v) }
-  n
-end
-
-# Predents to be a fact, just accumulating all attribute sets.
-# Author:: Yegor Bugayenko (yegor256@gmail.com)
-# Copyright:: Copyright (c) 2024 Yegor Bugayenko
-# License:: MIT
-class Judges::Accumulator
-  def initialize(map)
-    @map = map
-  end
-
-  def method_missing(*args)
-    k = args[0]
-    if k.end_with?('=')
-      @map[k[0..-2].to_sym] = args[1]
-    else
-      @map[k.to_sym]
-    end
-  end
-
-  # rubocop:disable Style/OptionalBooleanParameter
-  def respond_to?(_method, _include_private = false)
-    # rubocop:enable Style/OptionalBooleanParameter
-    true
-  end
-
-  def respond_to_missing?(_method, _include_private = false)
-    true
-  end
-end

data/lib/judges/fb/once.rb

@@ -1,54 +0,0 @@
-# frozen_string_literal: true
-
-# Copyright (c) 2024 Yegor Bugayenko
-#
-# Permission is hereby granted, free of charge, to any person obtaining a copy
-# of this software and associated documentation files (the 'Software'), to deal
-# in the Software without restriction, including without limitation the rights
-# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
-# copies of the Software, and to permit persons to whom the Software is
-# furnished to do so, subject to the following conditions:
-#
-# The above copyright notice and this permission notice shall be included in all
-# copies or substantial portions of the Software.
-#
-# THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
-# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
-# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
-# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
-# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
-# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
-# SOFTWARE.
-
-require 'judges'
-require 'factbase/tuples'
-
-# Returns a decorated global factbase, which only touches facts once.
-def each_once(fb, query, judge: $judge)
-  return to_enum(__method__, fb, query, judge:) unless block_given?
-  q = "(and #{query} (not (eq seen '#{judge}')))"
-  fb.query(q).each do |f|
-    yield f
-    f.seen = judge
-  end
-end
-
-# Returns a decorated global factbase, which only touches a tuple once.
-def each_tuple_once(fb, *queries, judge: $judge)
-  return to_enum(__method__, fb, *queries, judge:) unless block_given?
-  qq = queries.map { |q| "(and #{q} (not (eq seen '#{judge}')))" }
-  Factbase::Tuples.new(fb, qq).each do |fs|
-    yield fs
-    fs.each do |f|
-      f.seen = judge
-    end
-  end
-end
-
-def each_tuple_once_txn(fb, *queries, judge: $judge)
-  fb.txn do |fbt|
-    each_tuple_once(fb, *queries, judge:) do |fs|
-      yield [fbt] + fs
-    end
-  end
-end

data/test/fb/test_if_absent.rb

@@ -1,103 +0,0 @@
-# frozen_string_literal: true
-
-# Copyright (c) 2024 Yegor Bugayenko
-#
-# Permission is hereby granted, free of charge, to any person obtaining a copy
-# of this software and associated documentation files (the 'Software'), to deal
-# in the Software without restriction, including without limitation the rights
-# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
-# copies of the Software, and to permit persons to whom the Software is
-# furnished to do so, subject to the following conditions:
-#
-# The above copyright notice and this permission notice shall be included in all
-# copies or substantial portions of the Software.
-#
-# THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
-# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
-# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
-# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
-# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
-# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
-# SOFTWARE.
-
-require 'minitest/autorun'
-require 'tmpdir'
-require 'factbase'
-require 'factbase/looged'
-require 'loog'
-require_relative '../../lib/judges'
-require_relative '../../lib/judges/fb/if_absent'
-
-# Test.
-# Author:: Yegor Bugayenko (yegor256@gmail.com)
-# Copyright:: Copyright (c) 2024 Yegor Bugayenko
-# License:: MIT
-class TestIfAbsent < Minitest::Test
-  def test_ignores
-    fb = Factbase.new
-    fb.insert.foo = 'hello dude'
-    n = if_absent(fb) do |f|
-      f.foo = 'hello dude'
-    end
-    assert(n.nil?)
-  end
-
-  def test_ignores_with_time
-    fb = Factbase.new
-    t = Time.now
-    fb.insert.foo = t
-    n = if_absent(fb) do |f|
-      f.foo = t
-    end
-    assert(n.nil?)
-  end
-
-  def test_injects
-    fb = Factbase.new
-    n = if_absent(fb) do |f|
-      f.foo = 42
-    end
-    assert_equal(42, n.foo)
-  end
-
-  def test_injects_and_reads
-    if_absent(Factbase.new) do |f|
-      f.foo = 42
-      assert_equal(42, f.foo)
-    end
-  end
-
-  def test_complex_ignores
-    fb = Factbase.new
-    f1 = fb.insert
-    f1.foo = 'hello, "dude"!'
-    f1.abc = 42
-    t = Time.now
-    f1.z = t
-    f1.bar = 3.14
-    n = if_absent(fb) do |f|
-      f.foo = 'hello, "dude"!'
-      f.abc = 42
-      f.z = t
-      f.bar = 3.14
-    end
-    assert(n.nil?)
-  end
-
-  def test_complex_injects
-    fb = Factbase.new
-    f1 = fb.insert
-    f1.foo = 'hello, dude!'
-    f1.abc = 42
-    t = Time.now
-    f1.z = t
-    f1.bar = 3.14
-    n = if_absent(fb) do |f|
-      f.foo = "hello, \\\"dude\\\" \\' \\' ( \n\n ) (!   '"
-      f.abc = 42
-      f.z = t + 1
-      f.bar = 3.15
-    end
-    assert(!n.nil?)
-  end
-end

data/test/fb/test_once.rb

@@ -1,88 +0,0 @@
-# frozen_string_literal: true
-
-# Copyright (c) 2024 Yegor Bugayenko
-#
-# Permission is hereby granted, free of charge, to any person obtaining a copy
-# of this software and associated documentation files (the 'Software'), to deal
-# in the Software without restriction, including without limitation the rights
-# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
-# copies of the Software, and to permit persons to whom the Software is
-# furnished to do so, subject to the following conditions:
-#
-# The above copyright notice and this permission notice shall be included in all
-# copies or substantial portions of the Software.
-#
-# THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
-# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
-# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
-# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
-# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
-# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
-# SOFTWARE.
-
-require 'minitest/autorun'
-require 'factbase'
-require_relative '../../lib/judges'
-require_relative '../../lib/judges/fb/once'
-
-# Test.
-# Author:: Yegor Bugayenko (yegor256@gmail.com)
-# Copyright:: Copyright (c) 2024 Yegor Bugayenko
-# License:: MIT
-class TestOnce < Minitest::Test
-  def test_touch_once
-    fb = Factbase.new
-    fb.insert
-    assert(!each_once(fb, '(always)', judge: 'something').to_a.empty?)
-    assert(each_once(fb, '(always)', judge: 'something').to_a.empty?)
-  end
-
-  def test_seen_property
-    fb = Factbase.new
-    f1 = fb.insert
-    f1.foo = 42
-    assert_equal(1, each_tuple_once(fb, '(eq foo 42)', judge: 'x').to_a.size)
-    assert(each_tuple_once(fb, '(eq foo 42)', judge: 'x').to_a.empty?)
-  end
-
-  def test_seen_all_or_nothing
-    fb = Factbase.new
-    f1 = fb.insert
-    f1.a = 1
-    assert(each_tuple_once(fb, '(exists a)', '(exists b)', judge: 'x').to_a.empty?)
-    f2 = fb.insert
-    f2.b = 1
-    assert(!each_tuple_once(fb, '(exists a)', '(exists b)', judge: 'x').to_a.empty?)
-    assert(each_tuple_once(fb, '(exists a)', '(exists b)', judge: 'x').to_a.empty?)
-  end
-
-  def test_with_txn
-    fb = Factbase.new
-    f1 = fb.insert
-    f1.foo = 42
-    each_tuple_once(fb, '(exists foo)', judge: 'xx') do |fs|
-      fb.txn do |fbt|
-        f = fbt.insert
-        f.bar = 1
-      end
-      fs[0].xyz = 'hey'
-    end
-    assert_equal(1, fb.query('(exists seen)').each.to_a.size)
-    assert_equal(1, fb.query('(exists bar)').each.to_a.size)
-    assert_equal(1, fb.query('(exists xyz)').each.to_a.size)
-  end
-
-  def test_with_chain_txn
-    fb = Factbase.new
-    f1 = fb.insert
-    f1.foo = 42
-    each_tuple_once_txn(fb, '(exists foo)', judge: 'xx') do |fbt, ff|
-      f = fbt.insert
-      f.bar = 1
-      ff.xyz = 'hey'
-    end
-    assert_equal(1, fb.query('(exists seen)').each.to_a.size)
-    assert_equal(1, fb.query('(exists bar)').each.to_a.size)
-    assert_equal(1, fb.query('(exists xyz)').each.to_a.size)
-  end
-end