facets 1.8.8 → 1.8.20

data/test/lib/facets/core/enumerable/test_commonality.rb

@@ -0,0 +1,31 @@
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |_
+#   |_|\___||___/\__|
+#
+# for lib/facets/core/enumerable/commonality.rb
+#
+# Extracted Tue Feb 06 17:03:51 EST 2007
+# Project.rb Test Extraction
+#
+
+require 'facets/core/enumerable/commonality.rb'
+
+
+  require 'test/unit'
+
+  class TCEnumerable < Test::Unit::TestCase
+
+    def test_commonality
+      a = [1,2,2,3,3,3]
+      r = { 2 => [2,2], 3 => [3,3,3] }
+      assert_equal( r, a.commonality )
+      a = [1,2,2,3,3,3]
+      r = {false=>[1, 2, 2], true=>[3, 3, 3]}
+      assert_equal( r, a.commonality { |x| x > 2 } )
+    end
+
+  end
+
+

data/test/lib/facets/core/enumerable/test_compact_collect.rb

@@ -0,0 +1,27 @@
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |_
+#   |_|\___||___/\__|
+#
+# for lib/facets/core/enumerable/compact_collect.rb
+#
+# Extracted Tue Feb 06 17:03:51 EST 2007
+# Project.rb Test Extraction
+#
+
+require 'facets/core/enumerable/compact_collect.rb'
+
+
+  require 'test/unit'
+
+  class TCEnumerable < Test::Unit::TestCase
+
+    def test_compact_collect
+      a = [1,2,nil,4].compact_collect { |e| e }
+      assert_equal( [1,2,4], a )
+    end
+
+  end
+
+

data/test/lib/facets/core/enumerable/test_count.rb

@@ -0,0 +1,38 @@
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |_
+#   |_|\___||___/\__|
+#
+# for lib/facets/core/enumerable/count.rb
+#
+# Extracted Tue Feb 06 17:03:51 EST 2007
+# Project.rb Test Extraction
+#
+
+require 'facets/core/enumerable/count.rb'
+
+
+  require 'test/unit'
+
+  class TC01 < Test::Unit::TestCase
+
+    def test_001
+      e = [ 'a', '1', 'a' ]
+      assert_equal( 1, e.count('1') )
+      assert_equal( 2, e.count('a') )
+    end
+
+    def test_002
+      e = [ ['a',2], ['a',2], ['a',2], ['b',1] ]
+      assert_equal( 3, e.count(['a',2]) )
+    end
+
+    def test_003
+      e = { 'a' => 2, 'a' => 2, 'b' => 1 }
+      assert_equal( 1, e.count('a',2) )
+    end
+
+  end
+
+

data/test/lib/facets/core/enumerable/test_cross.rb

@@ -0,0 +1,30 @@
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |_
+#   |_|\___||___/\__|
+#
+# for lib/facets/core/enumerable/cross.rb
+#
+# Extracted Wed Jan 24 15:33:15 EST 2007
+# Project.rb Test Extraction
+#
+
+require 'facets/core/enumerable/cross.rb'
+
+
+  require 'test/unit'
+
+  class TCEnumerable < Test::Unit::TestCase
+
+    def test_cross
+      a = [1,2,3].cross([4,5,6])
+      assert_equal( [[1, 4],[1, 5],[1, 6],[2, 4],[2, 5],[2, 6],[3, 4],[3, 5],[3, 6]], a )
+      a = []
+      [1,2,3].cross([4,5,6]) {|elem| a << elem }
+      assert_equal( [[1, 4],[1, 5],[1, 6],[2, 4],[2, 5],[2, 6],[3, 4],[3, 5],[3, 6]], a )
+    end
+
+  end
+
+

data/test/lib/facets/core/enumerable/test_each_by.rb

