rubinius-melbourne 2.0.0.19 → 2.0.1.0

data/spec/defs_spec.rb

@@ -0,0 +1,81 @@
+describe "A Defs node" do
+  relates <<-ruby do
+      def self.x(y)
+        (y + 1)
+      end
+    ruby
+
+    parse do
+      [:defs,
+         [:self],
+         :x,
+         [:args, :y],
+         [:scope, [:block, [:call, [:lvar, :y], :+, [:arglist, [:lit, 1]]]]]]
+    end
+  end
+
+  relates <<-ruby do
+      def self.setup(ctx)
+        bind = allocate
+        bind.context = ctx
+        return bind
+      end
+    ruby
+
+    parse do
+      [:defs,
+         [:self],
+         :setup,
+         [:args, :ctx],
+         [:scope,
+          [:block,
+           [:lasgn, :bind, [:call, nil, :allocate, [:arglist]]],
+           [:attrasgn, [:lvar, :bind], :context=, [:arglist, [:lvar, :ctx]]],
+           [:return, [:lvar, :bind]]]]]
+    end
+  end
+
+  relates <<-ruby do
+      def self.empty(*)
+      end
+    ruby
+
+    parse do
+      [:defs, [:self], :empty, [:args, :*], [:scope, [:block]]]
+    end
+  end
+
+  relates <<-ruby do
+      def self.empty
+      end
+    ruby
+
+    parse do
+      [:defs, [:self], :empty, [:args], [:scope, [:block]]]
+    end
+  end
+
+  relates <<-ruby do
+      def (a.b).empty(*)
+      end
+    ruby
+
+    parse do
+      [:defs,
+       [:call, [:call, nil, :a, [:arglist]], :b, [:arglist]],
+       :empty,
+       [:args, :*],
+       [:scope, [:block]]]
+    end
+  end
+
+  relates <<-ruby do
+    x = "a"
+    def x.m(a)
+      a
+    end
+    ruby
+
+    # TODO
+  end
+end

data/spec/dot2_spec.rb

@@ -0,0 +1,7 @@
+describe "A Dot2 node" do
+  relates "(a..b)" do
+    parse do
+      [:dot2, [:call, nil, :a, [:arglist]], [:call, nil, :b, [:arglist]]]
+    end
+  end
+end

data/spec/dot3_spec.rb

@@ -0,0 +1,7 @@
+describe "A Dot3 node" do
+  relates "(a...b)" do
+    parse do
+      [:dot3, [:call, nil, :a, [:arglist]], [:call, nil, :b, [:arglist]]]
+    end
+  end
+end

data/spec/dregx_spec.rb

