mutant 0.2.20 → 0.3.0.beta2

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

@@ -1,10 +1,12 @@
 module Mutant
   class Mutator
     class Node
-      # Mutator on AST blocks
+      # Emitter for mutations on 19 blocks
       class Block < self
 
-        handle(Rubinius::AST::Block)
+        handle(:block)
+
+        children :send, :arguments, :body
 
       private
 
@@ -15,18 +17,16 @@ module Mutant
         # @api private
         #
         def dispatch
-          array = input.array
-          emit_attribute_mutations(:array) do |mutation|
-            array = mutation.array
-            # Do not generate empty bodies
-            if array.empty?
-              array << new_nil
-            end
-            mutation
+          emit(send)
+          emit_arguments_mutations
+          if body
+            emit_body_mutations
+          else
+            emit_body(NEW_OBJECT)
           end
         end
 
-      end
-    end
-  end
-end
+      end # Block
+    end # Node
+  end # Mutator
+end # Mutant

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

@@ -0,0 +1,59 @@
+module Mutant
+  class Mutator
+    class Node
+
+      # Mutator for case nodes
+      class Case < self
+
+        handle(:case)
+
+        children :condition
+
+      private
+
+        # Emit mutations
+        #
+        # @return [undefined]
+        #
+        # @api private
+        #
+        def dispatch
+          emit_condition_mutations
+          emit_when_mutations
+          emit_else_mutations
+        end
+
+        # Emit when mutations
+        #
+        # @return [undefined]
+        #
+        # @api private
+        #
+        def emit_when_mutations
+          indices = children.each_index.drop(1).take(children.length-2)
+          one = indices.one?
+          indices.each do |index|
+            mutate_child(index)
+            delete_child(index) unless one
+          end
+        end
+
+        # Emit else mutations
+        #
+        # @return [undefined]
+        #
+        # @api private
+        #
+        def emit_else_mutations
+          else_branch = children.last
+          else_index = children.length - 1
+          if else_branch
+            mutate_child(else_index)
+            emit_child_update(else_index, nil)
+          end
+        end
+
+      end # Case
+    end # Node
+  end # Mutator
+end # Mutant

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

@@ -1,11 +1,9 @@
 module Mutant
   class Mutator
     class Node
+      # Namespace for define mutations
       class Define < self
 
-        handle(Rubinius::AST::Define)
-        handle(Rubinius::AST::DefineSingletonScope)
-
       private
 
         # Emit mutations
@@ -15,27 +13,33 @@ module Mutant
         # @api private
         #
         def dispatch
-          emit_attribute_mutations(:body)
-          emit_attribute_mutations(:arguments)
+          emit_arguments_mutations
+          if body
+            emit_body_mutations
+          else
+            emit_body(NEW_OBJECT)
+          end
         end
-      end
 
-      class DefineSingleton < self
+        # Mutator for instance method defines
+        class Instance < self
 
-        handle(Rubinius::AST::DefineSingleton)
+          handle :def
 
-      private
+          children :name, :arguments, :body
 
-        # Emit mutations
-        #
-        # @return [undefined]
-        #
-        # @api private
-        #
-        def dispatch
-          emit_attribute_mutations(:body)
-        end
-      end
-    end
-  end
-end
+        end # Instance
+
+        # Mutator for singleton method defines
+        class Singleton < self
+
+          handle :defs
+
+          children :subject, :name, :arguments, :body
+
+        end # Singelton
+
+      end # Define
+    end # Node
+  end # Mutator
+end # Mutant

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

@@ -1,108 +1,68 @@
 module Mutant
   class Mutator
     class Node
-      # Mutator for Rubinius::AST::If nodes
+      # Mutator for if nodes
       class If < self
 
-        handle(Rubinius::AST::If)
+        handle(:if)
+
+        children :condition, :if_branch, :else_branch
 
       private
 
-        # Emit mutations on Rubinius::AST::If nodes
+        # Emit mutations
         #
         # @return [undefined]
         #
         # @api private
         #
         def dispatch
-          emit_attribute_mutations(:condition)
-          emit_attribute_mutations(:body) unless nil_literal?(:body)
-          emit_attribute_mutations(:else) unless nil_literal?(:else)
-          emit_inverted_condition 
-          emit_deleted_if_branch
-          emit_deleted_else_branch
-        end
-
-        # Test if attribute is non nil literal
-        #
-        # @param [Symbol] name
-        #
-        # @return [true]
-        #   if attribute value a nil literal
-        #
-        # @return [false]
-        #   otherwise
-        #
-        # @api private
-        #
-        def nil_literal?(name)
-          node.public_send(name).kind_of?(Rubinius::AST::NilLiteral)
+          mutate_condition
+          mutate_if_branch
+          mutate_else_branch
         end
 
