section9-unittest 0.0.1

data/test/unittest_test.rb

@@ -0,0 +1,772 @@
+###
+### $Release: 0.0.1 $
+### $Copyright: copyright(c) 2011 kuwata-lab.com all rights reserved $
+### $License: MIT License $
+###
+
+File.instance_eval do
+  require join(dirname(expand_path(__FILE__)), "initialize.rb")
+end
+
+
+class UnitTest_TestCase_TC < TC
+
+  it "DESCRIPTION1" do
+  end
+
+  describe "TARGET1" do
+    describe "DETAIL1" do
+      it "DESC1" do
+      end
+    end
+  end
+
+  def test_it_method_defines_test_method_with_description
+    arr = self.methods.grep(/DESCRIPTION1/)
+    #assert_equal [:'test_001: DESCRIPTION1'], arr
+    assert_equal 1, arr.length
+    assert_equal 'test_001: DESCRIPTION1', arr.first.to_s
+  end
+
+  def test_describe_method_adds_prefix_to_test_method_name
+    arr = self.methods.grep(/TARGET1/)
+    #assert_equal [:'test_002: [TARGET1 > DETAIL1] DESC1'], arr
+    assert_equal 1, arr.length
+    assert_equal 'test_002: [TARGET1 > DETAIL1] DESC1', arr.first.to_s
+  end
+
+  def test_verify_method_returns_VerifyObject_instance
+    item = verify_(nil)
+    assert_same Section9::UnitTest::VerifyObject, item.class
+    __clear_registered()
+  end
+
+  def test_verify_NOT_method_returns_VerifyNotObject_instance
+    item = verify_(nil).NOT
+    assert_same Section9::UnitTest::VerifyNotObject, item.class
+    __clear_registered()
+  end
+
+  def test_verify_method_registers_self
+    item = verify_(nil)
+    d = item.instance_variable_get("@testcase").instance_variable_get("@__not_yet")
+    assert d.key?(item.__id__)
+    item == nil
+    assert ! d.key?(item.__id__)
+  end
+
+  def test_verify_NOT_method_registers_self_into_NOT_YET
+    item = verify_(nil).NOT
+    d = item.instance_variable_get("@testcase").instance_variable_get("@__not_yet")
+    assert d.key?(item.__id__)
+    item == false
+    assert ! d.key?(item.__id__)
+  end
+
+  def test_teardown_reports_verify_objects_not_tested_yet
+    bkup = $stderr
+    s = ""
+    def s.write(arg); self << arg; end
+    $stderr = s
+    verify_(nil)        ; line1 = __LINE__
+    verify_(nil).NOT    ; line2 = __LINE__
+    teardown()
+    expected = /\*\* warning: verify\(\) is called but not tested yet \(at #{__FILE__}:#{line1}(?::in `.*?')?\)\n/
+    assert_match expected, s
+    expected = /\*\* warning: verify\(\) is called but not tested yet \(at #{__FILE__}:#{line2}(?::in `.*?')?\)\n/
+    assert_match expected, s
+  ensure
+    $stderr = bkup
+  end
+
+  def test_recorder_returns_Recorder_object
+    assert_instance_of Section9::Recorder, recorder
+  end
+
+end
+
+
+class VerifyBaseObject_TC < TC
+
+  it "has been removed boolean methods." do
+    obj = Section9::UnitTest::VerifyBaseObject.new
+    assert_equal ["equal?"], obj.methods.grep(/\?$/).collect {|x| x.to_s }
+  end
+
+end
+
+
+class VerifyObject_TC < TC
+
+  MINITEST_P = defined?(MiniTest)
+  ASSERTION = MINITEST_P ? MiniTest::Assertion : Test::Unit::AssertionFailedError  # :nodoc:
+
+  def _should_pass
+    assert_nothing_raised { yield }
+  end
+
+  def _should_fail(errmsg=nil, linenum=nil)
+    ex = assert_raise(ASSERTION) { yield }
+    if errmsg
+      errmsg.is_a?(Regexp) ? assert_match(errmsg, ex.message) \
+                           : assert_equal(errmsg, ex.message)
+    end
+    if linenum
+      ex.backtrace[0] =~ /(.*:\d+)/
+      assert_equal "#{__FILE__}:#{linenum}", $1
+    end
+  end
+
+  def _get_failed
+    begin
+      yield
+    rescue ASSERTION => ex
+      return ex
+    end
+    flunk "assertion shoul be failed but not."
+  end
+
+  def _verify_location(ex, linenum)
+    ex.backtrace[0] =~ /(.*:\d+)/
+    assert_equal "#{__FILE__}:#{linenum}", $1
+  end
+
+  describe "#==" do
+    it "raises nothing when passed." do
+      _should_pass { verify_("Joe") == "Joe" }
+    end
+    it "raises assertion error when failed." do
+      errmsg = "<\"Jet\"> expected but was\n<\"Joe\">."
+      _should_fail(errmsg) { verify_("Joe") == "Jet" }
+    end
+    it "is available with NOT." do
+      _should_pass { verify_("Joe").NOT == "Jet" }
+      errmsg = "<\"Joe\"> expected to be != to\n<\"Joe\">."
+      _should_fail(errmsg) { verify_("Joe").NOT == "Joe" }
+    end
+    it "sets backtrace when failed." do
+      ex = _get_failed { verify_("Joe") == "Jet" }
+      _verify_location ex, __LINE__ - 1
+    end
+    it "shows context diff when two texts are different." do
+      act = <<'END'
+Haruhi
+Mikuru
+Yuki
+END
+      exp = <<'END'
+Haruhi
+Michiru
+Yuki
+END
+      expected = <<'END'.chomp
+--- expected
++++ actual
+@@ -1,3 +1,3 @@
+ Haruhi
+-Michiru
++Mikuru
+ Yuki
+END
+      ex = _get_failed { verify_(act) == exp }
+      verify_(ex.message).include?(expected)
+    end
+  end
+
+  describe "#!=" do
+    it "raises nothing when passed." do
+      _should_pass { verify_("Joe") != "Jet" }
+    end
+    it "raises assertion error when failed." do
+      errmsg = "<\"Joe\"> expected to be != to\n<\"Joe\">."
+      _should_fail(errmsg) { verify_("Joe") != "Joe" }
+    end
+    it "is available with NOT." do
+      _should_pass { verify_("Joe").NOT != "Joe" }
+      errmsg = "<\"Jet\"> expected but was\n<\"Joe\">."
+      _should_fail(errmsg) { verify_("Joe").NOT != "Jet" }
+    end
+    it "sets backtrace when failed." do
+      ex = _get_failed { verify_("Joe") != "Joe" }
+      _verify_location ex, __LINE__ - 1
+    end
+  end if RUBY_VERSION >= "1.9"
+
+  describe "#>" do
+    msg = MINITEST_P ? "Expected %s to be %s %s." : "<%s> expected to be\n%s\n<%s>."
+    it "raises nothing when passed." do
+      _should_pass { verify_(2) > 1 }
+    end
+    it "raises assertion error when failed." do
+      _should_fail(msg % [1, '>', 1]) { verify_(1) > 1 }
+      _should_fail(msg % [1, '>', 2]) { verify_(1) > 2 }
+    end
+    it "is available with NOT." do
+      _should_pass { verify_(1).NOT > 1 }
+      _should_pass { verify_(1).NOT > 2 }
+      _should_fail(msg % [2, '<=', 1]) { verify_(2).NOT > 1 }
+    end
+    it "sets backtrace when failed." do
+      ex = begin verify_(1) > 2
+           rescue ASSERTION => ex; ex end
+      _verify_location ex, __LINE__ - 2
+    end
+  end
+
+  describe "#>=" do
+    msg = MINITEST_P ? "Expected %s to be %s %s." : "<%s> expected to be\n%s\n<%s>."
+    it "raises nothing when passed." do
+      _should_pass { verify_(1) >= 1 }
+      _should_pass { verify_(2) >= 1 }
+    end
+    it "raises assertion error when failed." do
+      _should_fail(msg % [1, '>=', 2]) { verify_(1) >= 2 }
+    end
+    it "is available with NOT." do
+      _should_pass { verify_(1).NOT >= 2 }
+      _should_fail(msg % [1, '<', 1]) { verify_(1).NOT >= 1 }
+      _should_fail(msg % [2, '<', 1]) { verify_(2).NOT >= 1 }
+    end
+    it "sets backtrace when failed." do
+      ex = begin verify_(1) >= 2
+           rescue ASSERTION => ex; ex end
+      _verify_location ex, __LINE__ - 2
+    end
+  end
+
+  describe "#<" do
+    msg = MINITEST_P ? "Expected %s to be %s %s." : "<%s> expected to be\n%s\n<%s>."
+    it "raises nothing when passed." do
+      _should_pass { verify_(1) < 2 }
+    end
+    it "raises assertion error when failed." do
+      _should_fail(msg % [1, '<', 1]) { verify_(1) < 1 }
+      _should_fail(msg % [2, '<', 1]) { verify_(2) < 1 }
+    end
+    it "is available with NOT." do
+      _should_pass { verify_(1).NOT < 1 }
+      _should_pass { verify_(2).NOT < 1 }
+      _should_fail(msg % [1, '>=', 2]) { verify_(1).NOT < 2 }
+    end
+    it "sets backtrace when failed." do
+      ex = begin verify_(1) < 1
+           rescue ASSERTION => ex; ex end
+      _verify_location ex, __LINE__ - 2
+    end
+  end
+
+  describe "#<=" do
+    msg = MINITEST_P ? "Expected %s to be %s %s." : "<%s> expected to be\n%s\n<%s>."
+    it "raises nothing when passed." do
+      _should_pass { verify_(1) <= 1 }
+      _should_pass { verify_(1) <= 2 }
+    end
+    it "raises assertion error when failed." do
+      _should_fail(msg % [2, '<=', 1]) { verify_(2) <= 1 }
+    end
+    it "is available with NOT." do
+      _should_pass { verify_(2).NOT <= 1 }
+      _should_fail(msg % [1, '>', 1]) { verify_(1).NOT <= 1 }
+      _should_fail(msg % [1, '>', 2]) { verify_(1).NOT <= 2 }
+    end
+    it "sets backtrace when failed." do
+      ex = begin verify_(2) <= 1
+           rescue ASSERTION => ex; ex end
+      _verify_location ex, __LINE__ - 2
+    end
+  end
+
+  describe "#=~" do
+    it "raises nothing when passed." do
+      _should_pass { verify_("009") =~ /^\d+$/ }
+    end
+    it "raises assertion error when failed." do
+      msg = MINITEST_P ? "Expected /^\\d+$/ to match \"Joe\"." \
+                       : "<\"Joe\"> expected to be =~\n</^\\d+$/>."
+      _should_fail(msg) { verify_("Joe") =~ /^\d+$/ }
+    end
+    it "is available with NOT." do
+      _should_pass { verify_("Joe").NOT =~ /^\d+$/ }
+      _should_fail("</^\\d+$/> expected to not match\n<\"009\">.") { verify_("009").NOT =~ /^\d+$/ }
+    end
+    it "sets backtrace when failed." do
+      ex = begin verify_("Joe") =~ /^\d+$/
+           rescue ASSERTION => ex; ex end
+      _verify_location ex, __LINE__ - 2
+    end
+  end
+
+  describe "#!~" do
+    it "raises nothing when passed." do
+      _should_pass { verify_("Joe") !~ /^\d+$/ }
+    end
+    it "raises assertion error when failed." do
+      #msg = MINITEST_P ? "Expected /^\\d+$/ to not match \"009\"." \
+      #                 : "<\"009\"> expected to not match\n</^\\d+$/>."
+      msg = MINITEST_P ? "</^\\d+$/> expected to not match\n<\"009\">." \
+                       : "<\"009\"> expected to not match\n</^\\d+$/>."
+      _should_fail(msg) { verify_("009") !~ /^\d+$/ }
+    end
+    it "is available with NOT." do
+      msg = MINITEST_P ? "Expected /^\\d+$/ to match \"Joe\"." \
+                       : "</^\\d+$/> expected to be =~\n<\"Joe\">."
+      _should_pass { verify_("Joe").NOT =~ /^\d+$/ }
+      _should_fail(msg) { verify_("Joe").NOT !~ /^\d+$/ }
+    end
+    it "sets backtrace when failed." do
+      ex = begin verify_("009") !~ /^\d+$/
+           rescue ASSERTION => ex; ex end
+      _verify_location ex, __LINE__ - 2
+    end
+  end if RUBY_VERSION >= "1.9"
+
+  describe "#nil?" do
+    it "raises nothing when passed." do
+      _should_pass { verify_(nil).nil? }
+    end
+    it "raises assertion error when failed." do
+      msg = MINITEST_P ? "Expected \"Joe\" to be nil." \
+                       : "<nil> expected but was\n<\"Joe\">."
+      _should_fail(msg) { verify_("Joe").nil? }
+    end
+    it "is available with NOT." do
+      _should_pass { verify_("Joe").NOT.nil? }
+      errmsg = "<nil> expected to not be nil."      # OK?
+      _should_fail(errmsg) { verify_(nil).NOT.nil? }
+    end
+    it "sets backtrace when failed." do
+      ex = begin verify_("Joe").nil?
+           rescue ASSERTION => ex; ex end
+      _verify_location ex, __LINE__ - 2
+    end
+  end
+
+  describe "#same?" do
+    it "raises nothing when passed." do
+      _should_pass { verify_(:Joe).same?(:Joe) }
+    end
+    it "raises assertion error when failed." do
+      msg = MINITEST_P ? /^Expected "Joe" \((oid=\d+|0x[0-9a-f]+)?\) to be the same as "Joe" \((oid=\d+|0x[0-9a-f]+)?\d+\)\.$/ \
+                       : /^<"Joe">\nwith id <.*?> expected to be equal\? to\n<"Joe">\nwith id <.*?>\.$/
+      _should_fail(msg) { verify_("Joe").same?("Joe") }
+    end
+    it "is available with NOT." do
+      _should_pass { verify_("Joe").NOT.same?("Joe") }
+      msg = /^<:Joe>\nwith id <\d+> expected to not be equal\? to\n<:Joe>\nwith id <\d+>\./   # OK?
+      _should_fail(msg) { verify_(:Joe).NOT.same? :Joe }
+    end
+    it "sets backtrace when failed." do
+      ex = begin verify_("Joe").same?("Joe")
+           rescue ASSERTION => ex; ex end
+      _verify_location ex, __LINE__ - 2
+    end
+  end
+
+  describe "#kind_of?" do
+    it "raises nothing when passed." do
+      _should_pass { verify_(123).kind_of?(Numeric) }
+    end
+    it "raises assertion error when failed." do
+      msg = MINITEST_P ? "Expected :Joe to be a kind of String, not Symbol." \
+                       : "<:Joe>\nexpected to be kind_of?\n<String> but was\n<Symbol>."
+      _should_fail(msg) { verify_(:Joe).kind_of?(String) }
+    end
+    it "is available with NOT." do
+      _should_pass { verify_(:Joe).NOT.kind_of?(String) }
+      msg = "<\"Joe\">\nexpected not to be kind_of?\n<String> but was\n<String>." # OK?
+      _should_fail(msg) { verify_("Joe").NOT.kind_of?(String) }
+    end
+    it "sets backtrace when failed." do
+      ex = begin verify_(:Joe).kind_of?(String)
+           rescue ASSERTION => ex; ex end
+      _verify_location ex, __LINE__ - 2
+    end
+  end
+
+  describe "#instance_of?" do
+    it "raises nothing when passed." do
+      _should_pass { verify_(123).instance_of?(Fixnum) }
+    end
+    it "raises assertion error when failed." do
+      msg = MINITEST_P ? "Expected 123 to be an instance of Numeric, not Fixnum." \
+                       : "<123> expected to be an instance of\n<Numeric> but was\n<Fixnum>."
+      _should_fail(msg) { verify_(123).instance_of?(Numeric) }
+    end
+    it "is available with NOT." do
+      _should_pass { verify_(123).NOT.instance_of?(Numeric) }
+      errmsg = "<123>\nexpected not to be instance_of?\n<Fixnum> but was."  # OK?
+      _should_fail(errmsg) { verify_(123).NOT.instance_of?(Fixnum) }
+    end
+    it "sets backtrace when failed." do
+      ex = begin verify_(123).instance_of?(Numeric)
+           rescue ASSERTION => ex; ex end
+      _verify_location ex, __LINE__ - 2
+    end
+  end
+
+  describe "#in_delta?" do
+    it "raises nothing when passed." do
+      _should_pass { verify_(3.1415).in_delta?(3.141, 0.001) }
+    end
+    it "raises assertion error when failed." do
+      msg = MINITEST_P ? "Expected 3.141 - 3.1415 (0.000500000000000167) to be < 0.0001." \
+                       : "<3.141> and\n<3.1415> expected to be within\n<0.0001> of each other."
+      _should_fail(msg) { verify_(3.1415).in_delta?(3.141, 0.0001) }
+    end
+    it "is available with NOT." do
+      _should_pass { verify_(3.1415).NOT.in_delta?(3.141, 0.0001) }
+      errmsg = "<3.141> and\n<3.1415> expected to be without\n<0.0001> of each other."
+      _should_fail(errmsg) { verify_(3.1415).NOT.in_delta?(3.141, 0.001) }
+    end
+    it "sets backtrace when failed." do
+      ex = begin verify_(3.1415).in_delta?(3.141, 0.0001)
+           rescue ASSERTION => ex; ex end
+      _verify_location ex, __LINE__ - 2
+    end
+  end
+
+  describe "#respond_to?" do
+    it "raises nothing when passed." do
+      _should_pass { verify_("").respond_to?(:empty?) }
+    end
+    it "raises assertion error when failed." do
+      msg = MINITEST_P ? "Expected 123 (Fixnum) to respond to #empty?."\
+                       : "<123>\nof type <Fixnum>\nexpected to respond_to?<:empty?>."
+      _should_fail(msg) { verify_(123).respond_to?(:empty?) }
+    end
+    it "is available with NOT." do
+      _should_pass { verify_(123).NOT.respond_to?(:empty?) }
+      errmsg = "Expected \"\" not to respond to :empty?."
+      _should_fail(errmsg) { verify_("").NOT.respond_to?(:empty?) }
+    end
+    it "sets backtrace when failed." do
+      ex = begin verify_(123).respond_to?(:empty?)
+           rescue ASSERTION => ex; ex end
+      _verify_location ex, __LINE__ - 2
+    end
+  end
+
+  describe "#raise?" do
+    errmsg = "undefined method `reverse' for :Joe:Symbol"
+    it "raises nothing when passed." do
+      _should_pass { verify_(proc { :Joe.reverse }).raise?(NoMethodError, errmsg) }
+    end
+    it "can accept regexp as error message pattern." do
+      rexp = /undefined method `reverse' for :Joe:Symbol/
+      _should_pass { verify_(proc { :Joe.reverse }).raise?(NoMethodError, rexp) }
+    end
+    it "can accept block instead of proc object." do
+      _should_pass { verify_ { :Joe.reverse }.raise?(NoMethodError, errmsg) }
+    end
+    it "return exception object raised." do
+      ex = verify_(proc { :Joe.reverse }).raise?(NoMethodError, errmsg)
+      assert_kind_of NoMethodError, ex
+      assert_equal errmsg, ex.message
+    end
+    it "sets exception object." do
+      pr = proc { :Joe.reverse }
+      verify_(pr).raise?(NoMethodError, errmsg)
+      assert_kind_of NoMethodError, pr.exception
+      assert_equal errmsg, pr.exception.message
+    end
+    it "raises assertion error when failed." do
+      msg = MINITEST_P ? "NoMethodError expected but nothing was raised." \
+                       : "<NoMethodError> exception expected but none was thrown."
+      _should_fail(msg) { verify_(proc { :Joe.to_s }).raise?(NoMethodError) }
+      msg = "<\"MISSING\"> expected but was\n<\"undefined method `reverse' for :Joe:Symbol\">."
+      _should_fail(msg) { verify_(proc { :Joe.reverse }).raise?(NoMethodError, 'MISSING') }
+    end
+    it "is available with NOT." do
+      _should_pass { verify_(proc { :Joe.to_s }).NOT.raise? }
+      msg = MINITEST_P ? "Exception raised:\n<#<NoMethodError: undefined method `reverse' for :Joe:Symbol>>." \
+                       : /Exception raised:\nClass: <NoMethodError>\n/
+      _should_fail(msg) { verify_(proc { :Joe.reverse }).NOT.raise? }
+    end
+    it "sets backtrace when failed." do
+      ex = begin verify_(proc { :Joe.to_s }).raise?(NoMethodError)
+           rescue ASSERTION => ex; ex end
+      _verify_location ex, __LINE__ - 2
+    end
+  end
+
+  describe "#throw?" do
+    it "raises nothing when passed." do
+      _should_pass { verify_ { throw :Jet }.throw?(:Jet) }
+    end
+    it "raises assertion error when failed." do
+      msg = MINITEST_P ? "Expected :Joe to have been thrown, not :Jet." \
+                       : "<:Joe> expected to be thrown but\n<:Jet> was thrown."
+      _should_fail(msg) { verify_ { throw :Jet }.throw?(:Joe) }
+    end
+    it "raise assertion error when nothing thrown." do
+      msg = MINITEST_P ? "Expected :Joe to have been thrown." \
+                       : "<:Joe> should have been thrown."
+      _should_fail(msg) { verify_ { nil }.throw?(:Joe) }
+    end
+    it "is available with NOT." do
+      _should_pass { verify_ { nil }.NOT.throw? }
+      msg = MINITEST_P ? "nothing should be thrown but uncaught throw :Jet" \
+                       : "nothing should be thrown but uncaught throw `Jet'"
+      _should_fail(msg) { verify_ { throw :Jet }.NOT.throw? }
+    end
+    it "sets backtrace when failed." do
+      ex = begin verify_ { throw :Jet }.throw?(:Joe)
+           rescue ASSERTION => ex; ex end
+      _verify_location ex, __LINE__ - 2
+    end
+  end
+
+  describe "#file_exist?" do
+    it "raises nothing when passed." do
+      _should_pass { verify_(__FILE__).file_exist? }
+    end
+    it "raises assertion error when failed." do
+      errmsg = "File '_not_found' not exist."
+      _should_fail(errmsg) { verify_("_not_found").file_exist? }
+    end
+    it "is not available with NOT." do
+      ex = assert_raise(NoMethodError) { verify_("_not_found").NOT.file_exist? }
+      assert_equal "'file_exist?()' is not available with '.NOT'. please use '.NOT.exist?' instead.", ex.message
+    end
+    it "sets backtrace when failed." do
+      ex = begin verify_("_not_found").file_exist?
+           rescue ASSERTION => ex; ex end
+      _verify_location ex, __LINE__ - 2
+    end
+  end
+
+  describe "#dir_exist?" do
+    it "raises nothing when passed." do
+      _should_pass { verify_('.').dir_exist? }
+    end
+    it "raises assertion error when failed." do
+      errmsg = "Directory '_not_found' not exist."
+      _should_fail(errmsg) { verify_("_not_found").dir_exist? }
+    end
+    it "is not available with NOT." do
+      ex = assert_raise(NoMethodError) { verify_("_not_found").NOT.dir_exist? }
+      assert_equal "'dir_exist?()' is not available with '.NOT'. please use '.NOT.exist?' instead.", ex.message
+    end
+    it "sets backtrace when failed." do
+      ex = begin verify_("_not_found").dir_exist?
+           rescue ASSERTION => ex; ex end
+      _verify_location ex, __LINE__ - 2
+    end
+  end
+
+  describe "#exist?" do
+    it "is available only with NOT." do
+      _should_pass { verify_("_not_found").NOT.exist? }
+      msg = "File '#{__FILE__}' exists unexpectedly."
+      _should_fail(msg) { verify_(__FILE__).NOT.exist? }
+      ex = assert_raise(NoMethodError) { verify_(__FILE__).exist? }
+      assert_equal "'exist?()' is available only with '.NOT'. please use 'file_exist?' or 'dir_exist?' instead.", ex.message
+    end
+    it "sets backtrace when failed." do
+      ex = begin verify_(__FILE__).NOT.exist?
+           rescue ASSERTION => ex; ex end
+      _verify_location ex, __LINE__ - 2
+    end
+  end
+
+
+  describe '#called?' do
+    require 'section9/recorder'
+
+    class Calc
+      def average(*nums)   # average() calls total()
+        return total(*nums) / nums.length
+      end
+      def total(*nums)
+        t = 0
+        nums.each {|n| t += n }
+        return t   # or return nums.sum
+      end
+    end
+
+    def rec
+      unless @rec
+        @calc = Calc.new
+        @rec = Section9::Recorder.new
+        @rec.record_method(@calc, :total, :average)
+        avg = @calc.average(10, 20, 30, 40)   #=> 25
+      end
+      @rec
+    end
+
+    it "accepts Array object." do
+      assert_nothing_raised do
+        verify_(rec[0]).called?([@calc, :average, [10, 20, 30, 40], 25])
+      end
+    end
+    it "accepts Hash object." do
+      assert_nothing_raised do
+        verify_(rec[0]).called?(:obj=>@calc, :name=>:average, :args=>[10, 20, 30, 40], :ret=>25)
+      end
+    end
+    it "raises assertion error when not matched to array argument." do
+      #
+      ex = assert_raise ASSERTION do
+        verify_(rec[0]).called?([nil, :average, [10, 20, 30, 40], 25])
+      end
+      msg = %r`receiver object: .\n<nil> expected but was\n<#<VerifyObject_TC::Calc:0x[0-9a-f]*>>.`
+      assert_match msg, ex.message
+      #
+      ex = assert_raise ASSERTION do
+        verify_(rec[0]).called?([@calc, :total, [10, 20, 30, 40], 25])
+      end
+      assert_equal "method name: .\n<:total> expected but was\n<:average>.", ex.message
+      #
+      ex = assert_raise ASSERTION do
+        verify_(rec[0]).called?([@calc, :average, [10, 20, 30, 41], 25])
+      end
+      assert_equal "arguments: .\n<[10, 20, 30, 41]> expected but was\n<[10, 20, 30, 40]>.", ex.message
+      #
+      ex = assert_raise ASSERTION do
+        verify_(rec[0]).called?([@calc, :average, [10, 20, 30, 40], 26])
+      end
+      assert_equal "return value: .\n<26> expected but was\n<25>.", ex.message
+      #
+    end
+    it "raises assertion error when not matched to hash argument." do
+      #
+      ex = assert_raise ASSERTION do
+        verify_(rec[0]).called?(:obj=>nil)
+      end
+      assert_match "receiver object:", ex.message
+      #
+      ex = assert_raise ASSERTION do
+        verify_(rec[0]).called?(:name=>:total)
+      end
+      assert_equal "method name: .\n<:total> expected but was\n<:average>.", ex.message
+      #
+      ex = assert_raise ASSERTION do
+        verify_(rec[0]).called?(:args=>[10, 20, 30, 41])
+      end
+      assert_equal "arguments: .\n<[10, 20, 30, 41]> expected but was\n<[10, 20, 30, 40]>.", ex.message
+      #
+      ex = assert_raise ASSERTION do
+        verify_(rec[0]).called?(:ret=>26)
+      end
+      assert_equal "return value: .\n<26> expected but was\n<25>.", ex.message
+      #
+    end
+    it "sets backtrace when raise assertion error." do
+      begin
+        linenum = __LINE__ + 1
+        verify_(rec[0]).called?([@calc, :average, [10, 20, 30, 40], 26])
+      rescue ASSERTION => ex
+      end
+      s = "#{__FILE__}:#{linenum}"
+      verify_(ex.backtrace.first) =~ /^#{__FILE__}:#{linenum}/
+    end
+    it "is not available with '.NOT'." do
+      ex = assert_raise(NoMethodError) do
+        verify_(rec[0]).NOT.called?(:ret=>25)
+      end
+      assert_equal "'called?()' is not available with '.NOT'.", ex.message
+    end
+  end
+
+  describe "#method_missing" do
+    dot = RUBY_VERSION >= '1.9' ? '' : '.'
+    it "sends methods to actual and check results." do
+      ex = assert_raise(ASSERTION) { verify_("009").empty? }
+      msg = "$actual.empty?() == true: failed.\n  actual:   \"009\"#{dot}"
+      assert_equal msg, ex.message
+      assert_nothing_raised { verify_("").empty? }
+    end
+    it "is available with .NOT" do
+      assert_nothing_raised { verify_("009").NOT.empty? }
+      ex = assert_raise(ASSERTION) { verify_("").NOT.empty? }
+      msg = "$actual.empty?() == false: failed.\n  actual:   \"\"#{dot}"
+      assert_equal msg, ex.message
+    end
+    it "prints arguments if they are passed." do
+      ex = assert_raise(ASSERTION) { verify_([10,20,30]).include?(40) }
+      msg = "$actual.include?() == true: failed.\n  actual:   [10, 20, 30]\n  args:     40#{dot}"
+      assert_equal msg, ex.message
+      #
+      ex = assert_raise(ASSERTION) { verify_([10,20,30]).NOT.include?(30) }
+      msg = "$actual.include?() == false: failed.\n  actual:   [10, 20, 30]\n  args:     30#{dot}"
+      assert_equal msg, ex.message
+    end
+    it "throws NoMethodError when method name doesn't end with '?'." do
+      ex = assert_raise(NoMethodError) { verify_("009").size == 3 }
+      msg = "undefined method `size' for verify() object."
+      assert_equal msg, ex.message
+      #
+      ex = assert_raise(NoMethodError) { verify_("009").NOT.size == 3 }
+      msg = "undefined method `size' for verify().NOT object."
+      assert_equal msg, ex.message
+    end
+    it "raises NoMethodError when method name doesn't end with '?'." do
+      ex = assert_raise(NoMethodError) { verify_("009").size == 3 }
+      msg = "undefined method `size' for verify() object\."
+      assert_equal msg, ex.message
+      #
+      ex = assert_raise(NoMethodError) { verify_("009").NOT.size == 3 }
+      msg = "undefined method `size' for verify().NOT object."
+      assert_equal msg, ex.message
+    end
+    it "raises ArgumentError when method returned non-boolean value." do
+      s = ""
+      def s.blank?
+        self == "" ? 1 : 0
+      end
+      ex = assert_raise(ArgumentError) { verify_(s).blank? }
+      msg = "String#blank?(): expected to return true or false, but returned 1."
+      assert_equal msg, ex.message
+    end
+  end
+
+end
+
+
+class TestCaseHelper_TC < TC
+
+  describe "#teardown()" do
+    it "calls callbacks registerd with at_exit()." do
+      assert_equal nil, @_at_end_callbacks
+      called = false
+      at_end { called = true }
+      assert_equal false, called
+      teardown()
+      assert_equal true, called
+    end
+    it "clears array of callbacks." do
+      at_end { nil }
+      at_end { nil }
+      at_end { nil }
+      assert_equal 3, @_at_end_callbacks.length
+      teardown()
+      assert_equal 0, @_at_end_callbacks.length
+    end
+    it "calls revert() method of tmp object if exists." do
+      fname = "_tmp_file.txt"
+      tmp.file(fname, "009")
+      assert File.file?(fname)
+      teardown()
+      assert ! File.exist?(fname)
+    end
+  end
+
+  describe "#tmp()" do
+    it "returns Tmp object" do
+      assert_kind_of Section9::Tmp, tmp
+    end
+  end
+
+  describe "#at_exit()" do
+    it "registers callback which will be called by teardown() method." do
+      assert_equal nil, @_at_end_callbacks
+      called = false
+      at_end { called = true }
+      assert_kind_of Array, @_at_end_callbacks
+      assert_equal 1, @_at_end_callbacks.length
+      @_at_end_callbacks[0].call
+      assert_equal true, called
+    end
+  end
+
+end