@@ -0,0 +1,52 @@
+describe "A Dregx node" do
+  relates <<-ruby do
+      /(\#{})/
+    ruby
+
+    parse do
+      [:dregx, "(", [:str, ""], [:str, ")"]]
+    end
+  end
+
+  relates "/x\#{(1 + 1)}y/" do
+    parse do
+      [:dregx,
+       "x",
+       [:evstr, [:call, [:lit, 1], :+, [:arglist, [:lit, 1]]]],
+       [:str, "y"]]
+    end
+  end
+
+  relates "/a\#{}b/" do
+    parse do
+      [:dregx, "a", [:str, ""], [:str, "b"]]
+    end
+  end
+
+  relates "/\#{@rakefile}/" do
+    parse do
+      [:dregx, "", [:evstr, [:ivar, :@rakefile]]]
+    end
+  end
+
+  relates "/\#{1}/n" do
+    parse do
+      [:dregx, "", [:evstr, [:lit, 1]], 16]
+    end
+  end
+
+  relates "/\#{IAC}\#{SB}/no" do
+    parse do
+      [:dregx_once, "", [:evstr, [:const, :IAC]], [:evstr, [:const, :SB]], 16]
+    end
+  end
+
+  relates "/x\#{(1 + 1)}y/o" do
+    parse do
+      [:dregx_once,
+       "x",
+       [:evstr, [:call, [:lit, 1], :+, [:arglist, [:lit, 1]]]],
+       [:str, "y"]]
+    end
+  end
+end

data/spec/dstr_spec.rb

@@ -0,0 +1,169 @@
+describe "A Dstr node" do
+  relates <<-ruby do
+      "hello \#{}"
+    ruby
+
+    parse do
+      [:dstr, "hello ", [:str, ""]]
+    end
+  end
+
+  relates <<-ruby do
+      argl = 1
+      "x\#{argl}y"
+    ruby
+
+    parse do
+      [:block,
+       [:lasgn, :argl, [:lit, 1]],
+       [:dstr, "x", [:evstr, [:lvar, :argl]], [:str, "y"]]]
+    end
+  end
+
+  relates <<-ruby do
+      argl = 1
+      "x\#{("%.2f" % 3.14159)}y"
+    ruby
+
+    parse do
+      [:block,
+       [:lasgn, :argl, [:lit, 1]],
+       [:dstr,
+        "x",
+        [:evstr, [:call, [:str, "%.2f"], :%, [:arglist, [:lit, 3.14159]]]],
+        [:str, "y"]]]
+    end
+  end
+
+  relates <<-ruby do
+      max = 2
+      argl = 1
+      "x\#{("%.\#{max}f" % 3.14159)}y"
+    ruby
+
+    parse do
+      [:block,
+       [:lasgn, :max, [:lit, 2]],
+       [:lasgn, :argl, [:lit, 1]],
+       [:dstr,
+        "x",
+        [:evstr,
+         [:call,
+          [:dstr, "%.", [:evstr, [:lvar, :max]], [:str, "f"]],
+          :%,
+          [:arglist, [:lit, 3.14159]]]],
+        [:str, "y"]]]
+    end
+  end
+
+  relates '"#{22}aa" "cd#{44}" "55" "#{66}"' do
+    parse do
+      [:dstr,
+       "",
+       [:evstr, [:lit, 22]],
+       [:str, "aa"],
+       [:str, "cd"],
+       [:evstr, [:lit, 44]],
+       [:str, "55"],
+       [:evstr, [:lit, 66]]]
+    end
+  end
+
+  relates '"a #$global b #@ivar c #@@cvar d"' do
+    parse do
+      [:dstr,
+       "a ",
+       [:evstr, [:gvar, :$global]],
+       [:str, " b "],
+       [:evstr, [:ivar, :@ivar]],
+       [:str, " c "],
+       [:evstr, [:cvar, :@@cvar]],
+       [:str, " d"]]
+    end
+  end
+
+  relates <<-ruby do
+<<EOM
+  blah
+\#{1 + 1}blah
+EOM
+    ruby
+
+    parse do
+      [:dstr,
+       "  blah\n",
+       [:evstr, [:call, [:lit, 1], :+, [:arglist, [:lit, 1]]]],
+       [:str, "blah\n"]]
+    end
+  end
+
+  relates <<-ruby do
+<<-EOF
+def test_\#{action}_valid_feed
+EOF
+    ruby
+
+    parse do
+      [:dstr,
+       "def test_",
+       [:evstr, [:call, nil, :action, [:arglist]]],
+       [:str, "_valid_feed\n"]]
+    end
+  end
+
+  relates <<-ruby do
+<<-EOF
+s1 '\#{RUBY_PLATFORM}' s2
+\#{__FILE__}
+EOF
+    ruby
+
+    parse do
+      [:dstr,
+       "s1 '",
+       [:evstr, [:const, :RUBY_PLATFORM]],
+       [:str, "' s2\n"],
+       [:evstr, [:file]],
+       [:str, "\n"]]
+    end
+  end
+
+  relates "%Q[before [\#{nest}] after]" do
+    parse do
+      [:dstr,
+       "before [",
+       [:evstr, [:call, nil, :nest, [:arglist]]],
+       [:str, "] after"]]
+    end
+  end
+
+  relates '"#{"blah"}#{__FILE__}:#{__LINE__}: warning: #{$!.message} (#{$!.class})"' do
+    parse do
+      [:dstr,
+       "blah",
+       [:evstr, [:file]],
+       [:str, ":"],
+       [:evstr, [:lit, 1]],
+       [:str, ": warning: "],
+       [:evstr, [:call, [:gvar, :$!], :message, [:arglist]]],
+       [:str, " ("],
+       [:evstr, [:call, [:gvar, :$!], :class, [:arglist]]],
+       [:str, ")"]]
+    end
+  end
+
+  relates '"before #{from} middle #{to} (#{__FILE__}:#{__LINE__})"' do
+    parse do
+      [:dstr,
+       "before ",
+       [:evstr, [:call, nil, :from, [:arglist]]],
+       [:str, " middle "],
+       [:evstr, [:call, nil, :to, [:arglist]]],
+       [:str, " ("],
+       [:evstr, [:file]],
+       [:str, ":"],
+       [:evstr, [:lit, 1]],
+       [:str, ")"]]
+    end
+  end
+end

data/spec/dsym_spec.rb

@@ -0,0 +1,10 @@
+describe "A Dsym node" do
+  relates ':"x#{(1 + 1)}y"' do
+    parse do
+      [:dsym,
+       "x",
+       [:evstr, [:call, [:lit, 1], :+, [:arglist, [:lit, 1]]]],
+       [:str, "y"]]
+    end
+  end
+end

data/spec/dxstr_spec.rb

@@ -0,0 +1,11 @@
+describe "A Dxstr node" do
+  relates <<-ruby do
+      t = 5
+      `touch \#{t}`
+    ruby
+
+    parse do
+      [:block, [:lasgn, :t, [:lit, 5]], [:dxstr, "touch ", [:evstr, [:lvar, :t]]]]
+    end
+  end
+end

data/spec/ensure_spec.rb

@@ -0,0 +1,117 @@
+describe "An Ensure node" do
+  relates <<-ruby do
+      begin
+        # do nothing
+      rescue
+        # do nothing
+      ensure
+        # do nothing
+      end
+    ruby
+
+    parse do
+      [:ensure, [:rescue, [:resbody, [:array], nil]], [:nil]]
+    end
+  end
+
+  relates <<-ruby do
+      begin
+        (1 + 1)
+      rescue SyntaxError => e1
+        2
+      rescue Exception => e2
+        3
+      else
+        4
+      ensure
+        5
+      end
+    ruby
+
+    parse do
+      [:ensure,
+         [:rescue,
+          [:call, [:lit, 1], :+, [:arglist, [:lit, 1]]],
+          [:resbody,
+           [:array, [:const, :SyntaxError], [:lasgn, :e1, [:gvar, :$!]]],
+           [:lit, 2]],
+          [:resbody,
+           [:array, [:const, :Exception], [:lasgn, :e2, [:gvar, :$!]]],
+           [:lit, 3]],
+          [:lit, 4]],
+         [:lit, 5]]
+    end
+  end
+
+  relates <<-ruby do
+      begin
+        a
+      rescue
+        # do nothing
+      ensure
+        # do nothing
+      end
+    ruby
+
+    parse do
+      [:ensure,
+         [:rescue, [:call, nil, :a, [:arglist]], [:resbody, [:array], nil]],
+         [:nil]]
+    end
+  end
+
+  relates <<-ruby do
+      begin
+        14
+        return 2
+      ensure
+        13
+      end
+    ruby
+
+    parse do
+      [:ensure, [:block, [:lit, 14], [:return, [:lit, 2]]], [:lit, 13]]
+    end
+  end
+
+  relates <<-ruby do
+      begin
+        begin
+          14
+          return 2
+        ensure
+          13
+        end
+      ensure
+        15
+      end
+    ruby
+
+    parse do
+      [:ensure,
+       [:ensure, [:block, [:lit, 14], [:return, [:lit, 2]]], [:lit, 13]],
+       [:lit, 15]]
+    end
+  end
+
+  relates <<-ruby do
+      begin
+        14
+        return 2
+      ensure
+        begin
+          15
+          return 3
+        ensure
+          16
+        end
+      end
+    ruby
+
+    parse do
+      [:ensure,
+        [:block, [:lit, 14], [:return, [:lit, 2]]],
+        [:ensure, [:block, [:lit, 15], [:return, [:lit, 3]]], [:lit, 16]]]
+    end
+  end
+end