mug 0.0.8 → 0.1.0

data/test/test-to_h.rb

@@ -1,15 +1,16 @@
-require 'test/unit'
-
-$VERBOSE = true
-require_relative '../lib/mug/to_h'
-class Test_enum_to_h < Test::Unit::TestCase
-	def test_enum_to_h
-		assert_equal( {}, [].to_h )
-		assert_equal( {1=>nil,2=>nil}, [1,2].to_h )
-		assert_equal( {1=>nil,2=>nil}, (1..2).to_h )
-		assert_equal( {1=>2,3=>4}, [[1,2],[3,4]].to_h )
-		assert_equal( {1=>4}, [[1,2],[1,4]].to_h )
-		assert_raise(ArgumentError) { [[1,2,3]].to_h }
-	end
-end
-
+require 'test/unit'
+
+$VERBOSE = true
+$ruby_2_1 = RUBY_VERSION.to_f >= 2.1
+require_relative '../lib/mug/to_h'
+class Test_enum_to_h < Test::Unit::TestCase
+	def test_enum_to_h
+		assert_equal( {}, [].to_h )
+		assert_equal( {1=>nil,2=>nil}, [1,2].to_h )  unless $ruby_2_1
+		assert_equal( {1=>nil,2=>nil}, (1..2).to_h ) unless $ruby_2_1
+		assert_equal( {1=>2,3=>4}, [[1,2],[3,4]].to_h )
+		assert_equal( {1=>4}, [[1,2],[1,4]].to_h )
+		assert_raise(ArgumentError) { [[1,2,3]].to_h }
+	end
+end
+

data/test/test_apply.rb

@@ -0,0 +1,56 @@
+require 'test/unit'
+$VERBOSE = true
+
+class Foo
+	def bar a, b
+		(a||0) + (b||0)
+	end
+end
+
+require_relative '../lib/mug/apply'
+class Test_self < Test::Unit::TestCase
+	def test_apply_proc
+		prc = proc{|a,b,*c| (a||0) + (b||0) + c.inject(0, &:+) }
+		p1 = prc.apply(1)
+		assert( p1.is_a? Proc )
+		assert_equal( 3, p1.apply(2) )
+		assert_equal( 3, prc.apply(1,2) )
+		assert_equal( 15, prc.apply(1,2,3,4,5) )
+	end
+	def test_apply_lambda
+		lmb = lambda{|a,b,c| (a||0) + (b||0) + (c||0) }
+
+		l1 = lmb.apply(1)
+		assert( l1.is_a? Proc )
+
+		l2 = l1.apply(2)
+		assert( l2.is_a? Proc )
+
+		assert_equal( 6, l2.apply(3) )
+		assert_equal( 6, l1.apply(2,3) )
+
+		assert_raise( ArgumentError ){ l2.apply(3, 4) }
+		assert_raise( ArgumentError ){ lmb.apply(1, 2, 3, 4) }
+	end
+	def test_apply_method
+		m1 = 1.method :+
+		assert_equal( 3, m1.apply(2) )
+		assert_raise( ArgumentError ){ m1.apply(2,3) }
+
+		m2 = Foo.new.method :bar
+		l1 = m2.apply(1)
+		assert( l1.is_a? Proc )
+
+		assert_equal( 3, l1.apply(2) )
+		assert_equal( 3, m2.apply(1,2) )
+
+		assert_raise( ArgumentError ){ l1.apply(2, 3) }
+		assert_raise( ArgumentError ){ m2.apply(1, 2, 3) }
+	end
+	def test_curry_method
+		m1 = 1.method :+
+		assert( m1.curry.is_a? Proc )
+		assert( m1.curry(1).is_a? Proc )
+		assert_raise( ArgumentError ){ m1.curry(2) }
+	end
+end

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: mug
 version: !ruby/object:Gem::Version
-  version: 0.0.8
+  version: 0.1.0
 platform: ruby
 authors:
 - Matthew Kerwin
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2013-08-27 00:00:00.000000000 Z
+date: 2014-02-22 00:00:00.000000000 Z
 dependencies: []
 description: |
   == MUG: Matty's Ultimate Gem
@@ -20,31 +20,33 @@ executables: []
 extensions: []
 extra_rdoc_files: []
 files:
-- lib/mug.rb
-- lib/mug/hashmap.rb
-- lib/mug/tau.rb
-- lib/mug/to_h.rb
-- lib/mug/fragile-method-chain.rb
-- lib/mug/self.rb
-- lib/mug/iterator.rb
 - lib/mug/and-or.rb
+- lib/mug/apply.rb
+- lib/mug/bool.rb
+- lib/mug/fragile-method-chain.rb
+- lib/mug/hashmap.rb
 - lib/mug/hashop.rb
 - lib/mug/iterator/for.rb
 - lib/mug/iterator/method.rb
-- lib/mug/maybe.rb
+- lib/mug/iterator.rb
 - lib/mug/iterator_c.rb
-- lib/mug/bool.rb
-- test/test-tau.rb
-- test/test-self.rb
+- lib/mug/maybe.rb
+- lib/mug/self.rb
+- lib/mug/tau.rb
+- lib/mug/to_h.rb
+- lib/mug.rb
+- test/test-and-or.rb
 - test/test-bool.rb
-- test/test-to_h.rb
 - test/test-fragile-method-chain.rb
-- test/test-and-or.rb
-- test/test-iterator-method.rb
-- test/test-iterator-for.rb
-- test/test-maybe.rb
 - test/test-hashmap.rb
 - test/test-hashop.rb
+- test/test-iterator-for.rb
+- test/test-iterator-method.rb
+- test/test-maybe.rb
+- test/test-self.rb
+- test/test-tau.rb
+- test/test-to_h.rb
+- test/test_apply.rb
 homepage: http://phluid61.github.com/mug
 licenses:
 - ISC License
@@ -70,14 +72,15 @@ signing_key:
 specification_version: 4
 summary: 'MUG: Matty''s Ultimate Gem'
 test_files:
-- test/test-tau.rb
-- test/test-self.rb
+- test/test-and-or.rb
 - test/test-bool.rb
-- test/test-to_h.rb
 - test/test-fragile-method-chain.rb
-- test/test-and-or.rb
-- test/test-iterator-method.rb
-- test/test-iterator-for.rb
-- test/test-maybe.rb
 - test/test-hashmap.rb
 - test/test-hashop.rb
+- test/test-iterator-for.rb
+- test/test-iterator-method.rb
+- test/test-maybe.rb
+- test/test-self.rb
+- test/test-tau.rb
+- test/test-to_h.rb
+- test/test_apply.rb