facets 1.0.0 → 1.0.1

data/test/lib/facet/hash/test_inverse.rb

@@ -1,28 +0,0 @@
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-# for lib/facet/hash/inverse.rb
-#
-# Extracted Sun Dec 04 13:57:47 EST 2005
-# Unit Tools Reap Test Extractor
-#
-
-require 'facet/hash/inverse.rb'
-
-
-  require 'test/unit'
-
-  class TCHash < Test::Unit::TestCase
-
-    def test_each_with_key
-      h1 = { :a=>1, :b=>2, :c=>2 }
-      h2 = h1.inverse
-      assert_equal( {1=>:a, 2=>[:b,:c]}, h2 )
-    end
-
-  end
-
-

data/test/lib/facet/hash/test_keys_to_s.rb

@@ -1,34 +0,0 @@
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-# for lib/facet/hash/keys_to_s.rb
-#
-# Extracted Sun Dec 04 13:57:47 EST 2005
-# Unit Tools Reap Test Extractor
-#
-
-require 'facet/hash/keys_to_s.rb'
-
-
-  require 'test/unit'
-
-  class TCHash < Test::Unit::TestCase
-
-    def test_keys_to_s
-      foo = { :a=>1, :b=>2 }
-      assert_equal( { "a"=>1, "b"=>2 }, foo.keys_to_s )
-      assert_equal( { :a =>1, :b=>2 }, foo  )
-    end
-
-    def test_keys_to_s!
-      foo = { :a=>1, :b=>2 }
-      assert_equal( { "a"=>1, "b"=>2 }, foo.keys_to_s!  )
-      assert_equal( { "a"=>1, "b"=>2 }, foo )
-    end
-
-  end
-
-

data/test/lib/facet/hash/test_keys_to_sym.rb

@@ -1,34 +0,0 @@
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-# for lib/facet/hash/keys_to_sym.rb
-#
-# Extracted Sun Dec 04 13:57:47 EST 2005
-# Unit Tools Reap Test Extractor
-#
-
-require 'facet/hash/keys_to_sym.rb'
-
-
-  require 'test/unit'
-
-  class TCHash < Test::Unit::TestCase
-
-    def test_keys_to_sym
-      foo = { 'a'=>1, 'b'=>2 }
-      assert_equal( { :a=>1, :b=>2 }, foo.keys_to_sym )
-      assert_equal( { "a" =>1, "b"=>2 }, foo )
-    end
-
-    def test_keys_to_sym!
-      foo = { 'a'=>1, 'b'=>2 }
-      assert_equal( { :a=>1, :b=>2 }, foo.keys_to_sym! )
-      assert_equal( { :a=>1, :b=>2 }, foo  )
-    end
-
-  end
-
-

data/test/lib/facet/hash/test_op_fetch.rb

