class Cucumber::Core::Test::Case

def ==(other)
  eql?(other)
end

def all_locations
  @all_locations ||= Ast::Location.merge(all_source.map(&:all_locations).flatten)
end

def all_source
  @all_source ||= (source + test_steps.map(&:source)).flatten.uniq
end

def compose_around_hooks(visitor, *args, &block)
  around_hooks.reverse.reduce(block) do |continue, hook|
    -> { hook.describe_to(visitor, *args, &continue) }
  end.call
end

def describe_source_to(visitor, *args)
  source.reverse.each do |node|
    node.describe_to(visitor, *args)
  end
  self
end

def describe_to(visitor, *args)
  visitor.test_case(self, *args) do |child_visitor|
    compose_around_hooks(child_visitor, *args) do
      test_steps.each do |test_step|
        test_step.describe_to(child_visitor, *args)
      end
    end
  end
  self
end

def eql?(other)
  other.hash == hash
end

def feature
  source.first
end

def hash
  location.hash
end

def initialize(test_steps, source, around_hooks = [])
  raise ArgumentError.new("test_steps should be an Array but is a #{test_steps.class}") unless test_steps.kind_of?(Array)
  @test_steps = test_steps
  @source = source
  @around_hooks = around_hooks
end

def inspect
  "#<#{self.class}: #{location}>"
end

def keyword
  @keyword ||= NameBuilder.new(self).keyword
end

def language
  feature.language
end

def location
  source.last.location
end

def match_locations?(queried_locations)
  queried_locations.any? { |queried_location|
    all_source.any? { |node|
      node.all_locations.any? { |location|
        queried_location.match? location
      }
    }
  }
end

def match_name?(name_regexp)
  source.any? { |node| node.respond_to?(:name) && node.name =~ name_regexp }
end

def match_single_tag_expression?(expression)
  if old_style_tag_expression?(expression)
    Cucumber::Core::Gherkin::TagExpression.new([expression]).evaluate(tags)
  else
    Cucumber::TagExpressions::Parser.new.parse(expression).evaluate(tags.map(&:name))
  end
end

def match_tags?(*expressions)
  expressions.flatten.all? { |expression| match_single_tag_expression?(expression) }
end

def name
  @name ||= NameBuilder.new(self).result
end

def old_style_tag_expression?(expression)
  expression.include?(',') || expression.include?('~')
end

def step_count
  test_steps.count
end

def tags
  @tags ||= TagCollector.new(self).result
end

def with_around_hooks(around_hooks)
  self.class.new(test_steps, source, around_hooks)
end

def with_steps(test_steps)
  self.class.new(test_steps, source, around_hooks)
end