rubinius-compiler 2.3.1 → 3.0

data/spec/transforms/invoke_primitive_spec.rb

@@ -1,14 +0,0 @@
-describe "A Call node using InvokePrimitive transform" do
-  relates <<-ruby do
-      Rubinius.invoke_primitive :name, 1, 2, a
-    ruby
-
-    compile :invoke_primitive do |g|
-      g.push 1
-      g.push 2
-      g.push :self
-      g.send :a, 0, true
-      g.invoke_primitive :name, 3
-    end
-  end
-end

data/spec/transforms/kernel_methods_spec.rb

@@ -1,29 +0,0 @@
-describe "A Call node using kernel_methods transform" do
-  relates "4 / 2" do
-    compile do |g|
-      g.push 4
-      g.push 2
-      g.send :/, 1, false
-    end
-
-    compile :kernel_methods do |g|
-      g.push 4
-      g.push 2
-      g.send :divide, 1, false
-    end
-  end
-
-  relates "a.class" do
-    compile do |g|
-      g.push :self
-      g.send :a, 0, true
-      g.send :class, 0, false
-    end
-
-    compile :kernel_methods do |g|
-      g.push :self
-      g.send :a, 0, true
-      g.send :__class__, 0, false
-    end
-  end
-end

data/spec/transforms/primitive_spec.rb

@@ -1,33 +0,0 @@
-describe "A Call node using PrimitiveDeclaration transform" do
-  relates <<-ruby do
-      def m
-        Rubinius.primitive :prim
-        raise PrimitiveFailure, "failed"
-      end
-    ruby
-
-    compile do |g|
-      in_method :m do |d|
-        d.push_const :Rubinius
-        d.push_literal :prim
-        d.send :primitive, 1, false
-        d.pop
-        d.push :self
-        d.push_const :PrimitiveFailure
-        d.push_literal "failed"
-        d.string_dup
-        d.send :raise, 2, true
-      end
-    end
-
-    compile :primitive do |g|
-      in_method :m do |d|
-        d.push :self
-        d.push_const :PrimitiveFailure
-        d.push_literal "failed"
-        d.string_dup
-        d.send :raise, 2, true
-      end
-    end
-  end
-end

data/spec/transforms/privately_spec.rb

@@ -1,24 +0,0 @@
-describe "A Call node using SendPrivately transform" do
-  relates <<-ruby do
-      def m
-        c = 1
-        Rubinius.privately {
-          a.b c
-        }
-      end
-    ruby
-
-    compile :privately do |g|
-      in_method :m do |d|
-        d.push 1
-        d.set_local 0
-        d.pop
-
-        d.push :self
-        d.send :a, 0, true
-        d.push_local 0
-        d.send :b, 1, true
-      end
-    end
-  end
-end

data/spec/true_spec.rb

@@ -1,7 +0,0 @@
-describe "A True node" do
-  relates "true" do
-    compile do |g|
-      g.push :true
-    end
-  end
-end

data/spec/undef_spec.rb

@@ -1,133 +0,0 @@
-describe "An Undef node" do
-  relates "undef :x" do
-    compile do |g|
-      undef_bytecode :x
-    end
-  end
-
-  relates "undef :x, :y" do
-    compile do |g|
-      undef_bytecode :x, :y
-    end
-  end
-
-  relates "undef :x, :y, :z" do
-    compile do |g|
-      undef_bytecode :x, :y, :z
-    end
-  end
-
-  relates <<-ruby do
-      f1
-      undef :x
-    ruby
-
-    compile do |g|
-      g.push :self
-      g.send :f1, 0, true
-      g.pop
-
-      undef_bytecode :x
-    end
-  end
-
-  relates <<-ruby do
-      f1
-      undef :x, :y
-    ruby
-
-    compile do |g|
-      g.push :self
-      g.send :f1, 0, true
-      g.pop
-
-      undef_bytecode :x, :y
-    end
-  end
-
-  relates <<-ruby do
-      undef :x, :y, :z
-      f2
-    ruby
-
-    compile do |g|
-      undef_bytecode :x, :y, :z
-      g.pop
-
-      g.push :self
-      g.send :f2, 0, true
-    end
-  end
-
-  relates <<-ruby do
-      f1
-      undef :x, :y, :z
-    ruby
-
-    compile do |g|
-      g.push :self
-      g.send :f1, 0, true
-      g.pop
-
-      undef_bytecode :x, :y, :z
-    end
-  end
-
-  relates <<-ruby do
-      f1
-      undef :x, :y, :z
-      f2
-    ruby
-
-    compile do |g|
-      g.push :self
-      g.send :f1, 0, true
-      g.pop
-
-      undef_bytecode :x, :y, :z
-      g.pop
-
-      g.push :self
-      g.send :f2, 0, true
-    end
-  end
-
-  relates "class B; undef :blah; end" do
-    compile do |g|
-      g.in_class :B do |d|
-        d.push_scope
-        d.push_literal :blah
-        d.send :__undef_method__, 1
-      end
-    end
-  end
-
-  relates <<-ruby do
-      undef :"x\#{1}", :"x\#{2}"
-    ruby
-
-    compile do |g|
-      g.push_scope
-      g.push_literal "x"
-
-      g.push 1
-      g.meta_to_s
-
-      g.string_build 2
-
-      g.send :to_sym, 0, true
-      g.send :__undef_method__, 1
-      g.pop
-
-      g.push_scope
-
-      g.push_literal "x"
-      g.push 2
-      g.meta_to_s
-      g.string_build 2
-
-      g.send :to_sym, 0, true
-      g.send :__undef_method__, 1
-    end
-  end
-end

