mutant 0.10.23 → 0.10.28

data/lib/mutant/loader.rb

@@ -18,7 +18,7 @@ module Mutant
 
       # Vale returned on MRI detecting void value expressions
       class VoidValue < self
-      end # voidValue
+      end # VoidValue
     end # Result
 
     # Call loader

data/lib/mutant/matcher.rb

@@ -3,7 +3,7 @@
 module Mutant
   # Abstract matcher to find subjects to mutate
   class Matcher
-    include Adamantium::Flat, AbstractType
+    include Adamantium, AbstractType
 
     # Call matcher
     #
@@ -20,7 +20,7 @@ module Mutant
     # @return [Matcher]
     def self.from_config(config)
       Filter.new(
-        Chain.new(config.match_expressions.map(&:matcher)),
+        Chain.new(config.subjects.map(&:matcher)),
         method(:allowed_subject?).curry.call(config)
       )
     end
@@ -42,7 +42,7 @@ module Mutant
     #
     # @return [Boolean]
     def self.ignore_subject?(config, subject)
-      config.ignore_expressions.any? do |expression|
+      config.ignore.any? do |expression|
         expression.prefix?(subject.expression)
       end
     end

data/lib/mutant/matcher/config.rb

@@ -5,8 +5,8 @@ module Mutant
     # Subject matcher configuration
     class Config
       include Adamantium, Anima.new(
-        :ignore_expressions,
-        :match_expressions,
+        :ignore,
+        :subjects,
         :start_expressions,
         :subject_filters
       )
@@ -16,16 +16,38 @@ module Mutant
       ATTRIBUTE_FORMAT    = '%s: [%s]'
       ENUM_DELIMITER      = ','
       EMPTY_ATTRIBUTES    = 'empty'
-      PRESENTATIONS       = IceNine.deep_freeze(
-        ignore_expressions: :syntax,
-        match_expressions:  :syntax,
-        start_expressions:  :syntax,
-        subject_filters:    :inspect
-      )
+      PRESENTATIONS       = {
+        ignore:            :syntax,
+        start_expressions: :syntax,
+        subject_filters:   :inspect,
+        subjects:          :syntax
+      }.freeze
+
       private_constant(*constants(false))
 
       DEFAULT = new(Hash[anima.attribute_names.map { |name| [name, []] }])
 
+      expression = Transform::Block.capture(:expression) do |input|
+        Mutant::Config::DEFAULT.expression_parser.call(input)
+      end
+
+      expression_array = Transform::Array.new(expression)
+
+      LOADER =
+        Transform::Sequence.new(
+          [
+            Transform::Hash.new(
+              optional: [
+                Transform::Hash::Key.new('subjects', expression_array),
+                Transform::Hash::Key.new('ignore', expression_array)
+              ],
+              required: []
+            ),
+            Transform::Hash::Symbolize.new,
+            ->(attributes) { Either::Right.new(DEFAULT.with(attributes)) }
+          ]
+        )
+
       # Inspection string
       #
       # @return [String]

data/lib/mutant/matcher/method.rb

@@ -5,12 +5,9 @@ module Mutant
     # Abstract base class for method matchers
     class Method < self
       include AbstractType,
-              Adamantium::Flat,
+              Adamantium,
               Concord::Public.new(:scope, :target_method, :evaluator)
 
-      # Source locations we cannot acces
-      BLACKLIST = %w[(eval) <internal:prelude>].to_set.freeze
-
       SOURCE_LOCATION_WARNING_FORMAT =
         '%s does not have a valid source location, unable to emit subject'
 
@@ -32,11 +29,13 @@ module Mutant
       # logic would be implemented directly on the Matcher::Method
       # instance
       class Evaluator
-        include AbstractType,
-                Adamantium,
-                Concord.new(:scope, :target_method, :env),
-                Procto.call,
-                AST::NodePredicates
+        include(
+          AbstractType,
+          Adamantium,
+          Concord.new(:scope, :target_method, :env),
+          Procto,
+          AST::NodePredicates
+        )
 
         # Matched subjects
         #
@@ -51,7 +50,10 @@ module Mutant
 
         def skip?
           location = source_location
-          if location.nil? || BLACKLIST.include?(location.first)
+
+          file = location&.first
+
+          if location.nil? || !file.end_with?('.rb')
             env.warn(SOURCE_LOCATION_WARNING_FORMAT % target_method)
           elsif matched_node_path.any?(&method(:n_block?))
             env.warn(CLOSURE_WARNING_FORMAT % target_method)