@@ -0,0 +1,71 @@
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |_
+#   |_|\___||___/\__|
+#
+# for lib/facets/core/enumerable/each_by.rb
+#
+# Extracted Tue Feb 06 17:03:51 EST 2007
+# Project.rb Test Extraction
+#
+
+require 'facets/core/enumerable/each_by.rb'
+
+
+  require 'test/unit'
+
+  class TCEnumerable < Test::Unit::TestCase
+
+    def test_01
+      x = []
+      [1,2,3,4].each_by{ |a,b| x << [a,b] }
+      o = [[1,2],[3,4]]
+      assert_equal( o, x )
+    end
+
+    def test_02
+      x = []
+      [1,2,3,4,5].each_by{ |a,b,c| x << [a,b,c] }
+      o = [[1,2,3],[4,5,nil]]
+      assert_equal( o, x )
+    end
+
+    def test_03
+      x = []
+      [1,2,3,4].each_by(2){ |a,b| x << [a,b] }
+      o = [[1,2],[3,4]]
+      assert_equal( o, x )
+    end
+
+    def test_04
+      x = []
+      [1,2,3,4,5,6,7,8].each_by(4){ |*a| x << a }
+      o = [ [[1,2,3,4]],[[5,6,7,8]] ]
+      assert_equal( o, x )
+    end
+
+    def test_05
+      x = []
+      [1,2,3,4,5,6].each_by(3){ |*a| x << a }
+      o = [ [[1,2,3]],[[4,5,6]] ]
+      assert_equal( o, x )
+    end
+
+    def test_06
+      a = [1,2,3,4,5,6]
+      r = []
+      a.each_by(2){ |x,y| r << [x,y] }
+      assert_equal( [[1,2],[3,4],[5,6]], r )
+    end
+
+    def test_07
+      a = [1,2,3,4,5,6]
+      r = []
+      a.each_by(3){ |*e| r << e }
+      assert_equal( [ [[1,2,3]], [[4,5,6]] ], r )
+    end
+
+  end
+
+

data/test/lib/facets/core/enumerable/test_each_combination.rb

@@ -0,0 +1,29 @@
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |_
+#   |_|\___||___/\__|
+#
+# for lib/facets/core/enumerable/each_combination.rb
+#
+# Extracted Tue Feb 06 17:03:51 EST 2007
+# Project.rb Test Extraction
+#
+
+require 'facets/core/enumerable/each_combination.rb'
+
+
+  require 'test/unit'
+
+  class TCEnumerable < Test::Unit::TestCase
+
+    def test_each_combination
+      r = []
+      a = [1,2,3,4]
+      a.each_combination(2){ |a,b| r << [a,b] }
+      assert_equal( [[1,2],[1,3],[1,4],[2,3],[2,4],[3,4]], r )
+    end
+
+  end
+
+

data/test/lib/facets/core/enumerable/test_each_pair.rb

@@ -0,0 +1,29 @@
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |_
+#   |_|\___||___/\__|
+#
+# for lib/facets/core/enumerable/each_pair.rb
+#
+# Extracted Tue Feb 06 17:03:51 EST 2007
+# Project.rb Test Extraction
+#
+
+require 'facets/core/enumerable/each_pair.rb'
+
+
+  require 'test/unit'
+
+  class TCEnumerable < Test::Unit::TestCase
+
+    def test_each_pair
+      r = []
+      a = [1,2,3,4]
+      a.each_pair{ |a,b| r << [a,b] }
+      assert_equal( [[1,2],[3,4]], r )
+    end
+
+  end
+
+

data/test/lib/facets/core/enumerable/test_each_slice.rb

