mutest 0.0.9 → 0.0.10

data/lib/mutest/mutator/node/defined.rb

@@ -18,7 +18,7 @@ module Mutest
 
           emit_expression_mutations { |node| !n_self?(node) }
         end
-      end # Defined
-    end # Node
-  end # Mutator
-end # Mutest
+      end
+    end
+  end
+end

data/lib/mutest/mutator/node/dstr.rb

@@ -14,7 +14,7 @@ module Mutest
           super()
           emit_singletons
         end
-      end # Dstr
-    end # Node
-  end # Mutator
-end # Mutest
+      end
+    end
+  end
+end

data/lib/mutest/mutator/node/dsym.rb

@@ -14,7 +14,7 @@ module Mutest
           super()
           emit_singletons
         end
-      end # Dsym
-    end # Node
-  end # Mutator
-end # Mutest
+      end
+    end
+  end
+end

data/lib/mutest/mutator/node/generic.rb

@@ -18,6 +18,7 @@ module Mutest
           xstr
           back_ref
           sclass
+          lambda
           match_with_lvasgn
           while_post
           until_post
@@ -73,7 +74,7 @@ module Mutest
             mutate_child(index) if child.instance_of?(::Parser::AST::Node)
           end
         end
-      end # Generic
-    end # Node
-  end # Mutator
-end # Mutest
+      end
+    end
+  end
+end

data/lib/mutest/mutator/node/if.rb

@@ -37,6 +37,7 @@ module Mutest
         def mutate_if_branch
           emit_type(condition, else_branch, nil) if else_branch
           return unless if_branch
+
           emit(if_branch)
           emit_if_branch_mutations
           emit_type(condition, if_branch, nil)
@@ -47,11 +48,12 @@ module Mutest
         # @return [undefined]
         def mutate_else_branch
           return unless else_branch
+
           emit(else_branch)
           emit_else_branch_mutations
           emit_type(condition, nil, else_branch)
         end
-      end # If
-    end # Node
-  end # Mutator
-end # Mutest
+      end
+    end
+  end
+end

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

@@ -0,0 +1,128 @@
+# frozen_string_literal: true
+
+module Mutest
+  class Mutator
+    class Node
+      # Base mutator for index operations
+      class Index < self
+        NO_VALUE_RANGE    = (1..-1).freeze
+        SEND_REPLACEMENTS = %i[at fetch key?].freeze
+
+        private_constant(*constants(false))
+
+        children :receiver
+
+        private
+
+        # Emit mutations
+        #
+        # @return [undefined]
+        def dispatch
+          emit_singletons
+          emit_receiver_mutations { |node| !n_nil?(node) }
+          emit(receiver)
+          emit_send_forms
+          emit_drop_mutation
+          mutate_indices
+        end
+
+        # Emit send forms
+        #
+        # @return [undefined]
+        def emit_send_forms
+          return if asgn_left?
+
+          SEND_REPLACEMENTS.each do |selector|
+            emit(s(:send, receiver, selector, *indices))
+          end
+        end
+
+        # Emit mutation `foo[n..-1]` -> `foo.drop(n)`
+        #
+        # @return [undefined]
+        def emit_drop_mutation
+          return unless indices.one? && n_irange?(Mutest::Util.one(indices))
+
+          start, ending = *indices.first
+
+          return unless ending.eql?(s(:int, -1))
+
+          emit(s(:send, receiver, :drop, start))
+        end
+
+        # Mutate indices
+        #
+        # @return [undefined]
+        def mutate_indices
+          children_indices(index_range).each do |index|
+            emit_propagation(children.fetch(index)) unless asgn_left?
+            delete_child(index)
+            mutate_child(index)
+          end
+        end
+
+        # The index nodes
+        #
+        # @return [Enumerable<Parser::AST::Node>]
+        def indices
+          children[index_range]
+        end
+
+        class Read < self
+          handle :index
+
+          private
+
+          # The range index children can be found
+          #
+          # @return [Range]
+          def index_range
+            NO_VALUE_RANGE
+          end
+        end
+
+        # Mutator for index assignments
+        class Assign < self
+          REGULAR_RANGE = (1..-2).freeze
+
+          private_constant(*constants(false))
+
+          handle :indexasgn
+
+          private
+
+          # Emit mutations
+          #
+          # @return [undefined]
+          def dispatch
+            super()
+
+            return if asgn_left?
+
+            emit_index_read
+            emit(children.last)
+            mutate_child(children.length.pred)
+          end
+
+          # Emit index read
+          #
+          # @return [undefined]
+          def emit_index_read
+            emit(s(:index, receiver, *children[index_range]))
+          end
+
+          # Index indices
+          #
+          # @return [Range<Integer>]
+          def index_range
+            if asgn_left?
+              NO_VALUE_RANGE
+            else
+              REGULAR_RANGE
+            end
+          end
+        end
+      end
+    end
+  end
+end

data/lib/mutest/mutator/node/kwbegin.rb

@@ -14,7 +14,7 @@ module Mutest
           super()
           emit_singletons
         end