-        # Emit inverted condition
-        #
-        # Especially the same like swap branches but more universal as it also 
-        # covers the case there is no else branch
+        # Emit conditon mutations
         #
         # @return [undefined]
         #
         # @api private
         #
-        def emit_inverted_condition
-          emit_self(new_send(condition, :'!'), if_branch, else_branch)
+        def mutate_condition
+          emit_condition_mutations
+          emit_self(s(:send, condition, :!), if_branch, else_branch)
+          emit_self(s(:true),  if_branch, else_branch)
+          emit_self(s(:false), if_branch, else_branch)
         end
 
-        # Emit deleted else branch
+        # Emit if branch mutations
         #
         # @return [undefined]
         #
         # @api private
         #
-        def emit_deleted_else_branch
-          emit_self(condition, if_branch, nil)
+        def mutate_if_branch
+          emit_self(condition, else_branch, nil) if else_branch
+          if if_branch
+            emit_if_branch_mutations
+            emit_self(condition, if_branch,   nil)
+          end
         end
 
-        # Emit deleted if branch
+        # Emit else branch mutations
         #
         # @return [undefined]
         #
         # @api private
         #
-        def emit_deleted_if_branch
-          body = else_branch || return
-          emit_self(condition, body, nil)
+        def mutate_else_branch
+          if else_branch
+            emit_else_branch_mutations
+            emit_self(condition, nil, else_branch)
+          end
         end
 
-        # Return if_branch of node
-        #
-        # @return [Rubinius::AST::Node]
-        #
-        # @api private
-        #
-        def if_branch
-          node.body
-        end
-
-        # Return condition of node
-        #
-        # @return [Rubinius::AST::Node]
-        #
-        # @api private
-        #
-        def condition
-          node.condition
-        end
-
-        # Return else body of node
-        #
-        # @return [Rubinius::AST::Node]
-        #
-        # @api private
-        #
-        def else_branch
-          node.else
-        end
-      end
-    end
-  end
-end
+      end # If
+    end # Node
+  end # Mutator
+end # Mutant

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

@@ -5,7 +5,7 @@ module Mutant
         # Mutator for array literals
         class Array < self
 
-          handle(Rubinius::AST::ArrayLiteral)
+          handle(:array)
 
         private
 
@@ -16,13 +16,29 @@ module Mutant
           # @api private
           #
           def dispatch
-            emit_attribute_mutations(:body)
-            emit_self([])
             emit_nil
-            emit_self([new_nil] + node.body.dup)
+            emit_self
+            mutate_body
           end
-        end
-      end
-    end
-  end
-end
+
+          # Mutate body
+          #
+          # @return [undefined]
+          #
+          # @api private
+          #
+          def mutate_body
+            children.each_index do |index|
+              dup_children = children.dup
+              dup_children.delete_at(index)
+              emit_self(*dup_children)
+              mutate_child(index)
+            end
+            emit_self(s(:nil), *children)
+          end
+
+        end # Array
+      end # Literal
+    end # Node
+  end # Mutator
+end # Mutant

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

@@ -7,6 +7,13 @@ module Mutant
 
         private
 
+          MAP = {
+            :true  => :false,
+            :false => :true
+          }.freeze
+
+          handle(*MAP.keys)
+
           # Emit mutants
           #
           # @return [undefined]
@@ -15,35 +22,11 @@ module Mutant
           #
           def dispatch
             emit_nil
-            emit(inverse)
-          end
-
-          # Return inverse
-          #
-          # @return [Rubinius::AST::Node]
-          #
-          # @api private
-          #
-          def inverse
-            new(self.class::INVERSE_CLASS)
-          end
-
-          # Mutator for true literals
-          class TrueLiteral < self
-            INVERSE_CLASS = Rubinius::AST::FalseLiteral
-
-            handle(Rubinius::AST::TrueLiteral)
+            emit(s(MAP.fetch(node.type)))
           end
 
-
-          # Mutator for false literals
-          class FalseLiteral < self
-            INVERSE_CLASS = Rubinius::AST::TrueLiteral
-
-            handle(Rubinius::AST::FalseLiteral)
-          end
-        end
-      end
-    end
-  end
-end
+        end # Boolean
+      end # Literal
+    end # Node
+  end # Mutatork
+end # Mutant

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

@@ -17,8 +17,9 @@ module Mutant
           def dispatch
             emit_nil
           end
