facets 1.8.49 → 1.8.51

data/test/lib/facets/more/test_dependency.rb

@@ -1,82 +0,0 @@
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-# for lib/facets/more/dependency.rb
-#
-# Extracted Fri Feb 16 02:00:36 EST 2007
-# Project.rb Test Extraction
-#
-
-require 'facets/more/dependency.rb'
-
-
-  require 'test/unit'
-
-  class DependableTest1 < Test::Unit::TestCase
-
-    class C
-      #extend MethodDependency
-
-      attr :s
-      def initialize
-        @s = ''
-      end
-
-      def x ; @s << 'x'; end
-      def y ; @s << 'y'; end
-      def z ; @s << 'z'; end
-
-      depend :x => :y
-      depend :z => [:x, :y]
-    end
-
-    module M
-      #extend MethodDependency
-
-      attr :s
-      def initialize
-        @s = ''
-      end
-
-      def x ; @s << 'x'; end
-      def y ; @s << 'y'; end
-      def z ; @s << 'z'; end
-
-      depend :x => :y
-      depend :z => [:x, :y]
-    end
-
-    class D
-      include M
-    end
-
-    def test_01
-      c = C.new
-      c.x
-      assert_equal( 'yx', c.s )
-    end
-
-    def test_02
-      c = C.new
-      c.z
-      assert_equal( 'yxz', c.s )
-    end
-
-    def test_03
-      c = D.new
-      c.x
-      assert_equal( 'yx', c.s )
-    end
-
-    def test_04
-      c = D.new
-      c.z
-      assert_equal( 'yxz', c.s )
-    end
-
-  end
-
-

data/test/lib/facets/more/test_dictionary.rb

@@ -1,107 +0,0 @@
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-# for lib/facets/more/dictionary.rb
-#
-# Extracted Fri Feb 16 02:00:36 EST 2007
-# Project.rb Test Extraction
-#
-
-require 'facets/more/dictionary.rb'
-
-
-  require 'test/unit'
-
-  class TC_Dictionary < Test::Unit::TestCase
-
-    def test_create
-      hsh = Dictionary['z', 1, 'a', 2, 'c', 3]
-      assert_equal( ['z','a','c'], hsh.keys )
-    end
-
-    def test_op_store
-      hsh = Dictionary.new
-      hsh['z'] = 1
-      hsh['a'] = 2
-      hsh['c'] = 3
-      assert_equal( ['z','a','c'], hsh.keys )
-    end
-
-    def test_push
-      hsh = Dictionary['a', 1, 'c', 2, 'z', 3]
-      assert( hsh.push('end', 15) )
-      assert_equal( 15, hsh['end'] )
-      assert( ! hsh.push('end', 30) )
-      assert( hsh.unshift('begin', 50) )
-      assert_equal( 50, hsh['begin'] )
-      assert( ! hsh.unshift('begin', 60) )
-      assert_equal( ["begin", "a", "c", "z", "end"], hsh.keys )
-      assert_equal( ["end", 15], hsh.pop )
-      assert_equal( ["begin", "a", "c", "z"], hsh.keys )
-      assert_equal( ["begin", 50], hsh.shift )
-    end
-
-    def test_insert
-      # front
-      h = Dictionary['a', 1, 'b', 2, 'c', 3]
-      r = Dictionary['d', 4, 'a', 1, 'b', 2, 'c', 3]
-      assert_equal( 4, h.insert(0,'d',4) )
-      assert_equal( r, h )
-      # back
-      h = Dictionary['a', 1, 'b', 2, 'c', 3]
-      r = Dictionary['a', 1, 'b', 2, 'c', 3, 'd', 4]
-      assert_equal( 4, h.insert(-1,'d',4) )
-      assert_equal( r, h )
-    end
-
-    def test_update
-      # with other orderred hash
-      h1 = Dictionary['a', 1, 'b', 2, 'c', 3]
-      h2 = Dictionary['d', 4]
-      r = Dictionary['a', 1, 'b', 2, 'c', 3, 'd', 4]
-      assert_equal( r, h1.update(h2) )
-      assert_equal( r, h1 )
-      # with other hash
-      h1 = Dictionary['a', 1, 'b', 2, 'c', 3]
-      h2 = { 'd' => 4 }
-      r = Dictionary['a', 1, 'b', 2, 'c', 3, 'd', 4]
-      assert_equal( r, h1.update(h2) )
-      assert_equal( r, h1 )
-    end
-
-    def test_merge
-      # with other orderred hash
-      h1 = Dictionary['a', 1, 'b', 2, 'c', 3]
-      h2 = Dictionary['d', 4]
-      r = Dictionary['a', 1, 'b', 2, 'c', 3, 'd', 4]
-      assert_equal( r, h1.merge(h2) )
-      # with other hash
-      h1 = Dictionary['a', 1, 'b', 2, 'c', 3]
-      h2 = { 'd' => 4 }
-      r = Dictionary['a', 1, 'b', 2, 'c', 3, 'd', 4]
-      assert_equal( r, h1.merge(h2) )
-    end
-
-    def test_order_by
-      h1 = Dictionary['a', 3, 'b', 2, 'c', 1]
-      h1.order_by{ |k,v| v }
-      assert_equal( [1,2,3], h1.values )
-      assert_equal( ['c','b','a'], h1.keys )
-    end
-
-    def test_op_store
-      h1 = Dictionary[]
-      h1[:a] = 1
-      h1[:c] = 3
-      assert_equal( [1,3], h1.values )
-      h1[:b,1] = 2
-      assert_equal( [1,2,3], h1.values )
-      assert_equal( [:a,:b,:c], h1.keys )
-    end
-
-  end
-
-

