ex_aequo_base 0.1.5 → 0.1.6

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 24a260aad0b858a285db2f96eccff1885c3755e12eed40c61a01d4100ecc40ed
-  data.tar.gz: 961b6557e5002df0ee9993399de00f4705ecf55561b048e8ef9c5927c924030b
+  metadata.gz: 651fee9239497761fb48b5794e89687a1789de5aefd5d463527cf336b36c5f6d
+  data.tar.gz: b191bce7fcd36aa4820557fc3cc45bdbe9719b91e035328a9db6566183538ab6
 SHA512:
-  metadata.gz: 7ba6c445f2dd6bfa21b20fd7e4bc5b83ce57ebc1b72c62049aad348f30ea36f32dc8e016bddf9cef180b29541ef900837124fb91a10b7e8364bb742e06dee4a1
-  data.tar.gz: d34123cb7cdf68a20195a4d95a408d30922ec129ab463d894360fecf76574f354bcb8f96c8c909882a09de50168a84696a164db7b8244f5e4d5b97c4899399f3
+  metadata.gz: ca06e3932d06661ed25f7dc43ea57fd5edb47ed21a4aed9bbabd55e66c74f46546e20ce833f614244d8ad2a10a3bbc1aed51a658362cf0b19e3a12d46de4e44c
+  data.tar.gz: c27d73f78cbbc1820b9e55a66ba9115e7717006135e9d57148831060e37fe56a272c103e7cd6a986728fd87f393fa91c3facdbe4f0980d3d544fa115c70a2369

data/lib/ex_aequo/base/all.rb

@@ -1,7 +1,10 @@
 # frozen_string_literal: true
 require_relative 'colorize'
+require_relative 'enumerable'
+require_relative 'fn'
 require_relative 'kernel'
 require_relative 'open_struct'
+require_relative 'regexp'
 # require_relative 'match_data'
 Colorize = ExAequo::Base::Colorize
 # SPDX-License-Identifier: AGPL-3.0-or-later

data/lib/ex_aequo/base/enumerable.rb

@@ -0,0 +1,27 @@
+# frozen_string_literal: true
+
+require_relative 'enumerable_helper'
+module Enumerable
+  def find_value(&blk)
+    each do
+      val = blk.(it)
+      return val if val
+    end
+    nil
+  end
+
+  def reduce_until(initial, *end_triggers, &blk)
+    raise ArgumentError, "missing end_trigger(s)" if end_triggers.empty?
+
+    ExAequo::Base::EnumerableHelper.reduce_until_with_trigger(self, initial:, end_triggers:, &blk)
+  end
+
+  def reduce_while(initial, *end_triggers, &blk)
+    if end_triggers.empty?
+      ExAequo::Base::EnumerableHelper.reduce_while_simple(self, initial:, &blk)
+    else
+      ExAequo::Base::EnumerableHelper.reduce_while_with_trigger(self, initial:, end_triggers:, &blk)
+    end
+  end
+end
+# SPDX-License-Identifier: AGPL-3.0-or-later

data/lib/ex_aequo/base/enumerable_helper.rb

@@ -0,0 +1,44 @@
+# frozen_string_literal: true
+
+require_relative 'fn'
+module ExAequo
+  module Base
+    module EnumerableHelper extend self
+      def reduce_until_with_trigger(enum, initial:, end_triggers:, &blk)
+        f = Fn.mk_fun_pipeline(end_triggers)
+        enum.each do
+          return initial if f.(initial)
+          initial = blk.(initial, it)
+        end
+        initial
+      end
+
+      def reduce_while_simple(enum, initial:, &blk)
+        enum.each do
+          val = blk.(initial, it)
+          if val
+            initial = val
+          else
+            return initial
+          end
+        end
+        initial
+      end
+
+      def reduce_while_with_trigger(enum, initial:, end_triggers:, &blk)
+        f = Fn.mk_fun_pipeline(end_triggers)
+        enum.each do
+          val = blk.(initial, it)
+          # p(val:, f: f.(val))
+          if f.(val)
+            initial = val
+          else
+            return initial
+          end
+        end
+        initial
+      end
+    end
+  end
+end
+# SPDX-License-Identifier: AGPL-3.0-or-later

data/lib/ex_aequo/base/fn.rb