@@ -1,111 +0,0 @@
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-# for lib/facet/hash/op_fetch.rb
-#
-# Extracted Sun Dec 04 13:57:47 EST 2005
-# Unit Tools Reap Test Extractor
-#
-
-require 'facet/hash/op_fetch.rb'
-
-
-  require 'test/unit'
-
-  class TC_HashSlice < Test::Unit::TestCase
-
-    @hash = nil
-    AryKey = %w{an array as a key}
-    AryVal = %w{an array as a value}
-
-    def setup
-      @hash = {
-        "this" => "is",
-        "a" => "test",
-        "hash" => "with",
-        "some" => "values",
-        "for" => "testing",
-        AryKey => 'aryKey',
-        'aryVal' => AryVal
-      }
-    end
-
-    # Testing teardown method
-    def teardown
-      @hash = nil
-    end
-
-    # Make sure we haven't screwed up regular element reference
-    def test_get_regular
-        assert_equal('is', @hash['this'])
-        assert_equal('aryKey', @hash[ AryKey ])
-        assert_equal(AryVal, @hash[ 'aryVal' ])
-        assert_nil(@hash['nonExistant'])
-    end
-
-    # Test slice reference
-    def test_get_2args
-      res = @hash['this','a']
-      assert_instance_of( Array, res )
-      assert_equal( ['is','test'], res )
-
-      assert_equal(['aryKey','with'], @hash[ AryKey, 'hash' ])
-
-      assert_equal([AryVal,'testing'], @hash[ 'aryVal', 'for' ])
-
-      assert_equal(['aryKey',AryVal], @hash[ AryKey, 'aryVal' ])
-
-      res = @hash['nonExistant', 'anotherNonExistant']
-      assert_nil(res[0])
-      assert_nil(res[1])
-
-      @hash.default = 'default'
-      res = @hash['nonExistant', 'anotherNonExistant']
-      assert_equal( 'default', res[0] )
-      assert_equal( 'default', res[1] )
-    end
-
-    # Test fetching slices with duplicate keys
-    def test_get_duplicate_args
-      assert_equal(['is','is'], @hash['this','this'])
-      assert_equal(['aryKey','aryKey'], @hash[ AryKey, AryKey ])
-      assert_equal([AryVal,AryVal], @hash[ 'aryVal', 'aryVal' ])
-      assert_equal(['aryKey',AryVal,'aryKey','aryKey'], @hash[ AryKey, 'aryVal', AryKey, AryKey ])
-    end
-
-    # Test to make sure we haven't mucked up regular element assign
-    def test_set_regular
-      # Single string key assign
-      @hash['this'] = 'something else'
-      assert_equal( 'something else', @hash['this'] )
-
-      # Single array key assign
-      @hash[AryKey] = 'something else'
-      assert_equal( 'something else', @hash[AryKey] )
-
-      # Make sure range-assign behaviour is unchanged
-      rng = 1..5
-      @hash[ rng ] = 1..5
-      assert_instance_of( Range, @hash[rng] )
-      assert_equal( 1..5, @hash[1..5] )
-    end
-
-    # Test slice-assign
-    def test_set_2args
-      # Test slice-assign with string keys
-      assert_nothing_raised {@hash['this','a'] = 'other', 'stuff'}
-      assert_equal( 'other', @hash['this'] )
-      assert_equal( 'stuff', @hash['a'] )
-
-      # Test slice-assign with array keys and a string and array value
-      assert_nothing_raised {@hash[AryKey, %w{some other array}] = 'another', %w{set of values}}
-      assert_equal( 'another', @hash[AryKey] )
-      assert_equal( %w{set of values}, @hash[%w{some other array}] )
-    end
-
-  end
-
-

data/test/lib/facet/hash/test_op_lshift.rb

@@ -1,29 +0,0 @@
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-# for lib/facet/hash/op_lshift.rb
-#
-# Extracted Sun Dec 04 13:57:47 EST 2005
-# Unit Tools Reap Test Extractor
-#
-
-require 'facet/hash/op_lshift.rb'
-
-
-  require 'test/unit'
-
-  class TCHash < Test::Unit::TestCase
-
-    def test_shift_update
-      a = { :a => 1, :b => 2, :c => 3 }
-      b = { :a => 0, :d => 4 }
-      e = { :a => 0, :b => 2, :c => 3, :d => 4 }
-      assert_equal( e, a << b )
-    end
-
-  end
-
-

data/test/lib/facet/hash/test_rand_key.rb

@@ -1,27 +0,0 @@
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-# for lib/facet/hash/rand_key.rb
-#
-# Extracted Sun Dec 04 13:57:47 EST 2005
-# Unit Tools Reap Test Extractor
-#
-
-require 'facet/hash/rand_key.rb'
-
-
-  require 'test/unit'
-
-  class TCHash < Test::Unit::TestCase
-
-    def test_rand_key
-      h = { :a=>1, :b=>2, :c=>3 }
-      10.times { assert( h.keys.include?( h.rand_key ) ) }
-    end
-
-  end
-
-

data/test/lib/facet/hash/test_rand_pair.rb

