l43_core 0.1.4 → 0.2.0

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 8f1dc19b0e66369e681dc2a7342ea49176148c78aab19832adbc814251f7b93a
-  data.tar.gz: d342f6c72085a6f5552930ec780fdd2111c7525fa18094f0e12e722ecc612825
+  metadata.gz: 3ed28ec7f327c806b60c2a37982ea75bd1778198cf46c29ca7c2aaae5e41deb2
+  data.tar.gz: 3b3dab1de7449f862280357770bf4c0d790350131590e8eabdf4ea8a4d1fd8f9
 SHA512:
-  metadata.gz: 45fa2391331c65b8337b47be2b7c28e8165a4acf16357fb272bb5d99a6cec7375c79ed8bc6502574ed262e0f40993b35a9932fbd3846e5d9e01b7cc81ed22f8d
-  data.tar.gz: a316c3d5fbff4b2fd0bfd8e856b3d4dfbc43c23ad48ab95a8d29070f3c9e4a52667e0ffcd03744ce88f305021c702261fced7e901f72e58d131c2608bba52b81
+  metadata.gz: 5a31e995ba88b3f66e5aac6d18f968d6df7b4b126616a492c08230d0fb80262d33747c2360f19a14c4c1088dd46ea0eb46cf06d849a8b613026009c9efdd7e40
+  data.tar.gz: 550d88e2528a9b9e62fee8dc4f98d14f86a575827348f84eb489fa966d89a51a710930eca0bac2a2970f79be801768b15b0e1f73c50ee560e6e8197e16f7dcb1

data/lib/l43/core/as_result.rb

@@ -4,17 +4,35 @@ require_relative 'result'
 module L43
   module Core
     module AsResult
-      include Result::Helpers
+      include Result
+      def self.extended(by)
+        by.include self
+      end
 
-      def self.extended(from)
-        from.include self
+      def as_result(caller: nil, &blk)
+        Success.new(blk.())
+      rescue StandardError => se
+        Failure.new(
+          exception: se,
+          message: se.inspect,
+          location: [caller, se.backtrace_locations.first].compact.join(" ")
+        )
       end
 
       def defresult(name, &blk)
-        define_method name do |*a, **k, &b|
-          as_result("method #{name}") { blk.(*a, **k, &b) }
+        define_method(name) do |*a, **k, &b|
+          as_result(caller: name) do 
+            blk.(*a, **k, &b)
+          end
+        end
+      end
+
+      def as_result_fn(&blk)
+        -> (v) do
+          as_result { blk.(v) }
         end
       end
+        
     end
   end
 end

data/lib/l43/core/forwarder.rb

@@ -14,6 +14,13 @@ module L43
       def forward_all(*messages, to:)
         def_delegators(to, *messages)
       end
+
+      def forward_self(method:, to:, as: nil)
+        as ||= method
+        define_method(method) do |*a, **k, &b|
+          to.send(as, *[self, *a], **k, &b)
+        end
+      end
         
     end
   end

data/lib/l43/core/result/constructors.rb

@@ -1,25 +1,17 @@
 # frozen_string_literal: true
 
+require_relative 'failure'
+require_relative 'success'
 module L43
   module Core
-    class Result
+    module Result
       module Constructors
-        def error(message)
-          o = allocate
-          o.instance_exec do
-            @message = message
-            @ok = false
-          end
-          o
+        def error(message, exception: nil, location: nil)
+          Failure.new(message:, exception:, location:) 
         end
 
         def ok(value)
-          o = allocate
-          o.instance_exec do
-            @value = value
-            @ok = true
-          end
-          o
+          Success.new(value) 
         end
       end
     end

data/lib/l43/core/result/failure.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+module L43
+  module Core
+    module Result
+      class Failure
+        include Result
+        attr_reader  :exception, :location, :message
+
+        def error? = true
+        def ok? = false
+
+        def map(&_blk) = self
+
+        def map_result(&_blk) = self
+
+        def map_result!(&_blk) = self
+
+        def to_h(*) = {error: {exception:, location:, message:}}
+
+        def deconstruct(*) = [:error, [message, location].compact.join(" at ")]
+
+        private
+        def initialize(exception:, location:, message:)
+         @exception = exception
+         @location = location
+         @message = message
+        end
+      end
+    end
+  end
+end
+# SPDX-License-Identifier: AGPL-3.0-or-later

data/lib/l43/core/result/helpers.rb

@@ -2,16 +2,16 @@
 
 module L43
   module Core
-    class Result
+    module Result
       module Helpers
 
         def as_result(message=nil, &blk)
-          Result.ok(blk.())
-        rescue StandardError => se
+          value = blk.()
+          Result.ok(value)
+
+        rescue StandardError => exception
           location = blk.source_location.join(':')
