facets 2.0.2 → 2.0.3

data/test/unit/hash/test_select.rb

@@ -0,0 +1,43 @@
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |
+#   |_|\___||___/\__|
+#
+# for lib/facets/hash/select.rb
+
+require 'facets/hash/select.rb'
+require 'test/unit'
+
+class TestHashSelect < Test::Unit::TestCase
+
+  def test_select!
+    # Empty hash.
+    a = {}
+    assert_equal(nil, a.select! {false}, "return nil if hash not changed")
+    assert_equal({}, a, "hash is not changed")
+
+    a = {}
+    assert_equal(nil, a.select! {true}, "return nil if hash not changed")
+    assert_equal({}, a, "hash is not changed")
+
+      # Non-empty hash.
+    a = {0 => 'a', 1 => 'b', 2 => 'c', 3 => 'd'}
+    assert_equal({0 => 'a', 2 => 'c'}, a.select! {|x,y| x % 2 == 0}, "select even numbers")
+    assert_equal({0 => 'a', 2 => 'c'}, a, "select even numbers")
+
+    a = {0 => 'a', 1 => 'b', 2 => 'c', 3 => 'd'}
+    assert_equal({1 => 'b'}, a.select! {|x,y| y == 'b'}, "select one member")
+    assert_equal({1 => 'b'}, a, "select one member")
+
+    a = {0 => 'a', 1 => 'b', 2 => 'c', 3 => 'd'}
+    assert_equal(nil, a.select! {true}, "return nil if hash not changed")
+    assert_equal({0 => 'a', 1 => 'b', 2 => 'c', 3 => 'd'}, a, "select all")
+
+    a = {0 => 'a', 1 => 'b', 2 => 'c', 3 => 'd'}
+    assert_equal({}, a.select! {false}, "select none")
+    assert_equal({}, a, "select none")
+  end
+
+end
+

data/test/unit/integer/test_multiples.rb

@@ -1,45 +1,41 @@
-  #  _____         _
-  # |_   _|__  ___| |_
-  #   | |/ _ \/ __| __|
-  #   | |  __/\__ \ |
-  #   |_|\___||___/\__|
-  #
-  # for lib/facets/integer/multiples.rb
-  #
-  # Extracted Mon Sep 03 16:23:07 -0700 2007
-  # w/ Test Extraction Ratchet
-  #
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |
+#   |_|\___||___/\__|
 
- require 'facets/integer/multiples.rb'
+require 'facets/integer/multiples.rb'
 
+require 'test/unit'
 
+class TCInteger < Test::Unit::TestCase
 
-  require 'test/unit'
-
-  class TCInteger < Test::Unit::TestCase
-
-    def test_odd?
-      assert( ! 0.odd? )
-      assert(   1.odd? )
-      assert( ! 2.odd? )
-      assert(   3.odd? )
+  def test_even?
+    (-100..100).step(2) do |n|
+      assert(n.even? == true)
     end
-
-    def test_even?
-      assert(   0.even? )
-      assert( ! 1.even? )
-      assert(   2.even? )
-      assert( ! 3.even? )
+    (-101..101).step(2) do |n|
+      assert(n.even? == false)
     end
+  end
 
-    def test_multiple?
-      assert( ! 1.multiple?(2) )
-      assert(   2.multiple?(2) )
-      assert( ! 5.multiple?(3) )
-      assert(   6.multiple?(3) )
+  def test_odd?
+    (-101..101).step(2) do |n|
+      assert(n.odd? == true)
     end
+    (-100..100).step(2) do |n|
+      assert(n.odd? == false)
+    end
+  end
 
+  def test_multiple?
+    assert( ! 1.multiple?(2) )
+    assert(   2.multiple?(2) )
+    assert( ! 5.multiple?(3) )
+    assert(   6.multiple?(3) )
   end
 
+end
+
 
 

data/test/unit/kernel/test_report.rb

@@ -1,18 +1,15 @@
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |
+#      _____         _
+#    |_   _|__  ___| |_
+#     | |/ _ \/ __| __|
+#    | |  __/\__ \ |
 #   |_|\___||___/\__|
 #
-# for lib/facets/kernel/silence.rb
-#
-# Extracted Mon Sep 03 16:23:07 -0700 2007
-# w/ Test Extraction Ratchet
-#
+# for facets/kernel/report.rb
 
 require 'facets/kernel/report.rb'
 require 'test/unit'
 
