2013-01-01 19:50:36 +01:00
|
|
|
module Mutant
|
|
|
|
class Mutator
|
|
|
|
class Node
|
2013-07-22 23:54:54 -07:00
|
|
|
module NamedValue
|
2013-01-01 19:50:36 +01:00
|
|
|
|
2013-07-22 23:54:54 -07:00
|
|
|
# Mutation emitter to handle value assignment nodes
|
|
|
|
class Assignment < Node
|
2013-06-21 15:26:41 +02:00
|
|
|
|
|
|
|
children :name, :value
|
2013-01-01 19:50:36 +01:00
|
|
|
|
2013-06-15 16:44:38 +02:00
|
|
|
MAP = IceNine.deep_freeze(
|
|
|
|
:gvasgn => '$',
|
|
|
|
:cvasgn => '@@',
|
|
|
|
:ivasgn => '@',
|
|
|
|
:lvasgn => ''
|
|
|
|
)
|
|
|
|
|
|
|
|
handle *MAP.keys
|
|
|
|
|
2013-06-04 20:23:06 +02:00
|
|
|
private
|
|
|
|
|
|
|
|
# Perform dispatch
|
2013-01-01 19:50:36 +01:00
|
|
|
#
|
|
|
|
# @return [undefined]
|
|
|
|
#
|
|
|
|
# @api private
|
|
|
|
#
|
|
|
|
def dispatch
|
2013-06-21 15:26:41 +02:00
|
|
|
mutate_name
|
2013-07-05 03:02:16 +02:00
|
|
|
emit_value_mutations if value # mlhs!
|
2013-01-01 19:50:36 +01:00
|
|
|
end
|
|
|
|
|
2013-06-04 20:23:06 +02:00
|
|
|
# Emit name mutations
|
|
|
|
#
|
|
|
|
# @return [undefined]
|
|
|
|
#
|
|
|
|
# @api private
|
|
|
|
#
|
2013-06-21 15:26:41 +02:00
|
|
|
def mutate_name
|
|
|
|
prefix = MAP.fetch(node.type)
|
2013-06-24 22:10:40 +02:00
|
|
|
Mutator::Util::Symbol.each(name, self) do |name|
|
2013-06-21 15:26:41 +02:00
|
|
|
emit_name("#{prefix}#{name}")
|
2013-06-04 20:23:06 +02:00
|
|
|
end
|
|
|
|
end
|
2013-01-01 19:50:36 +01:00
|
|
|
|
2013-07-22 23:54:54 -07:00
|
|
|
end # Assignment
|
|
|
|
end # NamedValue
|
2013-06-04 10:25:13 +02:00
|
|
|
end # Node
|
|
|
|
end # Mutator
|
|
|
|
end # Mutant
|