-          error = se.inspect
-          error = message + " (" + error + ")" if message
-          Result.error([error, "at", location].join(' '))
+          Result.error(message, location:, exception:)
         end
 
         def as_result_fn(message=nil, &blk)

data/lib/l43/core/result/success.rb

@@ -0,0 +1,44 @@
+# frozen_string_literal: true
+
+module L43
+  module Core
+    module Result
+      class Success
+        include Result
+        attr_reader :value
+
+        def deconstruct(*) = [:ok, value]
+
+        def error? = false
+
+        def map(&blk)
+          blk.(self)
+        end
+
+        def map_result(&blk)
+          as_result('map_result') do
+            blk.(self)
+          end
+        end
+
+        def map_result!(&blk)
+          self.class.ok(blk.(self))
+        end
+
+        def ok? = true
+
+        def to_h(*)
+          {ok: @value}
+        end
+
+        private
+        def initialize(value) 
+          @ok = true
+          @value = value
+        end
+
+      end
+    end
+  end
+end
+# SPDX-License-Identifier: AGPL-3.0-or-later

data/lib/l43/core/result.rb

@@ -2,11 +2,13 @@
 
 require 'l43/errors'
 require_relative 'result/constructors'
+require_relative 'result/failure'
 require_relative 'result/helpers'
+require_relative 'result/success'
 
 module L43
   module Core
-    class Result
+    module Result
       extend Constructors
       include Helpers
 
@@ -16,49 +18,12 @@ module L43
         to_h == other.to_h
       end
 
-      def deconstruct(*) 
-        if @ok
-          [:ok, @value]
-        else
-          [:error, @message]
-        end
-      end
-
-      def error? = !@ok
-
-      def map(&blk)
-        return self unless @ok
-        blk.(self)
-      end
-
-      def map_result(&blk)
-        return self unless @ok
-        as_result('map_result') do
-          blk.(self)
-        end
-      end
-
-      def map_result!(&blk)
-        return self unless @ok
-        self.class.ok(blk.(self))
-      end
+      def deconstruct_keys(*) = to_h
 
       def message!
-        return @message unless @ok
-        raise IllegalState, "No error message in an ok result"
-      end
-      alias_method :message, :message!
-
-      def ok? = @ok
-
-      def to_h(*)
-        if @ok
-          {ok: @value}
-        else
-          {error: @message}
-        end
+        raise IllegalState, "No error message in an ok result" if @ok
+        message
       end
-      alias_method :deconstruct_keys, :to_h
 
       def value!
         return @value if @ok

data/lib/l43/core/version.rb

@@ -2,7 +2,7 @@
 
 module L43
   module Core
-    VERSION = "0.1.4"
+    VERSION = "0.2.0"
   end
 end
 # SPDX-License-Identifier: AGPL-3.0-or-later

data/lib/l43/core.rb

@@ -1,7 +1,6 @@
 # frozen_string_literal: true
 
 require_relative 'core/as_result'
-require_relative 'core/result'
 module L43
   module Core extend self
 

data/lib/l43/errors.rb

@@ -2,5 +2,6 @@
 
 module L43
   IllegalState = Class.new(RuntimeError)
+  AbstractMethod = Class.new(RuntimeError)
 end
 # SPDX-License-Identifier: AGPL-3.0-or-later

metadata

@@ -1,13 +1,13 @@
 --- !ruby/object:Gem::Specification
 name: l43_core
 version: !ruby/object:Gem::Version
-  version: 0.1.4
+  version: 0.2.0
 platform: ruby
 authors:
 - Robert Dober
 bindir: bin
 cert_chain: []
-date: 2025-12-10 00:00:00.000000000 Z
+date: 2026-03-27 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: ostruct
@@ -38,7 +38,9 @@ files:
 - lib/l43/core/none.rb
 - lib/l43/core/result.rb
 - lib/l43/core/result/constructors.rb
+- lib/l43/core/result/failure.rb
 - lib/l43/core/result/helpers.rb
+- lib/l43/core/result/success.rb
 - lib/l43/core/version.rb
 - lib/l43/errors.rb
 - lib/l43/open_struct.rb
@@ -53,14 +55,14 @@ required_ruby_version: !ruby/object:Gem::Requirement
   requirements:
   - - ">="
     - !ruby/object:Gem::Version
-      version: 3.4.5
+      version: 4.0.1
 required_rubygems_version: !ruby/object:Gem::Requirement
   requirements:
   - - ">="
     - !ruby/object:Gem::Version
       version: '0'
 requirements: []
-rubygems_version: 4.0.1
+rubygems_version: 4.0.3
 specification_version: 4
 summary: Core Functionality for L43 Ruby Tool
 test_files: []