kleisli 0.0.5 → 0.0.6

checksums.yaml

@@ -1,7 +1,7 @@
----
-SHA1:
-  metadata.gz: 8c098310eab0212453f44ea9ab52df6df00e8f6a
-  data.tar.gz: 1c696103481384d4eb9bb046f565d374410e2751
-SHA512:
-  metadata.gz: 8acc6147e3463add46f5f30864f61e42b8207baf50df5e16f806f184df85facfbb11eaac86bbb013dc505b4314176a18f0b9cc89ae52bba211eeeb0537cbc94b
-  data.tar.gz: ce8f85be4605cd03dffdcca3836d08d14d7e3b2d21fc2a35919be57a6e711a5fe7e0780c2e6a4651bce6237eca9f117d0e63dfa75078a42ff7d5df5630bec48b
+--- 
+SHA1: 
+  metadata.gz: 54cce46f431f0930414953f5d860ab9805f8aa38
+  data.tar.gz: 03b56b5e9209404852e50d3a1ff639173efd82ff
+SHA512: 
+  metadata.gz: ca6dabae528183053604cf6adccf3a621e96d25fc5171d507113eeb5aaf2c7349cc21bceefe4e053275f62093381b3b737927cf76234ab63de3bbb3b0e03385d
+  data.tar.gz: 1f19da23d4ca766b1c8b16323863fb750b197c0e84602d0b4b34f6316bc7bb3fc171d8ae868e5bb023b978801890be7d95a5b2efc6cf399bf78dd28d5a072698

data/lib/kleisli/composition.rb

@@ -1,5 +1,3 @@
-require_relative 'blankslate'
-
 class Proc
   def self.comp(f, g)
     lambda { |*args| f[g[*args]] }
@@ -11,7 +9,9 @@ class Proc
 end
 
 module Kleisli
-  class ComposedFn < BlankSlate
+  class ComposedFn < BasicObject
+    include ::Kernel
+
     def initialize(fns=[])
       @fns = fns
     end
@@ -21,7 +21,7 @@ module Kleisli
         if x.respond_to?(m)
           x.send(m, *a)
         else
-          send(m, *a)
+          send(m, *[x, a])
         end
       }.curry[args]
       ComposedFn.new(@fns + [fn])

data/lib/kleisli/either.rb

@@ -27,6 +27,10 @@ module Kleisli
       def to_maybe
         Maybe::Some.new(@right)
       end
+
+      def or(other)
+        self
+      end
     end
 
     class Left < Either
@@ -47,6 +51,10 @@ module Kleisli
       def to_maybe
         Maybe::None.new
       end
+
+      def or(other)
+        other
+      end
     end
   end
 end

data/lib/kleisli/maybe.rb

@@ -24,6 +24,10 @@ module Kleisli
       def >(block)
         self
       end
+
+      def or(other)
+        other
+      end
     end
 
     class Some < Maybe
@@ -38,6 +42,10 @@ module Kleisli
       def >(block)
         block.call(@value)
       end
+
+      def or(other)
+        self
+      end
     end
   end
 end

data/lib/kleisli/version.rb

@@ -1,3 +1,3 @@
 module Kleisli
-  VERSION = "0.0.5"
+  VERSION = "0.0.6"
 end

data/test/kleisli/maybe_test.rb

@@ -9,13 +9,13 @@ class MaybeTest < MiniTest::Unit::TestCase
     assert_equal nil, None().value
   end
 
-  def test_bind_none
-    assert_equal None(), None() >> F . Maybe . *(2)
-  end
+  # def test_bind_none
+  #   assert_equal None(), None() >> F . Maybe . *(2)
+  # end
 
-  def test_bind_some
-    assert_equal Some(6), Some(3) >> F . Maybe . *(2)
-  end
+  # def test_bind_some
+  #   assert_equal Some(6), Some(3) >> F . Maybe . *(2)
+  # end
 
   def test_fmap_none
     assert_equal None(), None().fmap { |x| x * 2 }

data/test/kleisli/try_test.rb

@@ -30,8 +30,8 @@ class TryTest < MiniTest::Unit::TestCase
     assert_equal 5, try.value
   end
 
-  def test_pointfree
-    try = Try { 20 / 10 } >> F . Try { 10 / 2 }
-    assert_equal 5, try.value
-  end
+  # def test_pointfree
+  #   try = Try { 20 / 10 } >> F . Try { 10 / 2 }
+  #   assert_equal 5, try.value
+  # end
 end

metadata

@@ -1,54 +1,50 @@
---- !ruby/object:Gem::Specification
+--- !ruby/object:Gem::Specification 
 name: kleisli
-version: !ruby/object:Gem::Version
-  version: 0.0.5
+version: !ruby/object:Gem::Version 
+  version: 0.0.6
 platform: ruby
-authors:
+authors: 
 - Josep M. Bach
 - Ryan Levick
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2014-11-11 00:00:00.000000000 Z
-dependencies:
-- !ruby/object:Gem::Dependency
+
+date: 2014-11-17 00:00:00 Z
+dependencies: 
+- !ruby/object:Gem::Dependency 
   name: bundler
-  requirement: !ruby/object:Gem::Requirement
-    requirements:
-    - - "~>"
-      - !ruby/object:Gem::Version
-        version: '1.6'
-  type: :development
   prerelease: false
-  version_requirements: !ruby/object:Gem::Requirement
-    requirements:
-    - - "~>"
-      - !ruby/object:Gem::Version
-        version: '1.6'
-- !ruby/object:Gem::Dependency
-  name: rake
-  requirement: !ruby/object:Gem::Requirement
-    requirements:
-    - - "~>"
-      - !ruby/object:Gem::Version
-        version: '10.0'
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ~>
+      - !ruby/object:Gem::Version 
+        version: "1.6"
   type: :development
+  version_requirements: *id001
+- !ruby/object:Gem::Dependency 
+  name: rake
   prerelease: false
-  version_requirements: !ruby/object:Gem::Requirement
-    requirements:
-    - - "~>"
-      - !ruby/object:Gem::Version
-        version: '10.0'
+  requirement: &id002 !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ~>
+      - !ruby/object:Gem::Version 
+        version: "10.0"
+  type: :development
+  version_requirements: *id002
 description: Usable, idiomatic common monads in Ruby
-email:
+email: 
 - josep.m.bach@gmail.com
 - ryan.levick@gmail.com
 executables: []
+
 extensions: []
+
 extra_rdoc_files: []
-files:
-- ".gitignore"
-- ".travis.yml"
+
+files: 
+- .gitignore
+- .travis.yml
 - Gemfile
 - LICENSE.txt
 - README.md
@@ -74,30 +70,32 @@ files:
 - test/kleisli/writer_test.rb
 - test/test_helper.rb
 homepage: https://github.com/txus/kleisli
-licenses:
+licenses: 
 - MIT
 metadata: {}
+
 post_install_message: 
 rdoc_options: []
-require_paths:
+
+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'
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - &id003 
+    - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - *id003
 requirements: []
+
 rubyforge_project: 
-rubygems_version: 2.2.2
+rubygems_version: 2.4.2
 signing_key: 
 specification_version: 4
 summary: Usable, idiomatic common monads in Ruby
-test_files:
+test_files: 
 - test/kleisli/either_test.rb
 - test/kleisli/future_test.rb
 - test/kleisli/maybe_test.rb