106 lines
2.2 KiB
Ruby
106 lines
2.2 KiB
Ruby
|
module Mutant
|
||
|
|
module Meta
|
||
|
|
class Example
|
||
|
|
|
||
|
|
# Example DSL
|
||
|
|
class DSL
|
||
|
|
include NodeHelpers
|
||
|
|
|
||
|
|
# Run DSL on block
|
||
|
|
#
|
||
|
|
# @return [Example]
|
||
|
|
#
|
||
|
|
# @api private
|
||
|
|
#
|
||
|
|
def self.run(block)
|
||
|
|
instance = new
|
||
|
|
instance.instance_eval(&block)
|
||
|
|
instance.example
|
||
|
|
end
|
||
|
|
|
||
|
|
# Initialize DSL context
|
||
|
|
#
|
||
|
|
# @return [undefined]
|
||
|
|
#
|
||
|
|
# @api private
|
||
|
|
#
|
||
|
|
def initialize
|
||
|
|
@source = nil
|
||
|
|
@expected = []
|
||
|
|
end
|
||
|
|
|
||
|
|
# Return example
|
||
|
|
#
|
||
|
|
# @return [Example]
|
||
|
|
#
|
||
|
|
# @raise [RuntimeError]
|
||
|
|
# in case example cannot be build
|
||
|
|
#
|
||
|
|
# @api private
|
||
|
|
#
|
||
|
|
def example
|
||
|
|
raise 'source not defined' unless @source
|
||
|
|
Example.new(@source, @expected)
|
||
|
|
end
|
||
|
|
|
||
|
|
private
|
||
|
|
|
||
|
|
# Set original source
|
||
|
|
#
|
||
|
|
# @param [String,Parser::AST::Node] input
|
||
|
|
#
|
||
|
|
# @return [self]
|
||
|
|
#
|
||
|
|
def source(input)
|
||
|
|
raise 'source already defined' if @source
|
||
|
|
@source = node(input)
|
||
|
|
|
||
|
|
self
|
||
|
|
end
|
||
|
|
|
||
|
|
# Add expected mutation
|
||
|
|
#
|
||
|
|
# @param [String,Parser::AST::Node] input
|
||
|
|
#
|
||
|
|
# @return [self]
|
||
|
|
#
|
||
|
|
def mutation(input)
|
||
|
|
node = node(input)
|
||
|
|
if @expected.include?(node)
|
||
|
|
raise "Node for input: #{input.inspect} is already expected"
|
||
|
|
end
|
||
|
|
@expected << node
|
||
|
|
|
||
|
|
self
|
||
|
|
end
|
||
|
|
|
||
|
|
# Helper method to coerce input to node
|
||
|
|
#
|
||
|
|
# @param [String,Parser::AST::Node] input
|
||
|
|
#
|
||
|
|
# @return [Parser::AST::Node]
|
||
|
|
#
|
||
|
|
# @raise [RuntimeError]
|
||
|
|
# in case input cannot be coerced
|
||
|
|
#
|
||
|
|
# @api private
|
||
|
|
#
|
||
|
|
def node(input)
|
||
|
|
node =
|
||
|
|
case input
|
||
|
|
when String
|
||
|
|
Parser::CurrentRuby.parse(input)
|
||
|
|
when Parser::AST::Node
|
||
|
|
input
|
||
|
|
else
|
||
|
|
raise "Cannot coerce to node: #{source.inspect}"
|
||
|
|
end
|
||
|
|
|
||
|
|
Unparser::Preprocessor.run(node)
|
||
|
|
end
|
||
|
|
|
||
|
|
end # DSL
|
||
|
|
end # Example
|
||
|
|
end # Meta
|
||
|
|
end # Mutant
|