data/test/lib/facets/more/test_elementor.rb

@@ -1,52 +0,0 @@
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-# for lib/facets/more/elementor.rb
-#
-# Extracted Fri Feb 16 02:00:36 EST 2007
-# Project.rb Test Extraction
-#
-
-require 'facets/more/elementor.rb'
-
-
-  require 'test/unit'
-
-  class TCElementor < Test::Unit::TestCase
-
-    def test_to_elementor
-      e = [1,2,3].to_elementor
-      assert_equal( [4,5,6], e + 3 )
-      assert_equal( [0,1,2], e - 1 )
-    end
-
-    def test_to_elementor_str
-      e = [1,2,3].to_elementor
-      assert_equal( ['1','2','3'], e.to_s )
-    end
-
-    def test_to_elementor!
-      e = [1,2,3].to_elementor!
-      e + 3
-      assert_equal( [4,5,6], e )
-    end
-
-    def test_every
-      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!
-      a = [1,2,3]
-      a.every! + 3
-      assert_equal( [4,5,6], a )
-    end
-
-  end
-
-

data/test/lib/facets/more/test_enumerablepass.rb

@@ -1,86 +0,0 @@
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-# for lib/facets/more/enumerablepass.rb
-#
-# Extracted Fri Feb 16 02:00:36 EST 2007
-# Project.rb Test Extraction
-#
-
-require 'facets/more/enumerablepass.rb'
-
-
-  require 'test/unit'
-
-  # fixture
-
-  class PlusArray
-    include EnumerablePass
-    def initialize(arr)
-      @arr = arr
-    end
-    def each(n=0)
-      @arr.each{ |e| yield(e+n) }
-    end
-  end
-
-  class TC_Enumerable < Test::Unit::TestCase
-
-    def test_collect
-      t = PlusArray.new([1,2,3])
-      assert_equal( [5,6,7], t.collect(4){ |e| e } )
-    end
-
-    #def test_each_slice
-    #  t = PlusArray.new([1,2,3,4])
-    #  a = []
-    #  t.each_slice(2,4){ |e,f| a << [e,f] }
-    #  assert_equal( [[5,6],[7,8]], a )
-    #end
-
-    #def test_find
-    #  t = PlusArray.new([1,2,3,4])
-    #  f = t.find(2, :ifnone=>lambda{:NOPE}) { |a| a == 10 }
-    #  assert_equal(:NOPE, f)
-    #end
-
-    def test_grep
-      # TODO
-    end
-
-    def test_to_a
-      t = PlusArray.new([1,2,3])
-      assert_equal( [5,6,7], t.to_a(4) )  
-    end
-
-    def test_min
-      t = PlusArray.new([1,2,3])
-      assert_equal( 5, t.min(4) )
-    end
-
-    def test_max
-      t = PlusArray.new([1,2,3])
-      assert_equal( 7, t.max(4) )
-    end
-
-    def test_include?
-      t = PlusArray.new([1,2,3])
-      assert( t.include?(7,4) )
-    end
-
-    def test_select
-      t = PlusArray.new([1,2,3])
-      assert_equal( [6], t.select(4){ |x| x == 6 } )
-    end
-
-    def test_reject
-      t = PlusArray.new([1,2,3])
-      assert_equal( [5,7], t.reject(4){ |x| x == 6 } )
-    end
-
-  end
-
-