@@ -1,27 +0,0 @@
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-# for lib/facet/hash/rand_pair.rb
-#
-# Extracted Sun Dec 04 13:57:47 EST 2005
-# Unit Tools Reap Test Extractor
-#
-
-require 'facet/hash/rand_pair.rb'
-
-
-  require 'test/unit'
-
-  class TCHash < Test::Unit::TestCase
-
-    def test_rand_pair
-      h = { :a=>1, :b=>2, :c=>3 }
-      10.times { k,v = *h.rand_pair; assert_equal( v, h[k] ) }
-    end
-
-  end
-
-

data/test/lib/facet/hash/test_rand_value.rb

@@ -1,27 +0,0 @@
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-# for lib/facet/hash/rand_value.rb
-#
-# Extracted Sun Dec 04 13:57:47 EST 2005
-# Unit Tools Reap Test Extractor
-#
-
-require 'facet/hash/rand_value.rb'
-
-
-  require 'test/unit'
-
-  class TCHash < Test::Unit::TestCase
-
-    def test_rand_value
-      h = { :a=>1, :b=>2, :c=>3 }
-      10.times { assert( h.values.include?( h.rand_value ) ) }
-    end
-
-  end
-
-

data/test/lib/facet/hash/test_replace_each.rb

@@ -1,29 +0,0 @@
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-# for lib/facet/hash/replace_each.rb
-#
-# Extracted Sun Dec 04 13:57:47 EST 2005
-# Unit Tools Reap Test Extractor
-#
-
-require 'facet/hash/replace_each.rb'
-
-
-  require 'test/unit'
-
-  class TCHash < Test::Unit::TestCase
-
-    def test_replace_each
-      a = { :a => 1, :b => 2, :c => 3 }
-      e = { :a => 2, :b => 3, :c => 4 }
-      a.replace_each{ |k,v| { k => v+1 } }
-      assert_equal( e, a )
-    end
-
-  end
-
-

data/test/lib/facet/hash/test_shuffle.rb

@@ -1,32 +0,0 @@
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-# for lib/facet/hash/shuffle.rb
-#
-# Extracted Sun Dec 04 13:57:47 EST 2005
-# Unit Tools Reap Test Extractor
-#
-
-require 'facet/hash/shuffle.rb'
-
-
-  require 'test/unit'
-
-  class TCHash < Test::Unit::TestCase
-
-    def test_shuffle
-      h = {:a=>1, :b=>2, :c=>3 }
-      assert_nothing_raised { h.shuffle }
-    end
-
-    def test_shuffle!
-      h = {:a=>1, :b=>2, :c=>3 }
-      assert_nothing_raised { h.shuffle! }
-    end
-
-  end
-
-

data/test/lib/facet/hash/test_slice.rb

@@ -1,27 +0,0 @@
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-# for lib/facet/hash/slice.rb
-#
-# Extracted Sun Dec 04 13:57:47 EST 2005
-# Unit Tools Reap Test Extractor
-#
-
-require 'facet/hash/slice.rb'
-
-
-  require 'test/unit'
-
-  class TCHash < Test::Unit::TestCase
-
-    def test_slice
-      h =  {:a=>1, :b=>2, :c=>3 }
-      assert_equal( [1,2], h.slice(:a,:b) )
-    end
-
-  end
-
-

data/test/lib/facet/hash/test_swap.rb

@@ -1,27 +0,0 @@
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-# for lib/facet/hash/swap.rb
-#
-# Extracted Sun Dec 04 13:57:47 EST 2005
-# Unit Tools Reap Test Extractor
-#
-
-require 'facet/hash/swap.rb'
-
-
-  require 'test/unit'
-
-  class TCHash < Test::Unit::TestCase
-
-    def test_swap!
-      h = { :a=>1, :b=>2 }
-      assert_equal( { :a=>2, :b=>1 }, h.swap!(:a, :b) )
-    end
-
-  end
-
-