rubinius-compiler 2.3.1 → 3.0

data/spec/return_spec.rb

@@ -1,152 +0,0 @@
-describe "A Return node" do
-  relates "return" do
-    compile do |g|
-      g.push :nil
-      g.ret
-    end
-  end
-
-  relates "return 1" do
-    compile do |g|
-      g.push 1
-      g.ret
-    end
-  end
-
-  ruby_version_is ""..."1.9" do
-    relates "return *1" do
-      compile do |g|
-        bottom = g.new_label
-
-        g.push 1
-        g.cast_array
-        g.dup
-        g.send :size, 0
-        g.push 1
-        g.send :>, 1
-        g.git bottom
-
-        g.push 0
-        g.send :at, 1
-
-        bottom.set!
-
-        g.ret
-      end
-    end
-
-    relates <<-ruby do
-        x = 1, 2
-        return *x
-      ruby
-
-      compile do |g|
-        g.push 1
-        g.push 2
-        g.make_array 2
-        g.set_local 0
-        g.pop
-
-        bottom = g.new_label
-
-        g.push_local 0
-        g.cast_array
-        g.dup
-        g.send :size, 0
-        g.push 1
-        g.send :>, 1
-        g.git bottom
-
-        g.push 0
-        g.send :at, 1
-
-        bottom.set!
-
-        g.ret
-      end
-    end
-
-    relates "return *[1]" do
-      compile do |g|
-        g.splatted_array
-        g.ret
-      end
-    end
-  end
-
-  ruby_version_is "1.9" do
-    relates "return *1" do
-      compile do |g|
-        bottom = g.new_label
-
-        g.push 1
-        g.cast_array
-
-        g.ret
-      end
-    end
-
-    relates <<-ruby do
-        x = 1, 2
-        return *x
-      ruby
-
-      compile do |g|
-        g.push 1
-        g.push 2
-        g.make_array 2
-        g.set_local 0
-        g.pop
-
-        g.push_local 0
-        g.cast_array
-
-        g.ret
-      end
-    end
-
-    relates "return *[1]" do
-      compile do |g|
-        bottom = g.new_label
-
-        g.push 1
-        g.make_array 1
-
-        g.ret
-      end
-    end
-  end
-
-  relates "return 1, 2, 3" do
-    compile do |g|
-      g.push 1
-      g.push 2
-      g.push 3
-      g.make_array 3
-      g.ret
-    end
-  end
-
-  relates "return 1, 2, *c" do
-    compile do |g|
-      g.push 1
-      g.push 2
-      g.make_array 2
-
-      g.push :self
-      g.send :c, 0, true
-      g.cast_array
-
-      g.send :+, 1
-      g.ret
-    end
-  end
-
-  relates "return [*[1]]" do
-    compile do |g|
-      g.push 1
-      g.make_array 1
-      g.ret
-    end
-  end
-end

data/spec/sclass_spec.rb

@@ -1,138 +0,0 @@
-describe "An Sclass node" do
-  relates <<-ruby do
-      class << self
-        42
-      end
-    ruby
-
-    compile do |g|
-      g.push :self
-      g.push_type
-      g.swap
-      g.send :object_singleton_class, 1
-
-      d = new_generator(g)
-
-      g.create_block d
-
-      d.push_self
-      d.add_scope
-      d.push 42
-      d.ret
-
-      g.swap
-      g.push_scope
-      g.push_true
-      g.send :call_under, 3
-    end
-  end
-
-  relates <<-ruby do
-      class A
-        class << self
-          a
-        end
-        class B
-        end
-      end
-    ruby
-
-    compile do |g|
-      in_class :A do |d|
-
-
-        d.push :self
-        d.push_type
-        d.swap
-        d.send :object_singleton_class, 1
-
-        e = new_generator(g)
-
-        d.create_block(e)
-
-        e.push_self
-        e.add_scope
-        e.push :self
-        e.send :a, 0, true
-        e.ret
-
-        d.swap
-        d.push_scope
-        d.push_true
-        d.send :call_under, 3
-
-        d.pop
-        d.in_class :B
-        d.pop
-        d.push :nil
-      end
-    end
-  end
-
-  relates <<-ruby do
-      x = "a"
-      class << x
-      end
-    ruby
-
-    compile do |g|
-      g.push_literal "a"
-      g.string_dup
-      g.set_local 0
-      g.pop
-      g.push_local 0
-      g.push_type
-      g.swap
-      g.send :object_singleton_class, 1
-      g.pop
-      g.push :nil
-    end
-  end
-
-  relates <<-ruby do
-    x = "a"
-    m do
-      class << x
-      end
-    end
-    ruby
-
-    compile do |g|
-      g.push_literal "a"
-      g.string_dup
-      g.set_local 0
-      g.pop
-
-      g.push :self
-
-      g.in_block_send :m, :none do |d|
-        d.push_local_depth 1, 0
-        d.push_type
-        d.swap
-        d.send :object_singleton_class, 1
-        d.pop
-        d.push :nil
-      end
-    end
-  end
-
-  relates <<-ruby do
-    x = "a"
-    class << x
-      self
-    end
-    ruby
-
-    compile do |g|
-      g.push_literal "a"
-      g.string_dup
-      g.set_local 0
-      g.pop
-
-      g.push_local 0
-      g.push_type
-      g.swap
-      g.send :object_singleton_class, 1
-    end
-  end
-end

data/spec/spec_helper.rb

@@ -1,12 +0,0 @@
-require 'rubinius/bridge'
-require 'rubinius/toolset'
-
-Rubinius::ToolSets.create :spec do
-  require "rubinius/melbourne"
-  require "rubinius/processor"
-  require "rubinius/compiler"
-  require "rubinius/ast"
-
-  require 'spec/custom/matchers/compile_as'
-  require 'spec/custom/runner/relates'
-end

