class MiniTest::Mock

def expect(name, retval, args=[])
  @expected_calls[name] = { :retval => retval, :args => args }
  self
end

def initialize # :nodoc:
  @expected_calls = {}
  @actual_calls = Hash.new {|h,k| h[k] = [] }
end

def method_missing(sym, *args) # :nodoc:
  unless @expected_calls.has_key?(sym)
    raise NoMethodError, "unmocked method '%s', expected one of %s" % 
      [sym, @expected_calls.keys.map{|s| "'#{s}'" }.sort.join(", ")]
  end
  unless @expected_calls[sym][:args].size == args.size
    raise ArgumentError, "mocked method '%s' expects %d arguments, got %d" %
      [sym, @expected_calls[sym][:args].size, args.size]
  end
  retval = @expected_calls[sym][:retval]
  args_case = @expected_calls[sym][:args].
    each_with_index.map{|a, i| a if a === args[i]}
  @actual_calls[sym] << { :retval => retval, :args => args_case }
  retval
end

def respond_to?(sym) # :nodoc:
  return true if @expected_calls.has_key?(sym)
  return __respond_to?(sym)
end

def verify
  @expected_calls.each_key do |name|
    expected = @expected_calls[name]
    msg = "expected #{name}, #{expected.inspect}"
    raise MockExpectationError, msg unless
      @actual_calls.has_key? name and @actual_calls[name].include?(expected)
  end
  true
end