# Author::    Nicolas Pouillard  <ertai@lrde.epita.fr>.
# Copyright:: Copyright (c) 2004, 2005 TTK team. All rights reserved.
# License::   LGPL
# $Id: Fail.rb 567 2005-04-13 08:00:06Z polrop $


module TTK

  module Strategies

    # A test class which always fails.
    class Fail < Strategy
      include Concrete

      protected
      def assertion
        fail 'Fail always fails', Weights::Default.new(@value)
      end

      attribute :value, 'the returned weight', [Weights::Weight, Numeric], 0

    end # class Fail

  end # module Strategies

end # module TTK