@@ -87,9 +89,8 @@ module Mutant
           node = matched_node_path.last || return
 
           self.class::SUBJECT_CLASS.new(
-            context:  context,
-            node:     node,
-            warnings: env.world.warnings
+            context: context,
+            node:    node
           )
         end
         memoize :subject

data/lib/mutant/matcher/method/instance.rb

@@ -13,9 +13,8 @@ module Mutant
         #
         # @return [Matcher::Method::Instance]
         def self.new(scope, target_method)
-          name = target_method.name
           evaluator =
-            if scope.respond_to?(:memoized?) && scope.memoized?(name)
+            if memoized_method?(scope, target_method.name)
               Evaluator::Memoized
             else
               Evaluator
@@ -24,6 +23,11 @@ module Mutant
           super(scope, target_method, evaluator)
         end
 
+        def self.memoized_method?(scope, method_name)
+          scope < Adamantium && scope.memoized?(method_name)
+        end
+        private_class_method :memoized_method?
+
         # Instance method specific evaluator
         class Evaluator < Evaluator
           SUBJECT_CLASS = Subject::Method::Instance

data/lib/mutant/matcher/method/metaclass.rb

@@ -80,7 +80,7 @@ module Mutant
         end # Evaluator
 
         private_constant(*constants(false))
-      end # Singleton
+      end # Metaclass
     end # Method
   end # Matcher
 end # Mutant

data/lib/mutant/matcher/methods.rb

@@ -6,11 +6,11 @@ module Mutant
     class Methods < self
       include AbstractType, Concord.new(:scope)
 
-      CANDIDATE_NAMES = IceNine.deep_freeze(%i[
+      CANDIDATE_NAMES = %i[
         public_instance_methods
         private_instance_methods
         protected_instance_methods
-      ])
+      ].freeze
 
       private_constant(*constants(false))
 
@@ -62,7 +62,6 @@ module Mutant
         def candidate_scope
           scope.singleton_class
         end
-        memoize :candidate_scope, freezer: :noop
 
       end # Singleton
 
@@ -79,7 +78,6 @@ module Mutant
         def candidate_scope
           scope.singleton_class
         end
-        memoize :candidate_scope, freezer: :noop
       end # Metaclass
 
       # Matcher for instance methods

data/lib/mutant/meta/example.rb

@@ -3,7 +3,7 @@
 module Mutant
   module Meta
     class Example
