facets 3.0.0 → 3.2.0

data/test/core/module/test_module_load.rb

@@ -1,23 +0,0 @@
-covers 'facets/module/module_load'
-
-test_case Module do
-
-  # TODO: write tests for module_load
-
-  skip "need to use a ruby fixture file to test module_load.rb" do
-
-    method :module_load do
-    end
-
-    method :module_require do
-    end
-
-    method :class_load do
-    end
-
-    method :class_require do
-    end
-
-  end
-
-end

data/test/core/module/test_nodef.rb

@@ -1,19 +0,0 @@
-covers 'facets/module/nodef'
-
-test_case Module do
-
-  method :nodef do
-
-    test do
-      c = Class.new do
-        def the_undefined_method ; 'not here' ; end
-        nodef :the_undefined_method
-      end
-
-      c.new.refute.respond_to?(:the_undefined_method)
-    end
-
-  end
-
-end
-

data/test/core/module/test_op.rb

@@ -1,56 +0,0 @@
-covers 'facets/module/op.rb'
-
-test_case Module do
-
-  setup do
-    @a = Module.new do
-      def x; "x"; end
-      def z; "zA"; end
-    end
-
-    @b = Module.new do
-      def y; "y"; end
-      def z; "zB"; end
-    end
-  end
-
-  method :+ do
-
-    test do
-      q = @a + @b
-      q.extend q
-
-      q.x.assert == "x"
-      q.y.assert == "y"
-      q.z.assert == "zB"
-    end
-
-  end
-
-  method :- do
-
-    test do
-      r = @a - @b
-      r.extend r
-
-      r.x.assert == "x"
-      NoMethodError.assert.raised?{ r.z }
-    end
-
-  end
-
-  method :* do
-
-    test do
-      z = @a * { :x => :y }
-      z.extend z
-
-      z.y.assert == "x"
-      z.z.assert == "zA"
-      NoMethodError.assert.raised?{ z.x }
-    end
-
-  end
-
-end
-

data/test/core/module/test_pathize.rb

@@ -1,25 +0,0 @@
-covers 'facets/module/pathize'
-
-test_case Module do
-
-  method :pathize do
-
-    test do
-      Lemon.pathize.assert == 'lemon'
-    end
-
-  end
-
-end
-
-test_case Class do
-
-  method :pathize do
-
-    test do
-      Lemon::TestCase.pathize.assert == 'lemon/test_case'
-    end
-
-  end
-
-end

data/test/core/module/test_preextend.rb

@@ -1,26 +0,0 @@
-covers 'facets/module/preextend'
-
-test_case Module do
-
-  method :preextend do
-
-    test "module method" do
-      m = Module.new do
-        def q; "qm"; end
-      end
-
-      n = Module.new do
-        preextend m
-        def q; "qn"; end
-      end
-
-      x = Class.new do
-        include n
-      end
-
-      n.q.assert == "qm"
-    end
-
-  end
-
-end

data/test/core/module/test_redefine_method.rb

@@ -1,30 +0,0 @@
-covers 'facets/module/redefine_method'
-
-test_case Module do
-
-  method :redefine_method do
-
-    test do
-      c = Class.new do
-        def a; "a"; end
-        redefine_method(:a){ nil }
-      end
-      c.new.a.assert == nil
-    end
-
-  end
-
-  method :redef do
-
-    test do
-      c = Class.new do
-        def b; "b"; end
-        redef(:b){ "x" }
-      end
-      c.new.b.assert == "x"
-    end
-
-  end
-
-end
-

data/test/core/module/test_redirect_method.rb

@@ -1,32 +0,0 @@
-covers 'facets/module/redirect_method'
-
-test_case Module do
-
-  method :redirect_method do
-
-    test do
-      c = Class.new do
-        def a1 ; 1 ; end
-        redirect_method :a2 => :a1
-      end
-
-      c.new.a2.assert == 1
-    end
-
-  end
-
-  method :redirect do
-
-    test do
-      c = Class.new do
-        def b1 ; 1 ; end
-        redirect :b2 => :b1
-      end
-
-      c.new.b2.assert == 1
-    end
-
-  end
-
-end
-

