augmented 0.2.2 → 0.2.3

data/test/augmented/objects/thru_test.rb

@@ -1,98 +0,0 @@
-require 'minitest/autorun'
-require 'augmented/objects/thru'
-
-describe Augmented::Objects::Thru do
-  using Augmented::Objects::Thru
-
-  describe '#thru' do
-
-    it 'returns the result of applying the given function to the object' do
-      plus_10 = -> i { i + 10 }
-
-      assert_equal 5.thru(&plus_10), 15
-    end
-
-    it 'returns the object untouched if called without arguments' do
-      obj = Object.new
-      assert_equal obj.thru.object_id, obj.object_id
-    end
-
-  end
-
-  describe '#thru_if' do
-
-    it 'applies the given function to the object if the condition is truish' do
-      plus_10 = -> i { i + 10 }
-
-      assert_equal 5.thru_if(true, &plus_10), 15
-      assert_equal 5.thru_if(Object.new, &plus_10), 15
-    end
-
-    it 'applies the given function to the object if the condition evaluates to truish' do
-      plus_10 = -> i { i + 10 }
-
-      condition_1 = -> i { i == 5 }
-      condition_2 = -> i { i.to_s }
-
-      assert_equal 5.thru_if(condition_1, &plus_10), 15
-      assert_equal 5.thru_if(condition_2, &plus_10), 15
-    end
-
-    it 'returns the object without applying the function if the condition is falsy' do
-      plus_10 = -> i { i + 10 }
-
-      assert_equal 5.thru_if(false, &plus_10), 5
-      assert_equal 5.thru_if(nil,   &plus_10), 5
-    end
-
-    it 'returns the object without applying the function if the condition evaluates to falsy' do
-      plus_10 = -> i { i + 10 }
-
-      condition_1 = -> i { i == 10 }
-      condition_2 = -> i { nil }
-
-      assert_equal 5.thru_if(condition_1, &plus_10), 5
-      assert_equal 5.thru_if(condition_2, &plus_10), 5
-    end
-
-  end
-
-  describe '#thru_unless' do
-
-    it 'applies the given function to the object if the condition is falsy' do
-      plus_10 = -> i { i + 10 }
-
-      assert_equal 5.thru_unless(false, &plus_10), 15
-      assert_equal 5.thru_unless(nil,   &plus_10), 15
-    end
-
-    it 'applies the given function to the object if the condition evaluates to falsy' do
-      plus_10 = -> i { i + 10 }
-
-      condition_1 = -> i { i == 10 }
-      condition_2 = -> i { nil }
-
-      assert_equal 5.thru_unless(condition_1, &plus_10), 15
-      assert_equal 5.thru_unless(condition_2, &plus_10), 15
-    end
-
-    it 'returns the object without applying the function if the condition is truish' do
-      plus_10 = -> i { i + 10 }
-
-      assert_equal 5.thru_unless(true, &plus_10), 5
-      assert_equal 5.thru_unless(Object.new, &plus_10), 5
-    end
-
-    it 'returns the object without applying the function if the condition evaluates to truish' do
-      plus_10 = -> i { i + 10 }
-
-      condition_1 = -> i { i == 5 }
-      condition_2 = -> i { i.to_s }
-
-      assert_equal 5.thru_unless(condition_1, &plus_10), 5
-      assert_equal 5.thru_unless(condition_2, &plus_10), 5
-    end
-
-  end
-
-end

data/test/augmented/procs/chainable_test.rb

@@ -1,22 +0,0 @@
-require 'minitest/autorun'
-require 'augmented/procs/chainable'
-
-describe Augmented::Procs::Chainable do
-  using Augmented::Procs::Chainable
-
-  describe '#|' do
-
-    it 'returns a function that invokes from left to right' do
-
-      add_one = -> (i) { i + 1 }
-      triple = -> (i) { i * 3 }
-      sub_two = -> (i) { i - 2 }
-      add_twenty = -> (i) { i + 20 }
-
-      chain = add_one | triple | sub_two | add_twenty
-
-      assert_equal chain.call(1), 24
-    end
-
-  end
-end

