lab42_monad 0.1.2

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA256:
+  metadata.gz: 5936231b5f9f69a72bcb91fdc9b72b49461eb37dff6ec3e3e617ea922d0c9528
+  data.tar.gz: 286720a05832279efc3f313a89c5faac47c048a65fed017d89cde65c4b4be8a5
+SHA512:
+  metadata.gz: 5d1d88f207260529a13a9241ea1fefc9ed0eac6929fe8bc21d478595f16f4397fe96926c5814f2a24451fb6d8af8e4e1212cc5d41c6f22c2fbdd41a0da0cbdc9
+  data.tar.gz: 2304f3595aae584568aa3ec5d625cd36681972feeb2695154fae7329447654b03aa39dfb618ff3cc2eae62da09977a6bb856b00ca8737014aafa34436dc967f3

data/lib/lab42/monad/contract_violation.rb

@@ -0,0 +1,8 @@
+# frozen_string_literal: true
+
+module Lab42
+  module Monad
+    class ContractViolation < RuntimeError; end
+  end
+end
+# SPDX-License-Identifier: Apache-2.0

data/lib/lab42/monad/interact.rb

@@ -0,0 +1,55 @@
+# frozen_string_literal: true
+
+require_relative 'contract_violation'
+module Lab42
+  module Monad
+    class Interact
+      def run(interactor)
+        result = _run_stdin(interactor)
+
+        if stdout
+          _interact(result)
+        else
+          result
+        end
+      end
+
+      private
+
+      attr_reader :args, :kwds, :stdin, :stdout
+
+      def initialize(args:, kwds:, stdin:, stdout:)
+        @args   = args
+        @kwds   = kwds.delete_if { [:stdin, :stdout].include?(_1) }
+        # WANT:
+        @stdin  = stdin
+        @stdout = stdout
+      end
+
+      def _interact(result)
+        case result
+        in [:stdout, r]
+          $stdout.puts r
+          [:ok, r]
+        in [:stderr, r]
+          $stderr.puts r
+          [:error, r]
+        else
+          raise ContractViolation, "result is not of the required format [:stdout|:stderr, value] but:\n\n#{result.inspect}"
+        end
+      end
+
+      def _run_stdin(interactor)
+        case stdin
+        when true
+          interactor.($stdin.readlines(chomp: true), *args, **kwds)
+        when :lazy
+          interactor.($stdin.each_line(chomp: true), *args, **kwds)
+        else
+          interactor.(*args, **kwds)
+        end
+      end
+    end
+  end
+end
+# SPDX-License-Identifier: Apache-2.0

data/lib/lab42/monad.rb

@@ -0,0 +1,15 @@
+# frozen_string_literal: true
+
+require_relative 'monad/interact'
+module Lab42
+  module Monad
+    VERSION = "0.1.2"
+    def self.interact(interactor, *args, **kwds)
+      { stdin: true, stdout: true }.merge(kwds) => { stdin:, stdout: }
+      Interact
+        .new(args:, kwds:, stdin:, stdout:)
+        .run(interactor)
+    end
+  end
+end
+# SPDX-License-Identifier: Apache-2.0

metadata

@@ -0,0 +1,45 @@
+--- !ruby/object:Gem::Specification
+name: lab42_monad
+version: !ruby/object:Gem::Version
+  version: 0.1.2
+platform: ruby
+authors:
+- Robert Dober
+autorequire:
+bindir: bin
+cert_chain: []
+date: 2022-09-04 00:00:00.000000000 Z
+dependencies: []
+description: Implements only some simple monadic patterns right now, à la `IO.interact`
+email: robert.dober@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- lib/lab42/monad.rb
+- lib/lab42/monad/contract_violation.rb
+- lib/lab42/monad/interact.rb
+homepage: https://github.com/robertdober/lab42_monad
+licenses:
+- Apache-2.0
+metadata: {}
+post_install_message:
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: 3.1.0
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubygems_version: 3.3.7
+signing_key:
+specification_version: 4
+summary: Simple Monadic Behaviors for Ruby
+test_files: []