data/test/core/module/test_remove.rb

@@ -1,18 +0,0 @@
-covers 'facets/module/remove'
-
-test_case Module do
-
-  method :remove do
-
-    test do
-      c = Class.new do
-        def the_removed_method ; 'not here' ; end
-        remove :the_removed_method
-      end
-
-      c.new.refute.respond_to?(:the_removed_method)
-    end
-
-  end
-
-end

data/test/core/module/test_rename_method.rb

@@ -1,34 +0,0 @@
-covers 'facets/module/rename_method'
-
-test_case Module do
-
-  method :rename_method do
-
-    test do
-      c = Class.new do
-        def a; "A" ; end
-        rename_method :b, :a
-      end
-
-      c.new.refute.respond_to?(:a)
-      c.new.assert.respond_to?(:b)
-    end
-
-  end
-
-  method :rename do
-
-    test do
-      c = Class.new do
-        def c; "C" ; end
-        rename :d, :c
-      end
-
-      c.new.refute.respond_to?(:c)
-      c.new.assert.respond_to?(:d)
-    end
-
-  end
-
-end
-

data/test/core/module/test_revise.rb

@@ -1,61 +0,0 @@
-covers 'facets/module/revise'
-
-test_case Module do
-
-  method :revisal do
-
-    test do
-      m = Module.new do
-        def x ; 1 ; end
-      end
-
-      c = Class.new do
-        include m.revisal {
-          rename :y, :x
-        }
-      end
-
-      ic = c.new
-
-      ic.y.assert == 1
-      NoMethodError.assert.raised?{ ic.x }
-    end
-
-  end
-
-  method :revise do
-
-    test do
-      m = Module.new do
-        def x ; 1 ; end
-      end
-
-      c = Class.new do
-        include m.revise {
-          rename :y, :x
-        }
-      end
-
-      ic = c.new
-
-      ic.y.assert == 1
-      NoMethodError.assert.raised?{ ic.x }
-    end
-
-  end
-
-  method :remove do
-
-    test do
-      c = Class.new do
-        def the_removed_method ; 'not here' ; end
-        remove :the_removed_method
-      end
-
-      c.new.refute.respond_to?(:the_removed_method)
-    end
-
-  end
-
-end
-

data/test/core/module/test_set.rb

@@ -1,30 +0,0 @@
-covers 'facets/module/set'
-
-test_case Module do
-
-  method :set do
-
-    test do
-      c = Class.new do
-        set :x, 10
-      end
-
-      c.x.assert == 10
-    end
-
-    test do
-      h = 1
-      c = Class.new do
-        set :x do 
-          h += 1
-        end
-      end
-
-      c.x.assert == 2
-      c.x.assert == 3
-      c.x.assert == 4
-    end
-
-  end
-
-end

data/test/core/module/test_spacename.rb

@@ -1,15 +0,0 @@
-covers 'facets/module/spacename'
-
-test_case Module do
-
-  method :spacename do
-
-    test do
-      Lemon::TestCase.spacename.assert == 'Lemon'
-      Lemon.spacename.assert == ''  # should this be nil ?
-    end
-
-  end
-
-end
-

data/test/core/module/test_to_obj.rb

@@ -1,20 +0,0 @@
-covers 'facets/module/to_obj'
-
-test_case Module do
-
-  method :to_obj do
-
-    test do
-      m = Module.new do
-        def x; "x"; end
-        def y; "y"; end
-      end
-      o = m.to_obj
-      o.x.assert == "x"
-      o.y.assert == "y"
-    end
-
-  end
-
-end
-

data/test/core/module/test_wrap_method.rb

@@ -1,32 +0,0 @@
-covers 'facets/module/wrap_method'
-
-test_case Module do
-
-  method :wrap_method do
-
-    test do
-      c = Class.new do
-        def a; "A"; end
-        wrap_method(:a) { |old| old.call + "B" }
-      end
-
-      c.new.a.assert == "AB"
-    end
-
-  end
-
-  method :wrap do
-
-    test do
-      c = Class.new do
-        def b; "B"; end
-        wrap(:b) { |old| old.call + "C" }
-      end
-
-      c.new.b.assert == "BC"
-    end
-
-  end
-
-end
-