data/test/augmented/procs/rescuable_test.rb

@@ -1,38 +0,0 @@
-require 'minitest/autorun'
-require 'augmented/procs/rescuable'
-
-describe Augmented::Procs::Rescuable do
-  using Augmented::Procs::Rescuable
-
-  describe '#rescues' do
-
-    it 'returns a proc which returns a provided value if the expected exception is raised' do
-      specific_exception_class = Class.new RuntimeError
-
-      unsafe_proc = -> { raise specific_exception_class }
-      rescued_proc = unsafe_proc.rescues specific_exception_class, 42
-
-      assert_equal rescued_proc.call, 42
-    end
-
-    it 'returns a proc which returns the result of the provided block if the expected exception is raised' do
-      specific_exception_class = Class.new RuntimeError
-
-      unsafe_proc = -> { raise specific_exception_class }
-      rescued_proc = unsafe_proc.rescues(specific_exception_class){ |exception| exception }
-
-      assert_instance_of specific_exception_class, rescued_proc.call
-    end
-
-    it 'returns a proc which lets exceptions other than the expected one to be raised' do
-      specific_exception_class = Class.new RuntimeError
-
-      unsafe_proc = -> { raise RuntimeError }
-      rescued_proc = unsafe_proc.rescues specific_exception_class, 42
-
-      assert_raises(RuntimeError){ rescued_proc.call }
-    end
-
-  end
-
-end

data/test/augmented/symbols/arguable_test.rb

@@ -1,51 +0,0 @@
-require 'minitest/autorun'
-require 'augmented/symbols/arguable'
-
-describe Augmented::Symbols::Arguable do
-  using Augmented::Symbols::Arguable
-
-  describe '#with' do
-
-    before do
-      @eleven = Class.new do
-        def add other_number
-          11 + other_number
-        end
-
-        def add_many one_number, another_number, *many_numbers
-          11 + one_number + another_number + many_numbers.reduce(0, :+)
-        end
-
-        def do_whatever
-          yield 11
-        end
-      end.new
-    end
-
-    it 'returns a function that calls the method named <symbol> while also passing the arguments supplied' do
-      assert_equal :add.with(9).call(@eleven), 20
-      assert_equal :add_many.with(3, 6, 10, 20, 50).call(@eleven), 100
-    end
-
-    describe 'the returned function' do
-
-      it "it preserves Symbol's `to_proc` behavior of passing extra arguments, if supplied" do
-        assert_equal :add.to_proc.call(@eleven, 4), 15
-        assert_equal :add.with().call(@eleven, 4), 15
-
-        assert_equal :add_many.with(10, 20).call(@eleven, 4, 5), 50
-      end
-
-      it 'passes along the block supplied to `with`, if any' do
-        result = nil
-        set_result = -> i { result = i }
-
-        :do_whatever.with(&set_result).call(@eleven)
-
-        assert_equal result, 11
-      end
-
-    end
-
-  end
-end

data/test/augmented/symbols/comparing_test.rb

