facets 2.1.3 → 2.2.0

data/test/unit/file/test_read.rb

@@ -0,0 +1,34 @@
+require 'facets/file/read'
+
+require 'test/unit'
+
+# TODO Use real FileMock.
+
+# class TestFileRead < Test::Unit::TestCase
+#
+#
+#   class MockFile < ::File
+#     def open( fname, mode, &blk )
+#       blk.call(self)
+#     end
+#     def read( fname=nil )
+#       @mock_content.clone
+#     end
+#     def write( str )
+#       @mock_content = str
+#     end
+#     def <<( str )
+#       (@mock_content ||="") << str
+#     end
+#   end
+#
+#   File = MockFile.new
+#
+#   def test_read_list
+#     f = File.write("A\nB\nC")
+#     s = File.read_list( f )
+#     r = ['A','B','C']
+#     assert_equal( r, s )
+#   end
+#
+# end

data/test/unit/file/test_topath.rb

@@ -1,35 +1,27 @@
-#      _____         _
-#    |_   _|__  ___| |_
-#     | |/ _ \/ __| __|
-#    | |  __/\__ \ |
-#   |_|\___||___/\__|
-#
-# for facets/file/topath.rb
+# Test for facets/file/topath.rb
 
 require 'facets/file/topath.rb'
 
 require 'test/unit'
 
-# mock file
+class TestFile < Test::Unit::TestCase
 
-class MockFile < File
-  def self.open( fname, mode, &blk )
-    blk.call(self)
-  end
-  def self.read( fname=nil )
-    @mock_content.clone
-  end
-  def self.write( str )
-    @mock_content = str
-  end
-  def self.<<( str )
-    (@mock_content ||="") << str
+  # mock file
+
+  class MockFile < File
+    def self.open( fname, mode, &blk )
+      blk.call(self)
+    end
+    def self.read( fname=nil )
+      @mock_content.clone
+    end
+    def self.write( str )
+      @mock_content = str
+    end
+    def self.<<( str )
+      (@mock_content ||="") << str
+    end
   end
-end
-
-# tests
-
-class TestFile < Test::Unit::TestCase
 
   # TODO Write file identity tests.
 

data/test/unit/file/test_write.rb

@@ -1,10 +1,4 @@
-#      _____         _
-#    |_   _|__  ___| |_
-#     | |/ _ \/ __| __|
-#    | |  __/\__ \ |
-#   |_|\___||___/\__|
-#
-# for facets/file/write.rb
+# Test for facets/file/write.rb
 
 # TODO Needs a file mock.
 
@@ -43,7 +37,7 @@ end
 # TODO This isn't right, and I'm concerned about acidentally writing a real file.
 
 # class TestFileWrite < Test::Unit::TestCase
-# 
+#
 #   class MockFile < ::File
 #     def open( fname, mode, &blk )
 #       blk.call(self)
@@ -58,9 +52,9 @@ end
 #       (@mock_content ||="") << str
 #     end
 #   end
-# 
+#
 #   File = MockFile.new
-# 
+#
 #   def test_create
 #     f = "not a real file"
 #     t = 'This is a test'
@@ -68,7 +62,7 @@ end
 #     s = File.read( f )
 #     assert_equal( t, s )
 #   end
-# 
+#
 #   def test_rewrite
 #     f = "not a real file"
 #     t = 'This is a test'
@@ -77,6 +71,6 @@ end
 #     s = File.read(f)
 #     assert_equal( t.reverse, s )
 #   end
-# 
+#
 # end
 

data/test/unit/filetest/test_root.rb

@@ -0,0 +1,14 @@
+# Test for facets/filetest/root.rb
+
+require 'facets/filetest/root.rb'
+
+require 'test/unit'
+
+
+class TC_FileTest < Test::Unit::TestCase
+
+  def test_root
+    assert(FileTest.root?('/'))
+  end
+
+end

data/test/unit/hash/test_at.rb

@@ -1,29 +1,17 @@
-  #  _____         _
-  # |_   _|__  ___| |_
-  #   | |/ _ \/ __| __|
-  #   | |  __/\__ \ |
-  #   |_|\___||___/\__|
-  #
-  # for lib/facets/hash/at.rb
-  #
-  # Extracted Mon Sep 03 16:23:07 -0700 2007
-  # w/ Test Extraction Ratchet
-  #
+# Test for facets/hash/at
 
- require 'facets/hash/at.rb'
+require 'facets/hash/at.rb'
 
+require 'test/unit'
 