data/test/core/nilclass/test_to_f.rb

@@ -1,13 +0,0 @@
-covers 'facets/nilclass/to_f'
-
-test_case NilClass do
-
-  method :to_f do
-
-    test do
-      nil.to_f.assert == 0
-    end
-
-  end
-
-end

data/test/core/numeric/test_approx.rb

@@ -1,26 +0,0 @@
-covers 'facets/numeric/approx'
-
-test_case Numeric do
-
-  method :approx? do
-
-    test do
-      f = 10.006
-      assert( f.approx?(10, 0.1) )
-      assert( 100.4.approx?(100.6, 1) )
-    end
-
-  end
-
-  method :close? do
-
-    test do
-      f = 10.006
-      assert( f.close?(10, 0.1) )
-      assert( 100.4.close?(100.6, 1) )
-    end
-
-  end
-
-end
-

data/test/core/numeric/test_distance.rb

@@ -1,16 +0,0 @@
-covers 'facets/numeric/distance'
-
-test_case Numeric do
-
-  method :distance do
-
-    test do
-      10.distance(6).assert == 4
-      10.distance(8).assert == 2
-       7.distance(9).assert == -2
-    end
-
-  end
-
-end
-

data/test/core/numeric/test_length.rb

@@ -1,16 +0,0 @@
-covers 'facets/numeric/length'
-
-test_case Numeric do
-
-  method :length do
-
-    test do
-      (0..10).each do |power|
-        power.length.assert == power
-      end
-    end
-
-  end
-
-end
-

data/test/core/numeric/test_round.rb

@@ -1,76 +0,0 @@
-covers 'facets/numeric/round'
-
-test_case Numeric do
-
-  f0 = [ 0, 10, 15, 105 ]
-
-  method :round_at do
-
-    test "1" do
-      fr = f0.collect{ |f| f.round_at(1) }
-      fr.assert == [0,10,15,105]
-    end
-
-    test "2" do
-      fr = f0.collect { |f| f.round_at(2) }
-      fr.assert == [0,10,15,105]
-    end
-
-  end
-
-  method :round_to do
-
-    test "0.1" do
-      fr = f0.collect { |f| f.round_to(0.1) }
-      fr.assert == [0,10,15,105]
-    end
-
-    test "10" do
-      fr = f0.collect { |f| f.round_to(10) }
-      fr.assert == [0,10,20,110]
-    end
-
-  end
-
-  #method :round_off do
-  #  test do
-  #    1.2.round_off.assert == 1.0
-  #    1.8.round_off.assert == 2.0
-  #  end
-  #end
-
-end
-
-test_case Float do
-
-  f1 = [ 10.1, 10.01, 10.9, 10.09, 10.5, 10.05, 10.49 ]
-
-  method :round_at do
-
-    test "1" do
-      fr = f1.collect { |f| f.round_at(1) }
-      fr.assert == [10.1,10.0,10.9,10.1,10.5,10.1,10.5]
-    end
-
-    test "2" do
-      fr = f1.collect { |f| f.round_at(2) }
-      fr.assert == [10.1,10.01,10.9,10.09,10.5,10.05,10.49]
-    end
-
-  end
-
-  method :round_to do
-
-    test "0.1" do
-      fr = f1.collect { |f| f.round_to(0.1) }
-      fr.assert == [10.1,10.0,10.9,10.1,10.5,10.1,10.5]
-    end
-
-    test "10" do
-      fr = f1.collect { |f| f.round_to(10) }
-      fr.assert == [10,10,10,10,10,10,10]
-    end
-
-  end
-
-end

data/test/core/numeric/test_spacing.rb

@@ -1,17 +0,0 @@
-covers 'facets/numeric/spacing'
-
-test_case Numeric do
-
-  method :spacing do
-
-    test do
-      samples = [-10.5, -3, 3, 1.0e14, 10000, 14.5e10]
-      samples.each do |numeric_item|
-        numeric_item.spacing.assert == numeric_item.to_s.size
-        numeric_item.spacing.assert.kind_of?(Integer)
-      end
-    end
-
-  end
-
-end