data/test/lib/facets/more/test_floatstring.rb

@@ -1,36 +0,0 @@
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-# for lib/facets/more/floatstring.rb
-#
-# Extracted Fri Feb 16 02:00:36 EST 2007
-# Project.rb Test Extraction
-#
-
-require 'facets/more/floatstring.rb'
-
-
-  require 'test/unit' 
-
-  class TC_FloatString < Test::Unit::TestCase
-
-    def test_inner_inset
-      fs = FloatString.new( "Hello World!" )
-      fs.inner_insert("XXX", 4)
-      assert_equal("HellXXXo World!", fs.to_s)
-      fs.inner_insert("YYY", 4)
-      assert_equal("HellXXXYYYo World!", fs.to_s)
-    end
-
-    def test_fill
-      fs = FloatString.new( "Hello World!" )
-      fs.inner_insert("XXX", 4)
-      assert_equal("HeNNNN World!", fs.fill("N", 2..4))
-    end
-
-  end
-
-

data/test/lib/facets/more/test_functor.rb

@@ -1,39 +0,0 @@
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-# for lib/facets/more/functor.rb
-#
-# Extracted Fri Feb 16 02:00:36 EST 2007
-# Project.rb Test Extraction
-#
-
-require 'facets/more/functor.rb'
-
-
-  require 'test/unit'
-
-  class TC_Functor < Test::Unit::TestCase
-
-    def test_function
-      f = Functor.new { |op, x| x.send(op, x) }
-      assert_equal( 2, f + 1 ) #=> 2
-      assert_equal( 4, f + 2 ) #=> 4
-      assert_equal( 6, f + 3 ) #=> 6
-      assert_equal( 1, f * 1 ) #=> 1
-      assert_equal( 4, f * 2 ) #=> 4
-      assert_equal( 9, f * 3 ) #=> 9
-    end
-
-    def test_decoration
-      f = Functor.new("A") { |op, a, x| x.send(op, a + x) }
-      assert_equal( 'BAB', f + 'B' )
-      assert_equal( 'CAC', f + 'C' )
-      assert_equal( 'DAD', f + 'D' )
-    end
-
-  end
-
-

data/test/lib/facets/more/test_htmlbuilder.rb

@@ -1,38 +0,0 @@
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-# for lib/facets/more/htmlbuilder.rb
-#
-# Extracted Fri Feb 16 02:00:36 EST 2007
-# Project.rb Test Extraction
-#
-
-require 'facets/more/htmlbuilder.rb'
-
-
-  require 'test/unit'
-
-  class TCHTMLBuilder < Test::Unit::TestCase
-
-    def test_01
-      x = HTMLBuilder.new
-      doc = x.html {
-        head {
-          title "Test"
-        }
-        body {
-          p "Hello"
-          text "Test"
-        }
-      }
-      r = "<html><head><title>Test</title></head><body><p>Hello</p>Test</body></html>"
-      assert_equal( r, doc )
-      assert_equal( r, x.to_s )
-    end
-
-  end
-
-