-class TestKernelError < Test::Unit::TestCase
-  # TODO Must silence output to test these methods.
-end
+# TODO Must silence output to test these methods.
+
+#class TestKernelReport < Test::Unit::TestCase
+#end

data/test/unit/kernel/test_val.rb

@@ -1,50 +1,55 @@
-  #  _____         _
-  # |_   _|__  ___| |_
-  #   | |/ _ \/ __| __|
-  #   | |  __/\__ \ |
-  #   |_|\___||___/\__|
-  #
-  # for lib/facets/kernel/val.rb
-  #
-  # Extracted Mon Sep 03 16:23:07 -0700 2007
-  # w/ Test Extraction Ratchet
-  #
-
- require 'facets/kernel/val.rb'
-
-
-
-  require 'test/unit'
-
-  class TestKernelVal < Test::Unit::TestCase
-
-    def test_val_1
-      f = nil
-      t = 1
-      assert( ! f.val? )
-      assert( t.val? )
-    end
-
-    def test_val_2
-      f = []
-      t = [1]
-      assert( ! f.val? )
-      assert( t.val? )
-    end
-
-    def test_val_3
-      f = ''
-      t = '1'
-      assert( ! f.val? )
-      assert( t.val? )
-    end
-
-    def test_in?
-      assert( 5.in?(0..10) )
-      assert( 5.in?([1,2,3,4,5]) )
-    end
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |
+#   |_|\___||___/\__|
+#
+# for facets/kernel/val.rb
+
+require 'facets/kernel/val.rb'
+require 'test/unit'
+
+class TestKernelVal < Test::Unit::TestCase
+
+  def test_val_1
+    f = nil
+    t = 1
+    assert( ! f.val? )
+    assert( t.val? )
+  end
+
+  def test_val_2
+    f = []
+    t = [1]
+    assert( ! f.val? )
+    assert( t.val? )
+  end
+
+  def test_val_3
+    f = ''
+    t = '1'
+    assert( ! f.val? )
+    assert( t.val? )
+  end
+
+  def test_in?
+    assert( 5.in?(0..10) )
+    assert( 5.in?([1,2,3,4,5]) )
+  end
 
+  def test_not_nil?
+    assert_equal(true,  5.not_nil?)
+    assert_equal(true,  :x.not_nil?)
+    assert_equal(false, nil.not_nil?)
+    assert_equal(true,  false.not_nil?)
   end
 
+  #def test_non_nil?
+  #  assert_equal(true,  5.non_nil?)
+  #  assert_equal(true,  :x.non_nil?)
+  #  assert_equal(false, nil.non_nil?)
+  #  assert_equal(true,  false.non_nil?)
+  #end
 
+end
 

data/test/unit/module/test_include.rb

@@ -1,78 +1,77 @@
-  #  _____         _
-  # |_   _|__  ___| |_
-  #   | |/ _ \/ __| __|
-  #   | |  __/\__ \ |
-  #   |_|\___||___/\__|
-  #
-  # for lib/facets/module/include.rb
-  #
-  # Extracted Mon Sep 03 16:23:07 -0700 2007
-  # w/ Test Extraction Ratchet
-  #
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |
+#   |_|\___||___/\__|
+#
+# for facets/module/include.rb
 
- require 'facets/module/include.rb'
+require 'facets/module/include.rb'
+require 'test/unit'
 
+class TestInclude < Test::Unit::TestCase
 
+  def test_ancestor
+    assert( self.class.ancestor?(::Test::Unit::TestCase) )
+  end
 
-  require 'test/unit'
-
-  class TestIncludeAs < Test::Unit::TestCase
-
-    module MockModule
-      def x; "X"; end
-      def y; @y; end
-    end
+end
 
-    class MockObject
-      include_as :mod => MockModule
+class TestIncludeAs < Test::Unit::TestCase
 
-      def initialize
-        @y = "Y"
-      end
-    end
+  module MockModule
+    def x; "X"; end
+    def y; @y; end
+  end
 
-    def test_01
-      m = MockObject.new
-      assert_equal( "X", m.mod.x )
-    end
+  class MockObject
+    include_as :mod => MockModule
 
-    def test_02
-      m = MockObject.new
-      assert_equal( "Y", m.mod.y )
+    def initialize
+      @y = "Y"
     end
+  end
 
+  def test_01
+    m = MockObject.new
+    assert_equal( "X", m.mod.x )
   end
 
