totally_lazy 0.1.16 → 0.1.17

checksums.yaml

@@ -1,15 +1,15 @@
 ---
 !binary "U0hBMQ==":
   metadata.gz: !binary |-
-    NjgzMzY3YjI3MTk4OTc5YTM0YWM5YTcwMDA3ZGJhZTdmMWY3MzM1MA==
+    ZGUyNzc3NTNjMDYzY2UyOWU4NjFjNzhmZDZlZTJlZDM0NDJkMmU0NA==
   data.tar.gz: !binary |-
-    OGJjNzdkZDNmZGY2NGNhMGI5ZGM2YjNmMDExMThiOGMzYTcxMDhlNg==
+    YzI3YjVkZGU4YmNiMmM0Y2QxZjVlNTU2OTBkMGQyNjVhOGZmOTc1NA==
 SHA512:
   metadata.gz: !binary |-
-    YTk5MWJhZDA3MGRkNThhZmJmZWU2ZDEwNWE2NzgzYzE0NjUyYzI4ZTYyOTA4
-    OTAyNTVjMWYyOTI4NWRhYjM1YjkxY2U1YjFhMWVjMDIxZTRmZmY0MDNkNGY0
-    YTBhNThkYTM2MzY3MDczNWQzMzk2OTYzYTc5MWE2YTBkMDI0ZTA=
+    ZTUxOGRjMDVlNDM2NThhOWJhNDBiZjJlNzI1YzkxZjA4NGI4NWQ3ZTM1YmM1
+    YjgxYmUwNmU5ZTQ2ZTQ2NmEwYWY3ODJjYzVkNDExYmUyNzllODM1MjVkY2I4
+    NThkN2EyMWEyMDIwODRhNDhlYjBhODI2MjY2MTU2MWY1Zjk3M2U=
   data.tar.gz: !binary |-
-    NDdkZDE1NGJiYjY3MTg0MzU4ZjY2N2UxYWZkYTg0MTM0YmEyZGRjNWE1ZWJj
-    NDU0NDk5ZGZlNThmOTcxOTk1MDlmOGYwZDMzODhkZTIxYWI4OGY4NWY2NDRi
-    Y2U4ZmJjMjdkMzE2MjM1MTc5MTY0MmRkMGViMzJhZDA0NDE4NTc=
+    NTMxYzE0YTQzNzhhM2M4ZGQ5OTk0MGEyZWNmOThlNjI0YThhZDRkMDQyMGZk
+    NDU2NWY1YmFhYWIzMTQ0YTk0YjEzYTQ4OTZlYzBjYzBjNTczNmNhNWU1NmM2
+    NTYyZWMyYzhlNDI0NTFkNzU2M2FkNDkwODU1ZDlkMTkyMGZmNGE=

data/lib/functions.rb

@@ -1,6 +1,18 @@
 require 'concurrent/executors'
 require 'concurrent/promise'
 
+class Proc
+  def to_optional
+    ->(value) {
+      begin
+        option(self.(value))
+      rescue
+        none
+      end
+    }
+  end
+end
+
 module Functions
   def monoid(fn, id)
     fn.define_singleton_method(:identity) do

data/lib/numbers.rb

@@ -15,6 +15,10 @@ module Numbers
     remainder_is(2, 1)
   end
 
+  def divide(divisor)
+    ->(dividend) { dividend / divisor }
+  end
+
   def remainder_is(divisor, remainder)
     ->(dividend) { remainder(dividend, divisor) == remainder }
   end

data/lib/option.rb

@@ -48,6 +48,11 @@ module Option
       some(block_given? ? block.call(@value) : fn.(@value))
     end
 
+    def flat_map(fn=nil, &block) # function should return an option
+      assert_funcs(fn, block_given?)
+      block_given? ? block.call(@value) : fn.(@value)
+    end
+
     def fold(seed, fn=nil, &block)
       assert_funcs(fn, block_given?)
       block_given? ? block.call(seed, @value) : fn.(seed, @value)
@@ -94,6 +99,11 @@ module Option
       none
     end
 
+    def flat_map(fn=nil, &block) # function should return an option
+      assert_funcs(fn, block_given?)
+      none
+    end
+
     def fold(seed, fn=nil &block)
       assert_funcs(fn, block_given?)
       seed

data/spec/option_spec.rb

@@ -44,6 +44,14 @@ describe 'Option' do
     expect(some(2).map(ignore_and_return(nil))).to eq(some(nil)) # differs from Java TL which reutrns none
   end
 
+  it 'should support flat_map' do
+    expect(some(4).flat_map(divide(2).to_optional)).to eq(some(2))
+    expect(some(4).flat_map{ |v| divide(2).to_optional.(v) }).to eq(some(2))
+    expect(some(4).flat_map(divide(0).to_optional)).to eq(none)
+    expect(none.flat_map(constant(none))).to eq(none)
+    expect(none.flat_map(some(4))).to eq(none)
+  end
+
   it 'should raise exception if you try to use both lambda and block' do
     expect { some(1).exists?(->(a) { a == 1 }) { |b| b == 2 } }.to raise_error(RuntimeError)
     expect { none.exists?(->(a) { a == 1 }) { |b| b == 2 } }.to raise_error(RuntimeError)
@@ -55,6 +63,7 @@ describe 'Option' do
     expect { none.fold_left(0, ->(a, b) { a+b }) { |a, b| a+b } }.to raise_error(RuntimeError)
     expect { some(1).map(->(v) { v.to_s }) { |v| v.to_s } }.to raise_error(RuntimeError)
     expect { none.map(->(v) { v.to_s }) { |v| v.to_s } }.to raise_error(RuntimeError)
+    expect { some(4).flat_map(divide(2).to_optional){ |v| divide(2).to_optional.(v) } }.to raise_error(RuntimeError)
   end
 
 end

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: totally_lazy
 version: !ruby/object:Gem::Version
-  version: 0.1.16
+  version: 0.1.17
 platform: ruby
 authors:
 - Raymond Barlow