data/spec/str_spec.rb

@@ -1,118 +0,0 @@
-describe "A Str node" do
-  relates '"x"' do
-    compile do |g|
-      g.push_literal "x"
-      g.string_dup
-    end
-  end
-
-  str_concat = lambda do |g|
-    g.push_literal "before after"
-    g.string_dup
-  end
-
-  relates <<-ruby do
-      "before" \
-      " after"
-    ruby
-
-    compile(&str_concat)
-  end
-
-  relates '"before" " after"' do
-    compile(&str_concat)
-  end
-
-  relates <<-ruby do
-      "file = \#{__FILE__}\n"
-    ruby
-
-    compile do |g|
-      g.push_literal "file = "
-
-      g.push_scope
-      g.send :active_path, 0
-      g.meta_to_s
-
-      g.push_literal "\n"
-
-      g.string_build 3
-    end
-  end
-
-  relates <<-ruby do
-<<'EOM'.strip
-  blah
-blah
-EOM
-    ruby
-
-    compile do |g|
-      g.push_literal "  blah\nblah\n"
-      g.string_dup
-      g.send :strip, 0, false
-    end
-  end
-
-  relates <<-ruby do
-a += <<-H1 + b + <<-H2
-  first
-H1
-  second
-H2
-    ruby
-
-    compile do |g|
-      g.push_local 0
-
-      g.push_literal "  first\n"
-      g.string_dup
-
-      g.push :self
-      g.send :b, 0, true
-      g.send :+, 1, false
-
-      g.push_literal "  second\n"
-      g.string_dup
-
-      g.send :+, 1, false
-      g.send :+, 1, false
-
-      g.set_local 0
-    end
-  end
-
-  relates <<-ruby do
-<<-EOM
-  blah
-blah
-
-  EOM
-    ruby
-
-    compile do |g|
-      g.push_literal "  blah\nblah\n\n"
-      g.string_dup
-    end
-  end
-
-  relates <<-ruby do
-<<'EOM'
-  blah
-blah
-EOM
-    ruby
-
-    compile do |g|
-      g.push_literal "  blah\nblah\n"
-      g.string_dup
-    end
-  end
-
-  relates "%(blah)" do
-    compile do |g|
-      g.push_literal "blah"
-      g.string_dup
-    end
-  end
-end

data/spec/super_spec.rb

@@ -1,170 +0,0 @@
-describe "A Super node" do
-  relates <<-ruby do
-      def x
-        super()
-      end
-    ruby
-
-    compile do |g|
-      in_method :x do |d|
-        d.push_block
-        d.send_super :x, 0
-      end
-    end
-  end
-
-  relates <<-ruby do
-      def x(&block)
-        super(&block)
-      end
-    ruby
-
-    compile do |g|
-      in_method :x do |d|
-        d.block_arg 0
-
-        is_nil = d.new_label
-        d.push_local 0
-        d.dup
-        d.is_nil
-        d.git is_nil
-        d.push_cpath_top
-        d.find_const :Proc
-        d.swap
-        d.send :__from_block__, 1
-        is_nil.set!
-        d.send_super :x, 0
-      end
-    end
-  end
-
-  relates <<-ruby do
-      def x
-        super([24, 42])
-      end
-    ruby
-
-    compile do |g|
-      in_method :x do |d|
-        d.push 24
-        d.push 42
-        d.make_array 2
-        d.push_block
-        d.send_super :x, 1
-      end
-    end
-  end
-
-  relates <<-ruby do
-      def x
-        super(4)
-      end
-    ruby
-
-    compile do |g|
-      in_method :x do |d|
-        d.push 4
-        d.push_block
-        d.send_super :x, 1
-      end
-    end
-  end
-
-  relates "super(a, &b)" do
-    compile do |g|
-      t = g.new_label
-
-      g.push :self
-      g.send :a, 0, true
-
-      g.push :self
-      g.send :b, 0, true
-
-      g.dup
-      g.is_nil
-      g.git t
-
-      g.push_cpath_top
-      g.find_const :Proc
-      g.swap
-
-      g.send :__from_block__, 1
-
-      t.set!
-
-      # nil here because the test isn't wrapped in a method, so
-      # there is no current method to pull the name of the method
-      # from
-      g.send_super nil, 1
-    end
-  end
-
-  relates "super(a, *b)" do
-    compile do |g|
-      g.push :self
-      g.send :a, 0, true
-
-      g.push :self
-      g.send :b, 0, true
-
-      g.cast_array
-
-      g.push_block
-
-      # nil here because the test isn't wrapped in a method, so
-      # there is no current method to pull the name of the method
-      # from
-      g.send_super nil, 1, true
-    end
-  end
-
-  relates <<-ruby do
-      def f(*)
-        super
-      end
-    ruby
-
-    compile do |g|
-      in_method :f do |d|
-        d.push_block
-        d.zsuper :f
-      end
-    end
-  end
-
-  relates <<-ruby do
-      def x
-        super(24, 42)
-      end
-    ruby
-
-    compile do |g|
-      in_method :x do |d|
-        d.push 24
-        d.push 42
-        d.push_block
-        d.send_super :x, 2
-      end
-    end
-  end
-
-  relates "super([*[1]])" do
-    compile do |g|
-      g.push 1
-      g.make_array 1
-      g.push_block
-      g.send_super nil, 1
-    end
-  end
-
-  relates "super(*[1])" do
-    compile do |g|
-      g.push 1
-      g.make_array 1
-      g.cast_array
-
-      g.push_block
-      g.send_super nil, 0, true
-    end
-  end
-end