facets 0.9.0 → 1.0.0

data/test/lib/facet/array/test_to_hash.rb

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

data/test/lib/facet/binding/self/test_of_caller.rb

@@ -0,0 +1,35 @@
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |_
+#   |_|\___||___/\__|
+#
+# for lib/facet/binding/self/of_caller.rb
+#
+# Extracted Sun Dec 04 13:57:47 EST 2005
+# Unit Tools Reap Test Extractor
+#
+
+require 'facet/binding/self/of_caller.rb'
+
+
+  require 'test/unit'
+
+  class TC_Binding < Test::Unit::TestCase
+
+    def inc_counter(amount = 1)
+      Binding.of_caller do |binding|
+        inc = eval("lambda { |arg| counter += arg }", binding)
+        inc.call(amount)
+      end
+    end
+
+    def test_of_caller
+      counter = 0
+      2.times { inc_counter }
+      assert_equal( 2, counter )
+    end
+
+  end
+
+

data/test/lib/facet/binding/test___LINE__.rb

@@ -0,0 +1,43 @@
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |_
+#   |_|\___||___/\__|
+#
+# for lib/facet/binding/__LINE__.rb
+#
+# Extracted Sun Dec 04 13:57:47 EST 2005
+# Unit Tools Reap Test Extractor
+#
+
+require 'facet/binding/__LINE__.rb'
+
+
+  require 'test/unit'
+
+  class TCBinding < Test::Unit::TestCase
+
+    def setup
+      a = 1
+      b = 2
+      x = "hello"
+      # the line number must be updated if it moves
+      @bind = binding; @this_line_no = __LINE__
+      @this_file_name = File.basename( __FILE__ ) # why does it equal basename only?
+    end
+
+    def test___LINE__
+      assert_equal( @this_line_no, @bind.__LINE__ )
+    end
+
+    def test___FILE__
+      assert_equal( @this_file_name, File.basename( @bind.__FILE__ ) )
+    end
+
+    def test___DIR__
+      assert_equal( File.dirname( @bind.__FILE__ ), @bind.__DIR__ )
+    end
+
+  end
+
+

data/test/lib/facet/binding/test_call_stack.rb

@@ -0,0 +1,34 @@
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |_
+#   |_|\___||___/\__|
+#
+# for lib/facet/binding/call_stack.rb
+#
+# Extracted Sun Dec 04 13:57:47 EST 2005
+# Unit Tools Reap Test Extractor
+#
+
+require 'facet/binding/call_stack.rb'
+
+
+  require 'test/unit'
+
+  class TCBinding < Test::Unit::TestCase
+
+    def setup
+      a = 1
+      b = 2
+      x = "hello"
+      # the line number must be updated if it moves
+      @bind = binding; @this_line_no = 25
+    end
+
+    def test_call_stack
+      assert_instance_of( Array, @bind.call_stack )
+    end
+
+  end
+
+

data/test/lib/facet/binding/test_called.rb

@@ -0,0 +1,30 @@
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |_
+#   |_|\___||___/\__|
+#
+# for lib/facet/binding/called.rb
+#
+# Extracted Sun Dec 04 13:57:47 EST 2005
+# Unit Tools Reap Test Extractor
+#
+
+require 'facet/binding/called.rb'
+
+
+  require 'test/unit'
+
+  class TCBinding < Test::Unit::TestCase
+
+    def setup
+      @bind = binding
+    end
+
+    def test_called
+      assert_equal( :setup, @bind.called )
+    end
+
+  end
+
+

data/test/lib/facet/binding/test_caller.rb

@@ -0,0 +1,35 @@
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |_
+#   |_|\___||___/\__|
+#
+# for lib/facet/binding/caller.rb
+#
+# Extracted Sun Dec 04 13:57:47 EST 2005
+# Unit Tools Reap Test Extractor
+#
+
+require 'facet/binding/caller.rb'
+
+
+  require 'test/unit'
+
+  class TCBinding < Test::Unit::TestCase
+
+    def setup
+      a = 1
+      b = 2
+      x = "hello"
+      # the line number must be updated if it moves
+      @bind = binding; @this_line_no = 25
+    end
+
+    def test_caller
+      # how to test?
+      assert_nothing_raised{ @bind.caller }
+    end
+
+  end
+
+

data/test/lib/facet/binding/test_defined.rb

@@ -0,0 +1,34 @@
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |_
+#   |_|\___||___/\__|
+#
+# for lib/facet/binding/defined.rb
+#
+# Extracted Sun Dec 04 13:57:47 EST 2005
+# Unit Tools Reap Test Extractor
+#
+
+require 'facet/binding/defined.rb'
+
+
+  require 'test/unit'
+
+  class TCBinding < Test::Unit::TestCase
+
+    def setup
+      a = 1
+      b = 2
+      x = "hello"
+      # the line number must be updated if it moves
+      @bind = binding; @this_line_no = 25
+    end
+
+    def test_defined?
+      assert( @bind.defined?("a") )
+    end
+
+  end
+
+