-      include Adamantium::Flat
+      include Adamantium
 
       include Anima.new(
         :expected,

data/lib/mutant/meta/example/dsl.rb

@@ -37,7 +37,7 @@ module Mutant
         # @return [Example]
         #
         # @raise [RuntimeError]
-        #   in case example cannot be build
+        #   in case the example cannot be built
         def example
           fail 'source not defined' unless @source
 
@@ -79,7 +79,11 @@ module Mutant
 
         def singleton_mutations
           mutation('nil')
-          mutation('self')
+        end
+
+        def regexp_mutations
+          mutation('//')
+          mutation('/nomatch\A/')
         end
 
         def node(input)

data/lib/mutant/meta/example/verification.rb

@@ -5,7 +5,7 @@ module Mutant
     class Example
       # Example verification
       class Verification
-        include Adamantium::Flat, Concord.new(:example, :mutations)
+        include Adamantium, Concord.new(:example, :mutations)
 
         # Test if mutation was verified successfully
         #

data/lib/mutant/mutation.rb

@@ -3,7 +3,7 @@
 module Mutant
   # Represent a mutated node with its subject
   class Mutation
-    include AbstractType, Adamantium::Flat
+    include AbstractType, Adamantium
     include Concord::Public.new(:subject, :node)
 
     CODE_DELIMITER = "\0"

data/lib/mutant/mutator.rb

@@ -6,7 +6,12 @@ module Mutant
 
     REGISTRY = Registry.new
 
-    include Adamantium::Flat, Concord.new(:input, :parent), AbstractType, Procto.call(:output)
+    include(
+      Adamantium,
+      Concord.new(:input, :parent),
+      AbstractType,
+      Procto
+    )
 
     # Lookup and invoke dedicated AST mutator
     #
@@ -30,6 +35,8 @@ module Mutant
     # @return [Set<Parser::AST::Node>]
     attr_reader :output
 
+    alias_method :call, :output
+
   private
 
     def initialize(_input, _parent = nil)

data/lib/mutant/mutator/node.rb

@@ -67,11 +67,6 @@ module Mutant
 
       def emit_singletons
         emit_nil
-        emit_self
-      end
-
-      def emit_self
-        emit(N_SELF)
       end
 
       def emit_nil

data/lib/mutant/mutator/node/argument.rb

@@ -30,10 +30,10 @@ module Mutant
         # Mutator for optional arguments
         class Optional < self
 
-          TYPE_MAP = IceNine.deep_freeze(
+          TYPE_MAP = {
             optarg:   :arg,
             kwoptarg: :kwarg
-          )
+          }.freeze
 
           handle(:optarg, :kwoptarg)
 

data/lib/mutant/mutator/node/dynamic_literal.rb

@@ -18,7 +18,7 @@ module Mutant
           end
         end
 
-      end # Dstr
+      end # DynamicLiteral
     end # Node
   end # Mutator
 end # Mutant

data/lib/mutant/mutator/node/index.rb

@@ -17,6 +17,7 @@ module Mutant
         def dispatch
           emit_singletons
           emit_receiver_mutations { |node| !n_nil?(node) }
+          emit_type(N_SELF, *children.drop(1))
           emit(receiver)
           emit_send_forms
           emit_drop_mutation

data/lib/mutant/mutator/node/kwargs.rb

@@ -28,7 +28,7 @@ module Mutant
         def emit_argument_mutations
           children.each_with_index do |child, index|
             Mutator.mutate(child).each do |mutant|
-              if forbid_argument?(mutant)
+              unless forbid_argument?(mutant)
                 emit_child_update(index, mutant)
               end
             end
@@ -36,7 +36,7 @@ module Mutant
         end
 
         def forbid_argument?(node)
-          !(n_pair?(node) && DISALLOW.include?(node.children.first.type))
+          n_pair?(node) && DISALLOW.include?(node.children.first.type)
         end
       end # Kwargs
     end # Node

data/lib/mutant/mutator/node/literal/float.rb

@@ -28,9 +28,7 @@ module Mutant
           end
 
           def values
-            original = children.first
-
-            [0.0, 1.0, -original]
+            [0.0, 1.0]
           end
 
         end # Float

data/lib/mutant/mutator/node/literal/integer.rb

@@ -9,6 +9,8 @@ module Mutant
 
           handle(:int)
 
+          children :value
+
         private
 
           def dispatch
@@ -17,12 +19,7 @@ module Mutant
           end
 
           def values
-            [0, 1, -value, value + 1, value - 1]
-          end
-
-          def value
-            value, = children
-            value
+            [0, 1, value + 1, value - 1]
           end
 
         end # Integer

data/lib/mutant/mutator/node/literal/regex.rb

@@ -19,6 +19,7 @@ module Mutant
           end
 
           def dispatch
+            mutate_body
             emit_singletons unless parent_node
             children.each_with_index do |child, index|
               mutate_child(index) unless n_str?(child)
@@ -27,6 +28,17 @@ module Mutant
             emit_type(s(:str, NULL_REGEXP_SOURCE), options)
           end
 
+          def mutate_body
+            # NOTE: will only mutate parts of regexp body if the body is composed of only strings.
+            # Regular expressions with interpolation are skipped.
+            return unless (body_ast = AST::Regexp.expand_regexp_ast(input))
+
+            Mutator.mutate(body_ast).each do |mutation|
+              source = AST::Regexp.to_expression(mutation).to_s
+              emit_type(s(:str, source), options)
+            end
+          end
+
         end # Regex
       end # Literal
     end # Node

data/lib/mutant/mutator/node/module.rb

@@ -0,0 +1,19 @@
+# frozen_string_literal: true
+
+module Mutant
+  class Mutator
+    class Node
+      class Module < self
+        handle :module
+
+        children :klass, :body
+
+      private
+
+        def dispatch
+          emit_body_mutations if body
+        end
+      end # Module
+    end # Node
+  end # Mutator
+end # Mutant

data/lib/mutant/mutator/node/named_value/variable_assignment.rb

@@ -17,9 +17,9 @@ module Mutant
             lvasgn: EMPTY_STRING
           }
 
-          MAP = IceNine.deep_freeze(
-            map.transform_values { |prefix| [prefix, /^#{::Regexp.escape(prefix)}/] }
-          )
+          MAP = map
+            .transform_values { |prefix| [prefix, /^#{::Regexp.escape(prefix)}/] }
+            .freeze
 
           handle(*MAP.keys)