-  class TestOnInclude < Test::Unit::TestCase
+  def test_02
+    m = MockObject.new
+    assert_equal( "Y", m.mod.y )
+  end
 
-    module M
-      def self.check ; @@check ; end
-      on_included %{
-        @@check = 1
-      }
-    end
+end
 
-    module Q
-      def self.check ; @@check ; end
-      on_included %{
-        @@check = 1
-      }
-      on_included %{
-        @@check = 2
-      }
-    end
+class TestOnInclude < Test::Unit::TestCase
 
-    class C
-      include M
-      include Q
-    end
+  module M
+    def self.check ; @@check ; end
+    on_included %{
+      @@check = 1
+    }
+  end
 
-    def test_included
-      assert_equal(1, M.check)
-      assert_equal(2, Q.check)
-    end
+  module Q
+    def self.check ; @@check ; end
+    on_included %{
+      @@check = 1
+    }
+    on_included %{
+      @@check = 2
+    }
+  end
 
+  class C
+    include M
+    include Q
   end
 
+  def test_included
+    assert_equal(1, M.check)
+    assert_equal(2, Q.check)
+  end
 
+end
 

data/test/unit/module/test_name.rb

@@ -1,66 +1,53 @@
-  #  _____         _
-  # |_   _|__  ___| |_
-  #   | |/ _ \/ __| __|
-  #   | |  __/\__ \ |
-  #   |_|\___||___/\__|
-  #
-  # for lib/facets/module/name.rb
-  #
-  # Extracted Mon Sep 03 16:23:07 -0700 2007
-  # w/ Test Extraction Ratchet
-  #
-
- require 'facets/module/name.rb'
-
-
-
-  require 'test/unit'
-
-  class TestModuleName < Test::Unit::TestCase
-
-    def test_ancestor
-      assert( self.class.ancestor?(::Test::Unit::TestCase) )
-    end
-
-    def test_by_name
-      c = ::Test::Unit::TestCase.name
-      assert_equal( ::Test::Unit::TestCase, Module.by_name(c) )
-      c = "Test::Unit::TestCase"
-      assert_equal( ::Test::Unit::TestCase, Class.by_name(c) )
-    end
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |
+#   |_|\___||___/\__|
+#
+# for facets/module/name.rb
+
+require 'facets/module/name.rb'
+require 'test/unit'
+
+class TestModuleName < Test::Unit::TestCase
+
+  def test_by_name
+    c = ::Test::Unit::TestCase.name
+    assert_equal( ::Test::Unit::TestCase, Module.by_name(c) )
+    c = "Test::Unit::TestCase"
+    assert_equal( ::Test::Unit::TestCase, Class.by_name(c) )
+  end
 
-    def test_basename
-      assert_equal( "TestCase", ::Test::Unit::TestCase.basename )
-    end
+  def test_basename
+    assert_equal( "TestCase", ::Test::Unit::TestCase.basename )
+  end
 
-    def test_dirname
-      assert_equal( 'Test::Unit', Test::Unit::TestCase.dirname )
-      assert_equal( 'Test::Unit', ::Test::Unit::TestCase.dirname )
-      assert_equal( '', Test.dirname )
-      assert_equal( '', ::Test.dirname )
-    end
+  def test_dirname
+    assert_equal( 'Test::Unit', Test::Unit::TestCase.dirname )
+    assert_equal( 'Test::Unit', ::Test::Unit::TestCase.dirname )
+    assert_equal( '', Test.dirname )
+    assert_equal( '', ::Test.dirname )
+  end
 
-    def test_modspace
-      assert_equal( Test::Unit, Test::Unit::TestCase.modspace )
-      assert_equal( ::Test::Unit, ::Test::Unit::TestCase.modspace )
-      assert_equal( Object, ::Test.modspace )
-    end
+  def test_modspace
+    assert_equal( Test::Unit, Test::Unit::TestCase.modspace )
+    assert_equal( ::Test::Unit, ::Test::Unit::TestCase.modspace )
+    assert_equal( Object, ::Test.modspace )
+  end
 
-    module M
-      module N
-        class C
-          def n
-            self.class.nesting
-          end
+  module M
+    module N
+      class C
+        def n
+          self.class.nesting
         end
       end
     end
-
-    def test_nesting
-      assert_equal( [TestModuleName, M, M::N, M::N::C], M::N::C.new.n )
-    end
-
   end
 
+  def test_nesting
+    assert_equal( [TestModuleName, M, M::N, M::N::C], M::N::C.new.n )
+  end
 
+end