funkr 0.0.5 → 0.0.6

data/lib/funkr.rb

@@ -1,3 +1,7 @@
+if RUBY_VERSION.split(".")[0..1] == ["1","8"] then
+  require 'funkr/compat/1.8'
+end
+
 module Funkr
-  # nada ...  
+  # constructs defined in submodules
 end

data/lib/funkr/compat/1.8.rb

@@ -0,0 +1,49 @@
+class Proc
+  
+  def curry
+    case self.arity
+    when 2 then curry2
+    when 3 then curry3
+    when 4 then curry4
+    when 5 then curry5
+    else raise "Can't curry more than 5 arguments"
+    end
+  end
+  
+  def curry2
+    lambda{|a|
+      lambda{|b| self.call(a,b)}}
+  end
+  
+  def curry3
+    lambda{|a|
+      lambda{|b| 
+        lambda{|c| self.call(a,b,c)}}}
+  end
+  
+  def curry4
+    lambda{|a|
+      lambda{|b|
+        lambda{|c| 
+          lambda{|d| self.call(a,b,c,d)}}}}
+  end
+  
+  def curry5
+    lambda{|a|
+      lambda{|b|
+        lambda{|c|
+          lambda{|d|
+            lambda{|e| self.call(a,b,c,d,e)}}}}}
+  end
+  
+end
+
+class Object
+  def define_singleton_method(name, &block)
+    singleton = class << self; self end
+    singleton.send(:define_method, name) do |*args|
+      block.call(*args)
+    end
+  end
+end
+  

data/lib/funkr/types/maybe.rb

@@ -71,7 +71,6 @@ module Funkr
         end
       end
       
-      
       class << self
         alias unit just
         alias pure just

data/lib/funkr/version.rb

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

data/test/tests.rb

@@ -1,4 +1,7 @@
+$:.unshift File.join(File.dirname(__FILE__), *%w[.. lib])
+
 require 'rubygems'
+require 'funkr'
 require 'funkr/types'
 require 'funkr/extensions'
 

metadata

@@ -1,12 +1,13 @@
 --- !ruby/object:Gem::Specification 
 name: funkr
 version: !ruby/object:Gem::Version 
-  prerelease: false
+  hash: 19
+  prerelease: 
   segments: 
   - 0
   - 0
-  - 5
-  version: 0.0.5
+  - 6
+  version: 0.0.6
 platform: ruby
 authors: 
 - Paul Rivier
@@ -14,7 +15,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2011-03-11 00:00:00 +01:00
+date: 2011-03-14 00:00:00 +01:00
 default_executable: 
 dependencies: []
 
@@ -41,6 +42,7 @@ files:
 - lib/funkr/categories/functor.rb
 - lib/funkr/categories/monad.rb
 - lib/funkr/categories/monoid.rb
+- lib/funkr/compat/1.8.rb
 - lib/funkr/extensions.rb
 - lib/funkr/extensions/array.rb
 - lib/funkr/extensions/fixnum.rb
@@ -63,6 +65,7 @@ required_ruby_version: !ruby/object:Gem::Requirement
   requirements: 
   - - ">="
     - !ruby/object:Gem::Version 
+      hash: 3
       segments: 
       - 0
       version: "0"
@@ -71,13 +74,14 @@ required_rubygems_version: !ruby/object:Gem::Requirement
   requirements: 
   - - ">="
     - !ruby/object:Gem::Version 
+      hash: 3
       segments: 
       - 0
       version: "0"
 requirements: []
 
 rubyforge_project: funkr
-rubygems_version: 1.3.7
+rubygems_version: 1.4.2
 signing_key: 
 specification_version: 3
 summary: "[EXPERIMENTAL] Some functionnal constructs for ruby"