-        end
-      end
-    end
-  end
-end
+
+        end # Dynamic
+      end # Literal
+    end # Node
+  end # Mutator
+end # Mutant

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

@@ -5,7 +5,7 @@ module Mutant
         # Mutator for fixnum literals
         class Fixnum < self
 
-          handle(Rubinius::AST::FixnumLiteral)
+          handle(:int)
 
         private
 
@@ -28,10 +28,21 @@ module Mutant
           # @api private
           #
           def values
-            [0, 1, -node.value]
+            [0, 1, -value, value+1, value-1]
           end
-        end
-      end
-    end
-  end
-end
+
+          # Return value
+          #
+          # @return [Object]
+          #
+          # @api private
+          #
+          def value
+            children.first
+          end
+
+        end # Fixnuma
+      end # Literal
+    end # Node
+  end # Mutator
+end # Mutant

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

@@ -5,7 +5,7 @@ module Mutant
         # Mutator for float literals
         class Float < self
 
-          handle(Rubinius::AST::FloatLiteral)
+          handle(:float)
 
         private
 
@@ -20,6 +20,12 @@ module Mutant
             emit_new { new_self(Random.float) }
           end
 
+          SPECIAL = [
+            NodeHelpers::NAN,
+            NodeHelpers::NEGATIVE_INFINITY,
+            NodeHelpers::INFINITY
+          ].freeze
+
           # Emit special cases
           #
           # @return [undefined]
@@ -27,7 +33,7 @@ module Mutant
           # @api private
           #
           def emit_special_cases
-            [infinity, negative_infinity, nan].each do |value|
+            SPECIAL.each do |value|
               emit(value)
             end
           end
@@ -39,10 +45,11 @@ module Mutant
           # @api private
           #
           def values
-            [0.0, 1.0] << -node.value
+            [0.0, 1.0, -children.first]
           end
-        end
-      end
-    end
-  end
-end
+
+        end # Float
+      end # Literal
+    end # Node
+  end # Mutator
+end # Mutant

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

@@ -5,7 +5,7 @@ module Mutant
         # Mutator for hash literals
         class Hash < self
 
-          handle(Rubinius::AST::HashLiteral)
+          handle(:hash)
 
         private
 
@@ -17,67 +17,48 @@ module Mutant
           #
           def dispatch
             emit_nil
-            emit_values(values)
-            emit_element_presence
-            emit_body
+            emit_self
+            mutate_body
           end
 
-          # Emit body mutations
+          # Mutate body
           #
           # @return [undefined]
           #
           # @api private
           #
-          def emit_body
-            emit_attribute_mutations(:array, Mutator::Util::Array::Element)
+          def mutate_body
+            children.each_index do |index|
+              mutate_child(index)
+              dup_children = children.dup
+              dup_children.delete_at(index)
+              emit_self(*dup_children)
+            end
           end
 
-          # Return array of values in literal
-          #
-          # @return [Array]
-          #
-          # @api private
-          #
-          def array
-            node.array
-          end
+          # Mutator for hash pairs
+          class Pair < Node
 
-          # Return duplicate of array values in literal
-          #
-          # @return [Array]
-          #
-          # @api private
-          #
-          def dup_array
-            array.dup
-          end
+            handle(:pair)
 
-          # Return values to mutate against
-          #
-          # @return [Array]
-          #
-          # @api private
-          #
-          def values
-            [[]]
-          end
+            children :key, :value
 
-          # Emit element presence mutations
-          #
-          # @return [undefined]
-          #
-          # @api private
-          #
-          def emit_element_presence
-            0.step(array.length-1, 2) do |index|
-              contents = dup_array
-              contents.delete_at(index)
-              contents.delete_at(index)
-              emit_self(contents)
+          private
+
+            # Perform dispatch
+            #
+            # @return [undefined]
+            #
+            # @api private
+            #
+            def dispatch
+              emit_key_mutations
+              emit_value_mutations
             end
-          end
-        end
-      end
-    end
-  end
-end
+
+          end # Pair
+        end # Hash
+      end # Literal
+    end # Node
+  end # Mutator
+end # Mutant

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

@@ -5,7 +5,7 @@ module Mutant
         # Mutator for nil literals
         class Nil < self
 
-          handle(Rubinius::AST::NilLiteral)
+          handle(:nil)
 
         private
 
@@ -16,10 +16,11 @@ module Mutant
           # @api private
           #
           def dispatch
-            emit('Object.new'.to_ast)
+            emit(NEW_OBJECT)
           end
-        end
-      end
-    end
-  end
-end
+
+        end # Nil
+      end # Literal
+    end # Node
+  end # Mutator
+end # Mutant