@@ -0,0 +1,57 @@
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |_
+#   |_|\___||___/\__|
+#
+# for lib/facets/core/enumerable/each_slice.rb
+#
+# Extracted Tue Feb 06 17:03:51 EST 2007
+# Project.rb Test Extraction
+#
+
+require 'facets/core/enumerable/each_slice.rb'
+
+
+  require 'test/unit'
+
+  class TCEnumerable < Test::Unit::TestCase
+
+    def test_01
+      x = []
+      [1,2,3,4].each_slice(2){ |a,b| x << [a,b] }
+      o = [[1,2],[3,4]]
+      assert_equal( o, x )
+    end
+
+    def test_02
+      x = []
+      [1,2,3,4,5,6,7,8].each_slice(4){ |*a| x << a }
+      o = [[[1,2,3,4]],[[5,6,7,8]]]
+      assert_equal( o, x )
+    end
+
+    def test_03
+      x = []
+      [1,2,3,4,5,6].each_slice(3){ |a| x << a }
+      o = [[1,2,3],[4,5,6]]
+      assert_equal( o, x )
+    end
+
+    def test_04
+      a = [1,2,3,4,5,6]
+      r = []
+      a.each_slice(2){ |x,y| r << [x,y] }
+      assert_equal( [[1,2],[3,4],[5,6]], r )
+    end
+
+    def test_05
+      a = [1,2,3,4,5,6]
+      r = []
+      a.each_slice(3){ |e| r << e }
+      assert_equal( [[1,2,3],[4,5,6]], r )
+    end
+
+  end
+
+

data/test/lib/facets/core/enumerable/test_each_unique_pair.rb

@@ -0,0 +1,29 @@
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |_
+#   |_|\___||___/\__|
+#
+# for lib/facets/core/enumerable/each_unique_pair.rb
+#
+# Extracted Tue Feb 06 17:03:51 EST 2007
+# Project.rb Test Extraction
+#
+
+require 'facets/core/enumerable/each_unique_pair.rb'
+
+
+  require 'test/unit'
+
+  class TCEnumerable < Test::Unit::TestCase
+
+    def test_each_unique_pair
+      r = []
+      a = [1,2,3,4]
+      a.each_unique_pair{ |a,b| r << [a,b] }
+      assert_equal( [[1,2],[1,3],[1,4],[2,3],[2,4],[3,4]], r )
+    end
+
+  end
+
+

data/test/lib/facets/core/enumerable/test_eachn.rb

@@ -0,0 +1,34 @@
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |_
+#   |_|\___||___/\__|
+#
+# for lib/facets/core/enumerable/eachn.rb
+#
+# Extracted Tue Feb 06 17:03:51 EST 2007
+# Project.rb Test Extraction
+#
+
+require 'facets/core/enumerable/eachn.rb'
+
+
+  require 'test/unit'
+
+  class TCEnumerable < Test::Unit::TestCase
+
+    def test_eachn
+      x = []
+      [1,2,3,4].eachn{ |a,b| x << [a,b] }
+      o = [[1,2],[3,4]]
+      assert_equal( o, x )
+
+      x = []
+      [1,2,3,4,5].eachn{ |a,b,c| x << [a,b,c] }
+      o = [[1,2,3],[4,5,nil]]
+      assert_equal( o, x )
+    end
+
+  end
+
+

data/test/lib/facets/core/enumerable/test_entropy.rb

@@ -0,0 +1,26 @@
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |_
+#   |_|\___||___/\__|
+#
+# for lib/facets/core/enumerable/entropy.rb
+#
+# Extracted Tue Feb 06 17:03:51 EST 2007
+# Project.rb Test Extraction
+#
+
+require 'facets/core/enumerable/entropy.rb'
+
+
+  require 'test/unit'
+
+  class TCEnumerable < Test::Unit::TestCase
+
+    def test_entropy
+      assert_equal( 1.0, %w{ a b }.entropy )
+    end
+
+  end
+
+

data/test/lib/facets/core/enumerable/test_every.rb

@@ -0,0 +1,35 @@
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |_
+#   |_|\___||___/\__|
+#
+# for lib/facets/core/enumerable/every.rb
+#
+# Extracted Tue Feb 06 17:03:51 EST 2007
+# Project.rb Test Extraction
+#
+
+require 'facets/core/enumerable/every.rb'
+
+
+  require 'test/unit'
+
+  class TCEnumerable < Test::Unit::TestCase
+
+    def test_every_1
+      a = [1,2,3]
+      assert_equal( [4,5,6], a.every + 3 )
+      assert_equal( [0,1,2], a.every - 1 )
+      assert_equal( ['1','2','3'], a.every.to_s )
+    end
+
+    def test_every_2
+      a = [1,2,3]
+      a.every! + 3
+      assert_equal( [4,5,6], a )
+    end
+
+  end
+
+