data/test/lib/facet/binding/test_eval.rb

@@ -0,0 +1,34 @@
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |_
+#   |_|\___||___/\__|
+#
+# for lib/facet/binding/eval.rb
+#
+# Extracted Sun Dec 04 13:57:47 EST 2005
+# Unit Tools Reap Test Extractor
+#
+
+require 'facet/binding/eval.rb'
+
+
+  require 'test/unit'
+
+  class TCBinding < Test::Unit::TestCase
+
+    def setup
+      a = 1
+      b = 2
+      x = "hello"
+      # the line number must be updated if it moves
+      @bind = binding; @this_line_no = 25
+    end
+
+    def test_eval
+      assert_equal( "hello", @bind.eval("x") )
+    end
+
+  end
+
+

data/test/lib/facet/binding/test_local_variables.rb

@@ -0,0 +1,34 @@
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |_
+#   |_|\___||___/\__|
+#
+# for lib/facet/binding/local_variables.rb
+#
+# Extracted Sun Dec 04 13:57:47 EST 2005
+# Unit Tools Reap Test Extractor
+#
+
+require 'facet/binding/local_variables.rb'
+
+
+  require 'test/unit'
+
+  class TCBinding < Test::Unit::TestCase
+
+    def setup
+      a = 1
+      b = 2
+      x = "hello"
+      # the line number must be updated if it moves
+      @bind = binding; @this_line_no = 25
+    end
+
+    def test_local_variables
+      assert_equal( ["a","b","x"], @bind.local_variables )
+    end
+
+  end
+
+

data/test/lib/facet/binding/test_method_name.rb

@@ -0,0 +1,34 @@
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |_
+#   |_|\___||___/\__|
+#
+# for lib/facet/binding/method_name.rb
+#
+# Extracted Sun Dec 04 13:57:47 EST 2005
+# Unit Tools Reap Test Extractor
+#
+
+require 'facet/binding/method_name.rb'
+
+
+  require 'test/unit'
+
+  class TCBinding < Test::Unit::TestCase
+
+    def setup
+      a = 1
+      b = 2
+      x = "hello"
+      # the line number must be updated if it moves
+      @bind = binding; @this_line_no = 25
+    end
+
+    def test_methodname
+      assert_equal( 'setup', @bind.methodname )
+    end
+
+  end
+
+

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

@@ -0,0 +1,34 @@
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |_
+#   |_|\___||___/\__|
+#
+# for lib/facet/binding/op_fetch.rb
+#
+# Extracted Sun Dec 04 13:57:47 EST 2005
+# Unit Tools Reap Test Extractor
+#
+
+require 'facet/binding/op_fetch.rb'
+
+
+  require 'test/unit'
+
+  class TCBinding < Test::Unit::TestCase
+
+    def setup
+      a = 1
+      b = 2
+      x = "hello"
+      # the line number must be updated if it moves
+      @bind = binding; @this_line_no = 25
+    end
+
+    def test_op_fetch
+      assert_equal( "hello", @bind["x"] )
+    end
+
+  end
+
+

data/test/lib/facet/binding/test_op_store.rb

@@ -0,0 +1,35 @@
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |_
+#   |_|\___||___/\__|
+#
+# for lib/facet/binding/op_store.rb
+#
+# Extracted Sun Dec 04 13:57:47 EST 2005
+# Unit Tools Reap Test Extractor
+#
+
+require 'facet/binding/op_store.rb'
+
+
+  require 'test/unit'
+
+  class TCBinding < Test::Unit::TestCase
+
+    def setup
+      a = 1
+      b = 2
+      x = "hello"
+      # the line number must be updated if it moves
+      @bind = binding; @this_line_no = 25
+    end
+
+    def test_op_store
+      assert_nothing_raised{ @bind["x"] = "goodbye" }
+      assert_equal( "goodbye", @bind["x"] )
+    end
+
+  end
+
+

data/test/lib/facet/binding/test_self.rb

@@ -0,0 +1,34 @@
+#  _____         _
+# |_   _|__  ___| |_
+#   | |/ _ \/ __| __|
+#   | |  __/\__ \ |_
+#   |_|\___||___/\__|
+#
+# for lib/facet/binding/self.rb
+#
+# Extracted Sun Dec 04 13:57:47 EST 2005
+# Unit Tools Reap Test Extractor
+#
+
+require 'facet/binding/self.rb'
+
+
+  require 'test/unit'
+
+  class TCBinding < Test::Unit::TestCase
+
+    def setup
+      a = 1
+      b = 2
+      x = "hello"
+      # the line number must be updated if it moves
+      @bind = binding; @this_line_no = 25
+    end
+
+    def test_self
+      assert_equal( self, @bind.self )
+    end
+
+  end
+
+