-      end # Kwbegin
-    end # Node
-  end # Mutator
-end # Mutest
+      end
+    end
+  end
+end

data/lib/mutest/mutator/node/literal.rb

@@ -13,7 +13,7 @@ module Mutest
         def emit_values
           values.each(&method(:emit_type))
         end
-      end # Literal
-    end # Node
-  end # Mutator
-end # Mutest
+      end
+    end
+  end
+end

data/lib/mutest/mutator/node/literal/array.rb

@@ -15,8 +15,10 @@ module Mutest
             emit_singletons
             emit_type
             mutate_body
+
             return unless children.one?
-            emit(children.first)
+
+            emit(Mutest::Util.one(children))
           end
 
           # Mutate body
@@ -30,8 +32,8 @@ module Mutest
               mutate_child(index)
             end
           end
-        end # Array
-      end # Literal
-    end # Node
-  end # Mutator
-end # Mutest
+        end
+      end
+    end
+  end
+end

data/lib/mutest/mutator/node/literal/boolean.rb

@@ -19,8 +19,8 @@ module Mutest
           def dispatch
             emit(s(MAP.fetch(node.type)))
           end
-        end # Boolean
-      end # Literal
-    end # Node
-  end # Mutator
-end # Mutest
+        end
+      end
+    end
+  end
+end

data/lib/mutest/mutator/node/literal/fixnum.rb

@@ -29,8 +29,8 @@ module Mutest
           def value
             children.first
           end
-        end # Integer
-      end # Literal
-    end # Node
-  end # Mutator
-end # Mutest
+        end
+      end
+    end
+  end
+end

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

@@ -38,8 +38,8 @@ module Mutest
 
             [0.0, 1.0, -original]
           end
-        end # Float
-      end # Literal
-    end # Node
-  end # Mutator
-end # Mutest
+        end
+      end
+    end
+  end
+end

data/lib/mutest/mutator/node/literal/hash.rb

@@ -44,9 +44,9 @@ module Mutest
               emit_key_mutations
               emit_value_mutations
             end
-          end # Pair
-        end # Hash
-      end # Literal
-    end # Node
-  end # Mutator
-end # Mutest
+          end
+        end
+      end
+    end
+  end
+end

data/lib/mutest/mutator/node/literal/nil.rb

@@ -13,8 +13,8 @@ module Mutest
           # @return [undefined]
           def dispatch
           end
-        end # Nil
-      end # Literal
-    end # Node
-  end # Mutator
-end # Mutest
+        end
+      end
+    end
+  end
+end

data/lib/mutest/mutator/node/literal/range.rb

@@ -31,8 +31,8 @@ module Mutest
           def emit_inverse
             emit(s(MAP.fetch(node.type), *children))
           end
-        end # Range
-      end # Literal
-    end # Node
-  end # Mutator
-end # Mutest
+        end
+      end
+    end
+  end
+end

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

@@ -69,8 +69,8 @@ module Mutest
           def body
             children.slice(0...-1)
           end
-        end # Regex
-      end # Literal
-    end # Node
-  end # Mutator
-end # Mutest
+        end
+      end
+    end
+  end
+end

data/lib/mutest/mutator/node/literal/string.rb

@@ -17,8 +17,8 @@ module Mutest
             emit_singletons
             emit_type(value + Util::Symbol::POSTFIX)
           end
-        end # String
-      end # Literal
-    end # Node
-  end # Mutator
-end # Mutest
+        end
+      end
+    end
+  end
+end

data/lib/mutest/mutator/node/literal/symbol.rb

@@ -17,8 +17,8 @@ module Mutest
             emit_singletons
             mutate_with(Util::Symbol, value, &method(:emit_type))
           end
-        end # Symbol
-      end # Literal
-    end # Node
-  end # Mutator
-end # Mutest
+        end
+      end
+    end
+  end
+end

data/lib/mutest/mutator/node/masgn.rb

@@ -15,7 +15,7 @@ module Mutest
         def dispatch
           emit_singletons
         end
-      end # MultipleAssignment
-    end # Node
-  end # Mutator
-end # Mutest
+      end
+    end
+  end
+end

data/lib/mutest/mutator/node/match_current_line.rb

@@ -16,7 +16,7 @@ module Mutest
           emit_singletons
           emit_regexp_mutations
         end
-      end # MatchCurrentLine
-    end # Node
-  end # Mutator
-end # Mutest
+      end
+    end
+  end
+end

data/lib/mutest/mutator/node/mlhs.rb

@@ -15,7 +15,7 @@ module Mutest
             delete_child(index)
           end
         end
-      end # MLHS
-    end # Node
-  end # Mutator
-end # Mutest
+      end
+    end
+  end
+end

data/lib/mutest/mutator/node/named_value/access.rb

@@ -46,9 +46,9 @@ module Mutest
             def attribute_name
               name.slice(NAME_RANGE).to_sym
             end
-          end # Ivar
-        end # Access
-      end # NamedValue
-    end # Node
-  end # Mutator
-end # Mutest
+          end
+        end
+      end
+    end
+  end
+end