+class TestHashAt < Test::Unit::TestCase
 
-  require 'test/unit'
-
-  class TestHashAt < Test::Unit::TestCase
-
-    def test_at
-      h = { :a=>1, :b=>2 }
-      assert_equal( 1, h.at(:a) )
-      assert_equal( 2, h.at(:b) )
-    end
+  def test_at
+    h = { :a=>1, :b=>2 }
+    assert_equal( 1, h.at(:a) )
+    assert_equal( 2, h.at(:b) )
   end
+end
 
 
 

data/test/unit/hash/test_delete.rb

@@ -1,45 +1,30 @@
-  #  _____         _
-  # |_   _|__  ___| |_
-  #   | |/ _ \/ __| __|
-  #   | |  __/\__ \ |
-  #   |_|\___||___/\__|
-  #
-  # for lib/facets/hash/delete.rb
-  #
-  # Extracted Mon Sep 03 16:23:07 -0700 2007
-  # w/ Test Extraction Ratchet
-  #
+# Test for facets/hash/delete
 
- require 'facets/hash/delete.rb'
+require 'facets/hash/delete.rb'
 
+require 'test/unit'
 
+class TestHashDelete < Test::Unit::TestCase
 
-  require 'test/unit'
-
-  class TestHashDelete < Test::Unit::TestCase
-
-    def test_delete_unless
-      a = { :a => 1, :b => 2, :c => 3 }
-      e = { :a => 1 }
-      r = a.delete_unless{|k,v| v == 1}
-      assert_equal( e, a )
-    end
-
-    def test_delete_values
-      a = { :a => 1, :b => 2, :c => 3 }
-      e = { :b => 2, :c => 3 }
-      r = a.delete_values(1)
-      assert_equal( e, a )
-    end
-
-    def test_delete_values_at
-      a = { :a => 1, :b => 2, :c => 3 }
-      e = { :b => 2, :c => 3 }
-      r = a.delete_values_at(:a)
-      assert_equal( e, a )
-    end
-
+  def test_delete_unless
+    a = { :a => 1, :b => 2, :c => 3 }
+    e = { :a => 1 }
+    r = a.delete_unless{|k,v| v == 1}
+    assert_equal( e, a )
   end
 
+  def test_delete_values
+    a = { :a => 1, :b => 2, :c => 3 }
+    e = { :b => 2, :c => 3 }
+    r = a.delete_values(1)
+    assert_equal( e, a )
+  end
 
+  def test_delete_values_at
+    a = { :a => 1, :b => 2, :c => 3 }
+    e = { :b => 2, :c => 3 }
+    r = a.delete_values_at(:a)
+    assert_equal( e, a )
+  end
 
+end

data/test/unit/hash/test_has_keys.rb

@@ -1,36 +1,21 @@
-  #  _____         _
-  # |_   _|__  ___| |_
-  #   | |/ _ \/ __| __|
-  #   | |  __/\__ \ |
-  #   |_|\___||___/\__|
-  #
-  # for lib/facets/hash/has_keys.rb
-  #
-  # Extracted Mon Sep 03 16:23:07 -0700 2007
-  # w/ Test Extraction Ratchet
-  #
+# Test for facets/hash/has_keys
 
- require 'facets/hash/has_keys.rb'
+require 'facets/hash/has_keys.rb'
 
+require 'test/unit'
 
+class TestHashHasKeys < Test::Unit::TestCase
 
-  require 'test/unit'
-
-  class TestHashHasKeys < Test::Unit::TestCase
-
-    # TODO Write test for Hash#diff.
-
-    def test_has_keys?
-      assert( { :a=>1,:b=>2,:c=>3 }.has_keys?(:a,:b) )
-      assert( ! { :a=>1,:b=>2,:c=>3 }.has_keys?(:a,:b,:d) )
-    end
-
-    def test_has_only_keys?
-      assert( { :a=>1,:b=>2,:c=>3 }.has_only_keys?(:a,:b,:c) )
-      assert( ! { :a=>1,:b=>2,:c=>3 }.has_only_keys?(:a,:b) )
-    end
+  # TODO Write test for Hash#diff.
 
+  def test_has_keys?
+    assert( { :a=>1,:b=>2,:c=>3 }.has_keys?(:a,:b) )
+    assert( ! { :a=>1,:b=>2,:c=>3 }.has_keys?(:a,:b,:d) )
   end
 
+  def test_has_only_keys?
+    assert( { :a=>1,:b=>2,:c=>3 }.has_only_keys?(:a,:b,:c) )
+    assert( ! { :a=>1,:b=>2,:c=>3 }.has_only_keys?(:a,:b) )
+  end
 