@@ -1,131 +0,0 @@
-require 'minitest/autorun'
-require 'augmented/symbols/comparing'
-
-describe Augmented::Symbols::Comparing do
-  using Augmented::Symbols::Comparing
-
-  let(:dummy) { Struct.new :lorem_ipsum }
-
-  let(:thing_A) { dummy.new 123 }
-  let(:thing_B) { dummy.new 123 }
-  let(:thing_C) { dummy.new 987 }
-  let(:thing_D) { dummy.new 0 }
-
-  describe '#eq' do
-
-    it 'returns a function that sends <symbol> to two objects and compares the results with `==`' do
-      comparator = :lorem_ipsum.eq
-
-      assert_equal comparator.call(thing_A, thing_B), true
-      assert_equal comparator.call(thing_A, thing_C), false
-    end
-
-    it 'if you give it a value, it returns a function that sends <symbol> to an object and compares the result to a given value using `==`' do
-      comparator = :lorem_ipsum.eq(123)
-
-      assert_equal comparator.call(thing_A), true
-      assert_equal comparator.call(thing_C), false
-    end
-
-  end
-
-  describe '#neq' do
-
-    it 'returns a function that sends <symbol> to two objects and compares the results with `!=`' do
-      comparator = :lorem_ipsum.neq
-
-      assert_equal comparator.call(thing_A, thing_B), false
-      assert_equal comparator.call(thing_A, thing_C), true
-    end
-
-    it 'if you give it a value, it returns a function that sends <symbol> to an object and compares the result to a given value using `!=`' do
-      comparator = :lorem_ipsum.neq(123)
-
-      assert_equal comparator.call(thing_A), false
-      assert_equal comparator.call(thing_C), true
-    end
-
-  end
-
-  describe '#lt' do
-
-    it 'returns a function that sends <symbol> to two objects and compares the results with `<`' do
-      comparator = :lorem_ipsum.lt
-
-      assert_equal comparator.call(thing_A, thing_B), false
-      assert_equal comparator.call(thing_A, thing_C), true
-      assert_equal comparator.call(thing_C, thing_B), false
-    end
-
-    it 'if you give it a value, it returns a function that sends <symbol> to an object and compares the result to a given value using `<`' do
-      comparator = :lorem_ipsum.lt(123)
-
-      assert_equal comparator.call(thing_A), false
-      assert_equal comparator.call(thing_C), false
-      assert_equal comparator.call(thing_D), true
-    end
-
-  end
-
-  describe '#lte' do
-
-    it 'returns a function that sends <symbol> to two objects and compares the results with `<=`' do
-      comparator = :lorem_ipsum.lte
-
-      assert_equal comparator.call(thing_A, thing_B), true
-      assert_equal comparator.call(thing_A, thing_C), true
-      assert_equal comparator.call(thing_C, thing_B), false
-    end
-
-    it 'if you give it a value, it returns a function that sends <symbol> to an object and compares the result to a given value using `<=`' do
-      comparator = :lorem_ipsum.lte(123)
-
-      assert_equal comparator.call(thing_A), true
-      assert_equal comparator.call(thing_C), false
-      assert_equal comparator.call(thing_D), true
-    end
-
-  end
-
-  describe '#gt' do
-
-    it 'returns a function that sends <symbol> to two objects and compares the results with `>`' do
-      comparator = :lorem_ipsum.gt
-
-      assert_equal comparator.call(thing_A, thing_B), false
-      assert_equal comparator.call(thing_A, thing_C), false
-      assert_equal comparator.call(thing_C, thing_B), true
-    end
-
-    it 'if you give it a value, it returns a function that sends <symbol> to an object and compares the result to a given value using `>`' do
-      comparator = :lorem_ipsum.gt(123)
-
-      assert_equal comparator.call(thing_A), false
-      assert_equal comparator.call(thing_C), true
-      assert_equal comparator.call(thing_D), false
-    end
-
-  end
-
-  describe '#gte' do
-
-    it 'returns a function that sends <symbol> to two objects and compares the results with `>=`' do
-      comparator = :lorem_ipsum.gte
-
-      assert_equal comparator.call(thing_A, thing_B), true
-      assert_equal comparator.call(thing_A, thing_C), false
-      assert_equal comparator.call(thing_C, thing_B), true
-    end
-
-    it 'if you give it a value, it returns a function that sends <symbol> to an object and compares the result to a given value using `>=`' do
-      comparator = :lorem_ipsum.gte(123)
-
-      assert_equal comparator.call(thing_A), true
-      assert_equal comparator.call(thing_C), true
-      assert_equal comparator.call(thing_D), false
-    end
-
-  end
-
-
-end