data/spec/until_spec.rb

@@ -1,254 +0,0 @@
-describe "An Until node" do
-  pre_until = lambda do |g|
-    top    = g.new_label
-    rdo    = g.new_label
-    brk    = g.new_label
-    post   = g.new_label
-    bottom = g.new_label
-
-    g.push_modifiers
-
-    top.set!
-    g.push :self
-    g.send :a, 0, true
-    g.git bottom
-
-    rdo.set!
-    g.push :self
-    g.send :b, 0, true
-    g.push 1
-    g.send :+, 1, false
-
-    post.set!
-    g.pop
-    g.check_interrupts
-    g.goto top
-
-    bottom.set!
-    g.push :nil
-
-    brk.set!
-    g.pop_modifiers
-  end
-
-  post_until = lambda do |g|
-    top    = g.new_label
-    brk    = g.new_label
-    post   = g.new_label
-    bottom = g.new_label
-
-    g.push_modifiers
-
-    top.set!
-
-    g.push :self
-    g.send :b, 0, true
-    g.push 1
-    g.send :+, 1, false
-
-    post.set!
-    g.pop
-    g.check_interrupts
-
-    g.push :self
-    g.send :a, 0, true
-    g.git bottom
-
-    g.goto top
-
-    bottom.set!
-    g.push :nil
-
-    brk.set!
-
-    g.pop_modifiers
-  end
-
-  ruby_version_is ""..."1.9" do
-    nil_condition = lambda do |g|
-      top    = g.new_label
-      rdo    = g.new_label
-      brk    = g.new_label
-      post   = g.new_label
-      bottom = g.new_label
-
-      g.push_modifiers
-      top.set!
-
-      g.push :nil
-      g.git bottom
-
-      rdo.set!
-      g.push :self
-      g.send :a, 0, true
-
-      post.set!
-      g.pop
-      g.check_interrupts
-      g.goto top
-
-      bottom.set!
-      g.push :nil
-
-      brk.set!
-      g.pop_modifiers
-    end
-
-    relates <<-ruby do
-        while not a
-          b + 1
-        end
-      ruby
-
-      compile(&pre_until)
-    end
-
-    relates "b + 1 while not a" do
-      compile(&pre_until)
-    end
-
-    relates <<-ruby do
-        begin
-          b + 1
-        end while not a
-      ruby
-
-      compile(&post_until)
-    end
-
-    relates "a while not ()" do
-      compile(&nil_condition)
-    end
-
-    relates <<-ruby do
-        while not ()
-          a
-        end
-      ruby
-
-      compile(&nil_condition)
-    end
-
-    relates "a while ! ()" do
-      compile(&nil_condition)
-    end
-
-    relates <<-ruby do
-        while ! ()
-          a
-        end
-      ruby
-
-      compile(&nil_condition)
-    end
-  end
-
-  ruby_version_is "1.9" do
-    nil_condition = lambda do |g|
-      top    = g.new_label
-      rdo    = g.new_label
-      brk    = g.new_label
-      post   = g.new_label
-      bottom = g.new_label
-
-      g.push_modifiers
-      top.set!
-
-      g.push :nil
-      g.git bottom
-
-      rdo.set!
-      g.push :self
-      g.send :a, 0, true
-
-      post.set!
-      g.pop
-      g.check_interrupts
-      g.goto top
-
-      bottom.set!
-      g.push :nil
-
-      brk.set!
-      g.pop_modifiers
-    end
-
-    relates "a until ()" do
-      compile(&nil_condition)
-    end
-
-    relates <<-ruby do
-        until ()
-          a
-        end
-      ruby
-
-      compile(&nil_condition)
-    end
-
-    not_nil_condition = lambda do |g|
-      top    = g.new_label
-      rdo    = g.new_label
-      brk    = g.new_label
-      post   = g.new_label
-      bottom = g.new_label
-
-      g.push_modifiers
-      top.set!
-
-      g.push :nil
-      g.send :"!", 0, false
-      g.git bottom
-
-      rdo.set!
-      g.push :self
-      g.send :a, 0, true
-
-      post.set!
-      g.pop
-      g.check_interrupts
-      g.goto top
-
-      bottom.set!
-      g.push :nil
-
-      brk.set!
-      g.pop_modifiers
-    end
-
-    relates "a until ! ()" do
-      compile(&not_nil_condition)
-    end
-
-    relates <<-ruby do
-        until ! ()
-          a
-        end
-      ruby
-
-      compile(&not_nil_condition)
-    end
-  end
-
-  relates <<-ruby do
-      until a
-        b + 1
-      end
-    ruby
-
-    compile(&pre_until)
-  end
-
-  relates "b + 1 until a" do
-    compile(&pre_until)
-  end
-
-  relates <<-ruby do
-      begin
-        b + 1
-      end until a
-    ruby
-
-    compile(&post_until)
-  end
-end