-
+end

data/test/unit/hash/test_insert.rb

@@ -1,29 +1,15 @@
-  #  _____         _
-  # |_   _|__  ___| |_
-  #   | |/ _ \/ __| __|
-  #   | |  __/\__ \ |
-  #   |_|\___||___/\__|
-  #
-  # for lib/facets/hash/insert.rb
-  #
-  # Extracted Mon Sep 03 16:23:07 -0700 2007
-  # w/ Test Extraction Ratchet
-  #
+# Test for facets/hash/insert
 
- require 'facets/hash/insert.rb'
+require 'facets/hash/insert.rb'
 
+require 'test/unit'
 
+class TestHashInsert < Test::Unit::TestCase
 
-  require 'test/unit'
-
-  class TestHashInsert < Test::Unit::TestCase
-
-    def test_insert
-      h = { :a=>1, :b=>2 }
-      assert_equal( true  , h.insert(:c,3) )
-      assert_equal( false , h.insert(:a,0) )
-    end
+  def test_insert
+    h = { :a=>1, :b=>2 }
+    assert_equal( true  , h.insert(:c,3) )
+    assert_equal( false , h.insert(:a,0) )
   end
-
-
+end
 

data/test/unit/hash/test_inverse.rb

@@ -1,32 +1,17 @@
-  #  _____         _
-  # |_   _|__  ___| |_
-  #   | |/ _ \/ __| __|
-  #   | |  __/\__ \ |
-  #   |_|\___||___/\__|
-  #
-  # for lib/facets/hash/inverse.rb
-  #
-  # Extracted Mon Sep 03 16:23:07 -0700 2007
-  # w/ Test Extraction Ratchet
-  #
+# Test for lib/facets/hash/inverse
 
- require 'facets/hash/inverse.rb'
+require 'facets/hash/inverse.rb'
 
+require 'test/unit'
 
+class TestHashInverse < Test::Unit::TestCase
 
-  require 'test/unit'
-
-  class TestHashInverse < Test::Unit::TestCase
-
-    def test_inverse
-      h1 = { :a=>1, :b=>2, :c=>2 }
-      h2 = h1.inverse
-      assert_equal( :a, h2[1] )
-      assert( h2[2].include?(:b) )
-      assert( h2[2].include?(:c) )
-    end
-
+  def test_inverse
+    h1 = { :a=>1, :b=>2, :c=>2 }
+    h2 = h1.inverse
+    assert_equal( :a, h2[1] )
+    assert( h2[2].include?(:b) )
+    assert( h2[2].include?(:c) )
   end
 
-
-
+end

data/test/unit/hash/test_iterate.rb

@@ -1,38 +1,23 @@
-  #  _____         _
-  # |_   _|__  ___| |_
-  #   | |/ _ \/ __| __|
-  #   | |  __/\__ \ |
-  #   |_|\___||___/\__|
-  #
-  # for lib/facets/hash/iterate.rb
-  #
-  # Extracted Mon Sep 03 16:23:07 -0700 2007
-  # w/ Test Extraction Ratchet
-  #
+# Test for lib/facets/hash/iterate
 
- require 'facets/hash/iterate.rb'
+require 'facets/hash/iterate.rb'
 
+require 'test/unit'
 
+class TestHashIterate < Test::Unit::TestCase
 
-  require 'test/unit'
-
-  class TestHashIterate < Test::Unit::TestCase
-
-    def test_each_with_key
-      h1 = { :a=>1, :b=>2 }
-      h2 = {}
-      h1.each_with_key { |v,k| h2[v] = k }
-      assert_equal( {1=>:a, 2=>:b}, h2 )
-    end
-
-    def test_each_with_key
-      h1 = { :a=>1, :b=>2 }
-      h2 = {}
-      h1.each_with_index { |v,k| h2[v] = k }
-      assert_equal( {1=>:a, 2=>:b}, h2 )
-    end
-
+  def test_each_with_key
+    h1 = { :a=>1, :b=>2 }
+    h2 = {}
+    h1.each_with_key { |v,k| h2[v] = k }
+    assert_equal( {1=>:a, 2=>:b}, h2 )
   end
 
+  def test_each_with_key
+    h1 = { :a=>1, :b=>2 }
+    h2 = {}
+    h1.each_with_index { |v,k| h2[v] = k }
+    assert_equal( {1=>:a, 2=>:b}, h2 )
+  end
 
-
+end