@@ -0,0 +1,41 @@
+# frozen_string_literal: true
+
+require_relative 'to_proc'
+module ExAequo
+  module Base
+    module Fn extend self
+      def _not = -> { !it }
+
+      Operators = {
+        '!' => _not,
+      }
+
+
+      def mk_fun(fn_desc)
+        case fn_desc
+        in String
+          mk_op(fn_desc)
+        in Symbol
+        -> { it.send(fn_desc) }
+        in Array
+        -> { it.send(*fn_desc) }
+        in _
+          fn_desc.to_proc
+        end
+        # TODO: Allow for other fn_desc then Array and Symbol
+      end
+
+      def mk_fun_pipeline(fn_descs)
+        fns = fn_descs.map { mk_fun it }
+        -> do
+          fns.inject(it) { |acc, f| f.(acc) }
+        end
+      end
+
+      def mk_op(op)
+        Operators.fetch(op) { raise ArgumentError, "undefined operator #{op.inspect}" }
+      end
+    end
+  end
+end
+# SPDX-License-Identifier: AGPL-3.0-or-later

data/lib/ex_aequo/base/regexp.rb

@@ -0,0 +1,4 @@
+# frozen_string_literal: true
+
+require_relative 'to_proc/regexp'
+# SPDX-License-Identifier: AGPL-3.0-or-later

data/lib/ex_aequo/base/to_proc/false_class.rb

@@ -0,0 +1,8 @@
+# frozen_string_literal: true
+
+class FalseClass
+  def to_proc
+    ->(*) { false }
+  end
+end
+# SPDX-License-Identifier: AGPL-3.0-or-later

data/lib/ex_aequo/base/to_proc/nil_class.rb

@@ -0,0 +1,8 @@
+# frozen_string_literal: true
+
+class NilClass
+  def to_proc
+    ->(*) { nil }
+  end
+end
+# SPDX-License-Identifier: AGPL-3.0-or-later

data/lib/ex_aequo/base/to_proc/regexp.rb

@@ -0,0 +1,7 @@
+# frozen_string_literal: true
+class Regexp
+  def to_proc
+    -> { match(it) }
+  end
+end
+# SPDX-License-Identifier: AGPL-3.0-or-later

data/lib/ex_aequo/base/to_proc/true_class.rb

@@ -0,0 +1,8 @@
+# frozen_string_literal: true
+
+class TrueClass
+  def to_proc
+    ->(*) { true }
+  end
+end
+# SPDX-License-Identifier: AGPL-3.0-or-later

data/lib/ex_aequo/base/to_proc.rb

@@ -0,0 +1,5 @@
+# frozen_string_literal: true
+
+require_relative 'kernel'
+require_subdir __FILE__
+# SPDX-License-Identifier: AGPL-3.0-or-later

data/lib/ex_aequo/base/version.rb

@@ -2,7 +2,7 @@
 
 module ExAequo
   module Base
-    VERSION = '0.1.5'
+    VERSION = '0.1.6'
   end
 end
 # SPDX-License-Identifier: AGPL-3.0-or-later

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: ex_aequo_base
 version: !ruby/object:Gem::Version
-  version: 0.1.5
+  version: 0.1.6
 platform: ruby
 authors:
 - Robert Dober
@@ -65,10 +65,19 @@ files:
 - lib/ex_aequo/base/colorize/color_definitions.rb
 - lib/ex_aequo/base/colorize/colorizer.rb
 - lib/ex_aequo/base/constants.rb
+- lib/ex_aequo/base/enumerable.rb
+- lib/ex_aequo/base/enumerable_helper.rb
+- lib/ex_aequo/base/fn.rb
 - lib/ex_aequo/base/kernel.rb
 - lib/ex_aequo/base/match_data.rb
 - lib/ex_aequo/base/open_struct.rb
+- lib/ex_aequo/base/regexp.rb
 - lib/ex_aequo/base/string/colorize.rb
+- lib/ex_aequo/base/to_proc.rb
+- lib/ex_aequo/base/to_proc/false_class.rb
+- lib/ex_aequo/base/to_proc/nil_class.rb
+- lib/ex_aequo/base/to_proc/regexp.rb
+- lib/ex_aequo/base/to_proc/true_class.rb
 - lib/ex_aequo/base/version.rb
 homepage: https://codeberg.org/lab419/rb_ex_aequo_base
 licenses: