possibly 0.0.1

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA1:
+  metadata.gz: faca4e0b3b12f2fc14f83b8c58e3018932212630
+  data.tar.gz: 58fa77ff99cd6d0421c6e2366d896953c3c403b3
+SHA512:
+  metadata.gz: 5fe55dbf369cd712de16b3c26f02f99d0c244e5e96b60b15124f2239afeb75d0607636c508a9b07f675d8562b4bc5ae849e63a754424c9243170a91d8638730e
+  data.tar.gz: f8e8fbb033038790674cd08b4b5b51b33aecb4be5e402839e50e856a21293e5169de7a5aa670f717699828eccf185fbc34b1af12b0948e012d779e421ce8cf62

data/lib/possibly.rb

@@ -0,0 +1,45 @@
+module Maybe
+  class Maybe
+    ([:each] + Enumerable.instance_methods).each do |enumerable_method|
+      define_method(enumerable_method) { |*args, &block|
+        res = __enumerable_value.send(enumerable_method, *args, &block)
+        if res.respond_to?(:each) then Maybe(res.first) else res end
+      }
+    end
+  end
+
+  class Some < Maybe
+    def get() @value; end
+    def or_else(els) @value; end
+    def some?() true; end
+    def none?() false; end
+    def initialize(value) @value = value; end
+    def method_missing(method_sym, *args, &block)
+      map { |value| value.send(method_sym, *args, &block) }
+    end
+
+    private
+    def __enumerable_value() [@value]; end
+  end
+
+  class None < Maybe
+    def get() raise "No such element"; end
+    def or_else(els=nil) block_given? ? yield : els; end
+    def some?() false; end
+    def none?() true; end
+    def method_missing(method_sym, *args, &block)
+      None.new
+    end
+
+    private
+    def __enumerable_value() []; end
+  end
+end
+
+def Maybe(value)
+  if value == nil || (value.respond_to?(:length) && value.length == 0)
+    Maybe::None.new()
+  else
+    Maybe::Some.new(value)
+  end
+end

metadata

@@ -0,0 +1,44 @@
+--- !ruby/object:Gem::Specification
+name: possibly
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+platform: ruby
+authors:
+- Mikko Koski
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2014-04-25 00:00:00.000000000 Z
+dependencies: []
+description: 
+email: mikko.koski@iki.fi
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- lib/possibly.rb
+homepage: 
+licenses:
+- MIT
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.2.2
+signing_key: 
+specification_version: 4
+summary: Maybe monad
+test_files: []